<{FRP.Fursuit.Sink.<<}> tpl_s45u_s45u = tpl_s45u_s45u FRP.Fursuit.Sink.perform1 sig_s45x s_s45y = let !ds_s461 = FRP.Fursuit.Signal.removableSink1 GHC.Base.id sig_s45x s_s45y in select ds_s461 (<{GHC.Tuple.(,)}> ipv_s45C ipv1_s460 -> <{GHC.Tuple.(,)}> ipv_s45C <{GHC.Tuple.()}>) FRP.Fursuit.Sink.perform eta_B2_B2 eta_B1_B1 = FRP.Fursuit.Sink.perform1 eta_B2_B2 eta_B1_B1 FRP.Fursuit.Sink.$fSinkPipea1 p_s45G s_s45I eta_s45J = let !ds_s466 = FRP.Fursuit.Signal.removableSink1 (FRP.Fursuit.Sink.$fSinkPipea1$1 p_s45G) s_s45I eta_s45J in select ds_s466 (<{GHC.Tuple.(,)}> ipv_s45N ipv1_s465 -> <{GHC.Tuple.(,)}> ipv_s45N <{GHC.Tuple.()}>) FRP.Fursuit.Sink.$fSinkPipea1$1 p_s45G eta_B2_B2 eta_B1_B1 = FRP.Fursuit.Pipe.write1 p_s45G eta_B2_B2 eta_B1_B1 <{FRP.Fursuit.Sink.$fSinkPipea_$c<<}> eta_B3_B3 eta_B2_B2 eta_B1_B1 = FRP.Fursuit.Sink.$fSinkPipea1 eta_B3_B3 eta_B2_B2 eta_B1_B1 FRP.Fursuit.Sink.$fSinkPipea =: FRP.Fursuit.Sink.$fSinkPipea1 FRP.Fursuit.Sink.$fSinkIORefa1 ref_s45R s_s45T eta_s45U = let !ds_s46c = FRP.Fursuit.Signal.removableSink1 (FRP.Fursuit.Sink.$fSinkIORefa1$2 ref_s45R) s_s45T eta_s45U in select ds_s46c (<{GHC.Tuple.(,)}> ipv_s45Y ipv1_s46b -> <{GHC.Tuple.(,)}> ipv_s45Y <{GHC.Tuple.()}>) FRP.Fursuit.Sink.$fSinkIORefa1$2 ref_s45R eta_B2_B2 eta_B1_B1 = GHC.STRef.writeSTRef1 ref_s45R eta_B2_B2 eta_B1_B1 <{FRP.Fursuit.Sink.$fSinkIORefa_$c<<}> eta_B3_B3 eta_B2_B2 eta_B1_B1 = FRP.Fursuit.Sink.$fSinkIORefa1 eta_B3_B3 eta_B2_B2 eta_B1_B1 FRP.Fursuit.Sink.$fSinkIORefa =: FRP.Fursuit.Sink.$fSinkIORefa1 <{FRP.Fursuit.Sink.$fSink(->)a}> =: FRP.Fursuit.Signal.sink1