Yampa/rpSwitch
rpSwitch :: Functor col
=> (forall sf. (in -> col sf -> col (ext, sf)))
-> col (SF ext out)
-> SF (in, Event ( col (SF ext out)
-> col (SF ext out)))
(col out)
(download original Yampa rpSwitch.svg)