Gui.Generic.Instances.Maybe.lvl =: GHC.Types.C# '+' Gui.Generic.Instances.Maybe.lvl1 =: <{GHC.Types.:}> Gui.Generic.Instances.Maybe.lvl <{GHC.Types.[]}> Gui.Generic.Instances.Maybe.a =: let !ds_s15DE = Javascript.Base.Types.FakePtr Gui.Generic.Instances.Maybe.lvl1 in select ds_s15DE (GHC.Ptr.Ptr ds1_s15vQ -> let !wild_s15DD = ffi_wrapper3 jsToString ds1_s15vQ GHC.Prim.realWorld# in select wild_s15DD (<{GHC.Tuple.(,)}> ds2_s15DC ds3_s15vV -> GHC.Ptr.Ptr ds3_s15vV)) Gui.Generic.Instances.Maybe.lvl2 =: GHC.Types.C# '-' Gui.Generic.Instances.Maybe.lvl3 =: <{GHC.Types.:}> Gui.Generic.Instances.Maybe.lvl2 <{GHC.Types.[]}> Gui.Generic.Instances.Maybe.a1 =: let !ds_s15DK = Javascript.Base.Types.FakePtr Gui.Generic.Instances.Maybe.lvl3 in select ds_s15DK (GHC.Ptr.Ptr ds1_s15vZ -> let !wild_s15DJ = ffi_wrapper3 jsToString ds1_s15vZ GHC.Prim.realWorld# in select wild_s15DJ (<{GHC.Tuple.(,)}> ds2_s15DI ds3_s15w4 -> GHC.Ptr.Ptr ds3_s15w4)) Gui.Generic.Instances.Maybe.x =: GHC.CString.unpackCString# ":visible" Gui.Generic.Instances.Maybe.a2 =: let !ds_s15DQ = Javascript.Base.Types.FakePtr Gui.Generic.Instances.Maybe.x in select ds_s15DQ (GHC.Ptr.Ptr ds1_s15w9 -> let !tpl_s15DP = Gui.Generic.Instances.Maybe.x, !wild_s15DO = ffi_wrapper3 jsToString ds1_s15w9 GHC.Prim.realWorld# in select wild_s15DO (<{GHC.Tuple.(,)}> ds2_s15DN ds3_s15we -> GHC.Ptr.Ptr ds3_s15we)) Gui.Generic.Instances.Maybe.lvl4 =: Data.Maybe.Just Data.Maybe.Nothing Gui.Generic.Instances.Maybe.handleSigs ds_s15wg = select ds_s15wg (<{GHC.Tuple.(,)}> ds1_s15wk ds2_s15wm -> if ds1_s15wk (select ds2_s15wm (Data.Maybe.Nothing -> Data.Maybe.Nothing) (Data.Maybe.Just ipv_s15DV -> Data.Maybe.Just ds2_s15wm)) Gui.Generic.Instances.Maybe.lvl4) Gui.Generic.Instances.Maybe.lvl5 x5_s15wr = select x5_s15wr (Data.Maybe.Nothing -> Data.Maybe.Nothing) (Data.Maybe.Just v_s15wu -> v_s15wu) Gui.Generic.Instances.Maybe.x1 =: GHC.CString.unpackCString# "
" Gui.Generic.Instances.Maybe.lvl6 =: let !ds_s15E3 = Javascript.Base.Types.FakePtr Gui.Generic.Instances.Maybe.x1 in select ds_s15E3 (GHC.Ptr.Ptr ds1_s15wz -> let !tpl_s15E2 = Gui.Generic.Instances.Maybe.x1, !wild_s15E1 = ffi_wrapper3 jsToString ds1_s15wz GHC.Prim.realWorld# in select wild_s15E1 (<{GHC.Tuple.(,)}> ds2_s15E0 ds3_s15wE -> GHC.Ptr.Ptr ds3_s15wE)) Gui.Generic.Instances.Maybe.x2 =: GHC.CString.unpackCString# "maybeElem" Gui.Generic.Instances.Maybe.lvl7 =: let !ds_s15E9 = Javascript.Base.Types.FakePtr Gui.Generic.Instances.Maybe.x2 in select ds_s15E9 (GHC.Ptr.Ptr ds1_s15wJ -> let !tpl_s15E8 = Gui.Generic.Instances.Maybe.x2, !wild_s15E7 = ffi_wrapper3 jsToString ds1_s15wJ GHC.Prim.realWorld# in select wild_s15E7 (<{GHC.Tuple.(,)}> ds2_s15E6 ds3_s15wO -> GHC.Ptr.Ptr ds3_s15wO)) Gui.Generic.Instances.Maybe.lvl8 =: let !ds_s15Ee = Javascript.Base.Types.FakePtr Gui.Generic.Instances.Maybe.x1 in select ds_s15Ee (GHC.Ptr.Ptr ds1_s15wT -> let !tpl_s15Ed = Gui.Generic.Instances.Maybe.x1, !wild_s15Ec = ffi_wrapper3 jsToString ds1_s15wT GHC.Prim.realWorld# in select wild_s15Ec (<{GHC.Tuple.(,)}> ds2_s15Eb ds3_s15wY -> GHC.Ptr.Ptr ds3_s15wY)) Gui.Generic.Instances.Maybe.x3 =: GHC.CString.unpackCString# "maybeCont" Gui.Generic.Instances.Maybe.lvl9 =: let !ds_s15Ek = Javascript.Base.Types.FakePtr Gui.Generic.Instances.Maybe.x3 in select ds_s15Ek (GHC.Ptr.Ptr ds1_s15x3 -> let !tpl_s15Ej = Gui.Generic.Instances.Maybe.x3, !wild_s15Ei = ffi_wrapper3 jsToString ds1_s15x3 GHC.Prim.realWorld# in select wild_s15Ei (<{GHC.Tuple.(,)}> ds2_s15Eh ds3_s15x8 -> GHC.Ptr.Ptr ds3_s15x8)) Gui.Generic.Instances.Maybe.lvl10 =: <{GHC.Types.:}> Gui.Generic.Instances.Maybe.lvl <{GHC.Types.[]}> Gui.Generic.Instances.Maybe.lvl11 =: let !ds_s15Ep = Javascript.Base.Types.FakePtr Gui.Generic.Instances.Maybe.lvl10 in select ds_s15Ep (GHC.Ptr.Ptr ds1_s15xc -> let !wild_s15Eo = ffi_wrapper3 jsToString ds1_s15xc GHC.Prim.realWorld# in select wild_s15Eo (<{GHC.Tuple.(,)}> ds2_s15En ds3_s15xh -> GHC.Ptr.Ptr ds3_s15xh)) Gui.Generic.Instances.Maybe.x4 =: GHC.CString.unpackCString# "maybeButton" Gui.Generic.Instances.Maybe.lvl12 =: let !ds_s15Ev = Javascript.Base.Types.FakePtr Gui.Generic.Instances.Maybe.x4 in select ds_s15Ev (GHC.Ptr.Ptr ds1_s15xm -> let !tpl_s15Eu = Gui.Generic.Instances.Maybe.x4, !wild_s15Et = ffi_wrapper3 jsToString ds1_s15xm GHC.Prim.realWorld# in select wild_s15Et (<{GHC.Tuple.(,)}> ds2_s15Es ds3_s15xr -> GHC.Ptr.Ptr ds3_s15xr)) Gui.Generic.Instances.Maybe.lvl13 =: FRP.Fursuit.Signal.Pure Gui.Generic.Instances.Maybe.lvl5 Gui.Generic.Instances.Maybe.lvl14 =: FRP.Fursuit.Signal.Pure Gui.Generic.Instances.Maybe.handleSigs Gui.Generic.Instances.Maybe.lvl15 =: FRP.Fursuit.Signal.Pure <{GHC.Tuple.(,)}> Gui.Generic.Instances.Maybe.$w$ctoInput w_s15xz w1_s15xw w2_s15xx = Gui.Generic.Instances.Maybe.$w$ctoInput$10 (<{GHC.Base.>>=}> (Control.Monad.IO.Class.$p1MonadIO w1_s15xw)) (Gui.Generic.Instances.Maybe.$w$ctoInput$9 w1_s15xw w2_s15xx) (w_s15xz w1_s15xw (FRP.Fursuit.Signal.App Gui.Generic.Instances.Maybe.lvl13 w2_s15xx)) Gui.Generic.Instances.Maybe.$w$ctoInput$9 w1_s15xw w2_s15xx ds_s15xI = select ds_s15xI (<{GHC.Tuple.(,)}> a5_s15xM <{s'_s15Dl}> -> select a5_s15xM (Gui.Generic.Types.Input gs_s15yT inps_s15yO -> Control.Monad.Trans.State.Lazy.$w$cliftIO w1_s15xw (Gui.Generic.Instances.Maybe.$w$ctoInput$11 gs_s15yT inps_s15yO w2_s15xx) <{s'_s15Dl}>)) Gui.Generic.Instances.Maybe.$w$ctoInput$11 gs_s15yT inps_s15yO w2_s15xx s_s15xV = select Gui.Generic.Instances.Maybe.lvl6 (GHC.Ptr.Ptr ds2_s15xU -> let !wild2_s15Fc = ffi_wrapper3 _Javascript_JQuery_Basic_jQuery_ ds2_s15xU s_s15xV in select wild2_s15Fc (<{GHC.Tuple.(,)}> ds3_s15y5 ds4_s15y4 -> select Gui.Generic.Instances.Maybe.lvl7 (GHC.Ptr.Ptr ds6_s15y3 -> let !wild3_s15Fa = ffi_wrapper4 _Javascript_JQuery_Basic_addClass ds6_s15y3 ds4_s15y4 ds3_s15y5 in select wild3_s15Fa (<{GHC.Tuple.(,)}> ds7_s15ye ds8_s15Cg -> select Gui.Generic.Instances.Maybe.lvl8 (GHC.Ptr.Ptr ds10_s15yd -> let !wild4_s15F8 = ffi_wrapper3 _Javascript_JQuery_Basic_jQuery_ ds10_s15yd ds7_s15ye in select wild4_s15F8 (<{GHC.Tuple.(,)}> ds11_s15yo ds12_s15yn -> select Gui.Generic.Instances.Maybe.lvl9 (GHC.Ptr.Ptr ds14_s15ym -> let !wild5_s15F6 = ffi_wrapper4 _Javascript_JQuery_Basic_addClass ds14_s15ym ds12_s15yn ds11_s15yo in select wild5_s15F6 (<{GHC.Tuple.(,)}> ds15_s15yP ds16_s15yG -> let a112_s15yN = Gui.Generic.Instances.Maybe.$w$ctoInput$12 a112_s15yN ds16_s15yG, !ds17_s15Fo = a112_s15yN inps_s15yO ds15_s15yP in select ds17_s15Fo (<{GHC.Tuple.(,)}> ipv_s15yU ipv1_s15EZ -> let !ds18_s15Fn = FRP.Fursuit.Signal.compile1 gs_s15yT ipv_s15yU in select ds18_s15Fn (<{GHC.Tuple.(,)}> ipv2_s15yY ipv3_s15yZ -> let !ds19_s15Fm = ipv3_s15yZ ipv2_s15yY in select ds19_s15Fm (<{GHC.Tuple.(,)}> ipv4_s15zk ipv5_s15z4 -> let !mmb_s15zd = Gui.Generic.Instances.Maybe.$w$ctoInput$5 ipv5_s15z4, !initially1_s15zB = Gui.Generic.Instances.Maybe.$w$ctoInput$6 mmb_s15zd, !ds20_s15Fl = FRP.Fursuit.Pipe.emptyPipe1 ipv4_s15zk in select ds20_s15Fl (<{GHC.Tuple.(,)}> ipv6_s15zD ipv7_s15zo -> select ipv7_s15zo (<{GHC.Tuple.(,)}> ds21_s15zs ds22_s15Ct -> select ds21_s15zs (FRP.Fursuit.Signal.P ref_s15zx ds23_s15Ak ds24_s15An -> select ref_s15zx (GHC.STRef.STRef var#_s15zA -> let !s2#_s15zI = writeMutVar# var#_s15zA (Data.Maybe.Just initially1_s15zB) ipv6_s15zD in select Gui.Generic.Instances.Maybe.lvl11 (GHC.Ptr.Ptr ww_s15zH -> let !ds25_s15Fv = Gui.Base.Button.$wa1 ww_s15zH s2#_s15zI in select ds25_s15Fv (<{GHC.Tuple.(,)}> ipv8_s15zU ipv9_s15zO -> select Gui.Generic.Instances.Maybe.lvl12 (GHC.Ptr.Ptr ds27_s15zS -> select ipv9_s15zO (GHC.Ptr.Ptr ds29_s15zT -> let !wild9_s15Fs = ffi_wrapper4 _Javascript_JQuery_Basic_addClass ds27_s15zS ds29_s15zT ipv8_s15zU in select wild9_s15Fs (<{GHC.Tuple.(,)}> ds30_s15Bm ds31_s15AF -> let !ds32_s15FP = Javascript.Base.Types.FakePtr (Gui.Generic.Instances.Maybe.$w$ctoInput$13 ds16_s15yG ds23_s15Ak ds24_s15An ds31_s15AF var#_s15zA) in select ds32_s15FP (GHC.Ptr.Ptr ds33_s15Be -> select Javascript.JQuery.Events.click_evt (GHC.Ptr.Ptr ds35_s15Bk -> let !wild10_s15FN = ffi_wrapper3 makeCallback ds33_s15Be GHC.Prim.realWorld# in select wild10_s15FN (<{GHC.Tuple.(,)}> ds36_s15ET ds37_s15Bl -> let !wild11_s15FM = ffi_wrapper5 _Javascript_JQuery_Events_on_ ds35_s15Bk ds37_s15Bl ds31_s15AF ds30_s15Bm in select wild11_s15FM (<{GHC.Tuple.(,)}> ds38_s15CM ds39_s15EU -> select mmb_s15zd (Data.Maybe.Nothing -> Gui.Generic.Instances.Maybe.$w$ctoInput$3 ds16_s15yG ds22_s15Ct ds31_s15AF ds38_s15CM ds8_s15Cg gs_s15yT w2_s15xx GHC.Prim.realWorld#) (Data.Maybe.Just ds40_s15D2 -> select ds40_s15D2 (Data.Maybe.Nothing -> select Gui.Generic.Instances.Maybe.a (GHC.Ptr.Ptr ds42_s15D7 -> let !wild14_s15G3 = ffi_wrapper4 _Javascript_JQuery_Basic_setHtml ds42_s15D7 ds31_s15AF ds38_s15CM in select wild14_s15G3 (<{GHC.Tuple.(,)}> ds43_s15Dd ds44_s15EO -> let !wild15_s15G2 = ffi_wrapper3 _Javascript_JQuery_Basic_hide ds16_s15yG ds43_s15Dd in select wild15_s15G2 (<{GHC.Tuple.(,)}> ds45_s15Di ds46_s15EP -> Gui.Generic.Instances.Maybe.$w$ctoInput$1 ds16_s15yG ds22_s15Ct ds31_s15AF ds8_s15Cg gs_s15yT w2_s15xx ds45_s15Di)))) (Data.Maybe.Just ipv10_s15EN -> Gui.Generic.Instances.Maybe.$w$ctoInput$3 ds16_s15yG ds22_s15Ct ds31_s15AF ds38_s15CM ds8_s15Cg gs_s15yT w2_s15xx GHC.Prim.realWorld#)))))))))))))))))))))))))) Gui.Generic.Instances.Maybe.$w$ctoInput$12 a112_s15yN ds16_s15yG ds17_s15yw eta3_s15yy = select ds17_s15yw (<{GHC.Types.[]}> -> <{GHC.Tuple.(,)}> eta3_s15yy <{GHC.Tuple.()}>) (<{GHC.Types.:}> y_s15yB ys_s15yL -> select y_s15yB (GHC.Ptr.Ptr ds19_s15yF -> let !wild7_s15Fg = ffi_wrapper4 _Javascript_JQuery_Basic_appendJQuery ds19_s15yF ds16_s15yG eta3_s15yy in select wild7_s15Fg (<{GHC.Tuple.(,)}> ds20_s15yM ds21_s15EY -> a112_s15yN ys_s15yL ds20_s15yM))) Gui.Generic.Instances.Maybe.$w$ctoInput$13 ds16_s15yG ds23_s15Ak ds24_s15An ds31_s15AF var#_s15zA ds32_s15B7 eta_s15A5 = select Gui.Generic.Instances.Maybe.a2 (GHC.Ptr.Ptr ds34_s15A4 -> let !wild10_s15Fq = ffi_wrapper4 _Javascript_JQuery_Basic_isText ds34_s15A4 ds16_s15yG eta_s15A5 in select wild10_s15Fq (<{GHC.Tuple.(,)}> ds35_s15AG ds36_s15Ab -> let !ipv10_s15Af = GHC.List.and (<{GHC.Types.:}> (Gui.Generic.Instances.Maybe.$w$ctoInput$7 ds36_s15Ab) <{GHC.Types.[]}>) in if ipv10_s15Af (select Gui.Generic.Instances.Maybe.a (GHC.Ptr.Ptr ds38_s15AV -> let !wild12_s15FH = ffi_wrapper4 _Javascript_JQuery_Basic_setHtml ds38_s15AV ds31_s15AF ds35_s15AG in select wild12_s15FH (<{GHC.Tuple.(,)}> ds39_s15B1 ds40_s15EB -> let !wild13_s15FG = ffi_wrapper3 _Javascript_JQuery_Basic_hide ds16_s15yG ds39_s15B1 in select wild13_s15FG (<{GHC.Tuple.(,)}> ds41_s15B6 ds42_s15EC -> Gui.Generic.Instances.Maybe.$w$ctoInput$2 ds23_s15Ak ds24_s15An ipv10_s15Af var#_s15zA ds41_s15B6)))) (select Gui.Generic.Instances.Maybe.a1 (GHC.Ptr.Ptr ds38_s15AE -> let !wild12_s15FD = ffi_wrapper4 _Javascript_JQuery_Basic_setHtml ds38_s15AE ds31_s15AF ds35_s15AG in select wild12_s15FD (<{GHC.Tuple.(,)}> ds39_s15AM ds40_s15ED -> let !wild13_s15FC = ffi_wrapper3 _Javascript_JQuery_Basic_show ds16_s15yG ds39_s15AM in select wild13_s15FC (<{GHC.Tuple.(,)}> ds41_s15AR ds42_s15EE -> Gui.Generic.Instances.Maybe.$w$ctoInput$2 ds23_s15Ak ds24_s15An ipv10_s15Af var#_s15zA ds41_s15AR)))))) Gui.Generic.Instances.Maybe.$w$ctoInput$10 lvl16_s15xF lvl17_s15Dm m_s15xB eta_s15Do = lvl16_s15xF (m_s15xB eta_s15Do) lvl17_s15Dm Gui.Generic.Instances.Maybe.$w$ctoInput$5 ipv5_s15z4 = select ipv5_s15z4 (Data.Maybe.Nothing -> Data.Maybe.Nothing) (Data.Maybe.Just a4_s15z7 -> Data.Maybe.Just (Gui.Generic.Instances.Maybe.$w$ctoInput$8 a4_s15z7)) Gui.Generic.Instances.Maybe.$w$ctoInput$8 a4_s15z7 = select a4_s15z7 (<{GHC.Tuple.(,)}> x5_s15zb ds20_s15F2 -> x5_s15zb) Gui.Generic.Instances.Maybe.$w$ctoInput$6 mmb_s15zd = select mmb_s15zd (Data.Maybe.Nothing -> true) (Data.Maybe.Just ds20_s15zg -> select ds20_s15zg (Data.Maybe.Nothing -> false) (Data.Maybe.Just ipv6_s15F0 -> true)) Gui.Generic.Instances.Maybe.$w$ctoInput$7 ds36_s15Ab = select ds36_s15Ab (_ -> true) (0 -> false) Gui.Generic.Instances.Maybe.$w$ctoInput$1 ds16_s15yG ds22_s15Ct ds31_s15AF ds8_s15Cg gs_s15yT w2_s15xx ipv10_s15Cb = let !ds40_s15FX = FRP.Fursuit.Signal.removableSink1 (Gui.Generic.Instances.Maybe.$w$ctoInput$14 ds16_s15yG ds31_s15AF) w2_s15xx ipv10_s15Cb in select ds40_s15FX (<{GHC.Tuple.(,)}> ipv11_s15Ch ipv12_s15EK -> let !wild12_s15FW = ffi_wrapper4 _Javascript_JQuery_Basic_appendJQuery ds16_s15yG ds8_s15Cg ipv11_s15Ch in select wild12_s15FW (<{GHC.Tuple.(,)}> ds41_s15Cn ds42_s15EL -> let !wild13_s15FV = ffi_wrapper4 _Javascript_JQuery_Basic_appendJQuery ds31_s15AF ds8_s15Cg ds41_s15Cn in select wild13_s15FV (<{GHC.Tuple.(,)}> ds43_s15Cs ds44_s15EM -> <{GHC.Tuple.(,)}> ds43_s15Cs (Gui.Generic.Types.Input (FRP.Fursuit.Signal.App Gui.Generic.Instances.Maybe.lvl14 (FRP.Fursuit.Signal.App (FRP.Fursuit.Signal.App Gui.Generic.Instances.Maybe.lvl15 ds22_s15Ct) gs_s15yT)) (<{GHC.Types.:}> (GHC.Ptr.Ptr ds8_s15Cg) <{GHC.Types.[]}>))))) Gui.Generic.Instances.Maybe.$w$ctoInput$14 ds16_s15yG ds31_s15AF x5_s15BP eta_s15BB = select x5_s15BP (Data.Maybe.Nothing -> Gui.Generic.Instances.Maybe.$w$ctoInput$4 ds16_s15yG ds31_s15AF eta_s15BB GHC.Prim.realWorld#) (Data.Maybe.Just ds40_s15BS -> select ds40_s15BS (Data.Maybe.Nothing -> select Gui.Generic.Instances.Maybe.a (GHC.Ptr.Ptr ds42_s15BX -> let !wild14_s15FS = ffi_wrapper4 _Javascript_JQuery_Basic_setHtml ds42_s15BX ds31_s15AF eta_s15BB in select wild14_s15FS (<{GHC.Tuple.(,)}> ds43_s15C3 ds44_s15EG -> let !wild15_s15FR = ffi_wrapper3 _Javascript_JQuery_Basic_hide ds16_s15yG ds43_s15C3 in select wild15_s15FR (<{GHC.Tuple.(,)}> ds45_s15C8 ds46_s15EH -> <{GHC.Tuple.(,)}> ds45_s15C8 <{GHC.Tuple.()}>)))) (Data.Maybe.Just ipv11_s15EF -> Gui.Generic.Instances.Maybe.$w$ctoInput$4 ds16_s15yG ds31_s15AF eta_s15BB GHC.Prim.realWorld#)) Gui.Generic.Instances.Maybe.$w$ctoInput$4 ds16_s15yG ds31_s15AF eta_s15BB void_s15BN = select Gui.Generic.Instances.Maybe.a1 (GHC.Ptr.Ptr ds41_s15BA -> let !wild12_s15FK = ffi_wrapper4 _Javascript_JQuery_Basic_setHtml ds41_s15BA ds31_s15AF eta_s15BB in select wild12_s15FK (<{GHC.Tuple.(,)}> ds42_s15BH ds43_s15EV -> let !wild13_s15FJ = ffi_wrapper3 _Javascript_JQuery_Basic_show ds16_s15yG ds42_s15BH in select wild13_s15FJ (<{GHC.Tuple.(,)}> ds44_s15BM ds45_s15EW -> <{GHC.Tuple.(,)}> ds44_s15BM <{GHC.Tuple.()}>))) Gui.Generic.Instances.Maybe.$w$ctoInput$2 ds23_s15Ak ds24_s15An ipv10_s15Af var#_s15zA ipv11_s15As = if ipv10_s15Af (select ds23_s15Ak (GHC.STRef.STRef ww6_s15Ax -> select ds24_s15An (GHC.STRef.STRef ww8_s15Ay -> FRP.Fursuit.Pipe.$wa1 var#_s15zA ww6_s15Ax ww8_s15Ay false ipv11_s15As))) (select ds23_s15Ak (GHC.STRef.STRef ww6_s15Aq -> select ds24_s15An (GHC.STRef.STRef ww8_s15Ar -> FRP.Fursuit.Pipe.$wa1 var#_s15zA ww6_s15Aq ww8_s15Ar true ipv11_s15As))) Gui.Generic.Instances.Maybe.$w$ctoInput$3 ds16_s15yG ds22_s15Ct ds31_s15AF ds38_s15CM ds8_s15Cg gs_s15yT w2_s15xx void_s15CY = select Gui.Generic.Instances.Maybe.a1 (GHC.Ptr.Ptr ds41_s15CL -> let !wild12_s15FZ = ffi_wrapper4 _Javascript_JQuery_Basic_setHtml ds41_s15CL ds31_s15AF ds38_s15CM in select wild12_s15FZ (<{GHC.Tuple.(,)}> ds42_s15CS ds43_s15EQ -> let !wild13_s15FY = ffi_wrapper3 _Javascript_JQuery_Basic_show ds16_s15yG ds42_s15CS in select wild13_s15FY (<{GHC.Tuple.(,)}> ds44_s15CX ds45_s15ER -> Gui.Generic.Instances.Maybe.$w$ctoInput$1 ds16_s15yG ds22_s15Ct ds31_s15AF ds8_s15Cg gs_s15yT w2_s15xx ds44_s15CX))) Gui.Generic.Instances.Maybe.a3 w_s15Dz w1_s15Dw w2_s15Dx w3_s15Dy = Gui.Generic.Instances.Maybe.$w$ctoInput w1_s15Dw w2_s15Dx w3_s15Dy Gui.Generic.Instances.Maybe.$fToInputsMaybe_$ctoInput eta_B4_B4 eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.Generic.Instances.Maybe.a3 eta_B4_B4 eta_B3_B3 eta_B2_B2 eta_B1_B1 Gui.Generic.Instances.Maybe.$fToInputsMaybe eta_B2_B2 eta_B1_B1 = Gui.Generic.Instances.Maybe.$fToInputsMaybe_$ctoInput eta_B2_B2 eta_B1_B1