Gui.FRP.Dropdown.a =: Data.Typeable.Internal.typeOfDefault Javascript.Base.Types.$fTypeable1JSObject__$ctypeOf1 Javascript.Base.Types.$fTypeableJSString__$ctypeOf Gui.FRP.Dropdown.a1 =: Data.Typeable.Internal.typeOfDefault Data.Typeable.Internal.$fTypeable1Ptr_$ctypeOf1 Gui.FRP.Dropdown.a Gui.FRP.Dropdown.dropdown6 sigIn_sXRl sigListIn_sXRv eta_sXRm = let !ds1_sY0O = FRP.Fursuit.Signal.compile1 sigIn_sXRl eta_sXRm in select ds1_sY0O (<{GHC.Tuple.(,)}> ipv_sXRq ipv1_sXRr -> let !ds2_sY0N = ipv1_sXRr ipv_sXRq in select ds2_sY0N (<{GHC.Tuple.(,)}> ipv2_sXRw ipv3_sXRF -> let !ds3_sY0M = FRP.Fursuit.Signal.compile1 sigListIn_sXRv ipv2_sXRw in select ds3_sY0M (<{GHC.Tuple.(,)}> ipv4_sXRA ipv5_sXRB -> let !ds4_sY0L = ipv5_sXRB ipv4_sXRA in select ds4_sY0L (<{GHC.Tuple.(,)}> ipv6_sXRO ipv7_sXS9 -> let !initially1_sXS5 = Gui.FRP.Dropdown.dropdown6$1 ipv3_sXRF, !ds5_sY0K = FRP.Fursuit.Pipe.emptyPipe1 ipv6_sXRO in select ds5_sY0K (<{GHC.Tuple.(,)}> ipv8_sXS7 ipv9_sXRS -> select ipv9_sXRS (<{GHC.Tuple.(,)}> ds_sXRW ds6_sXUc -> select ds_sXRW (FRP.Fursuit.Signal.P ref_sXS1 ds7_sXSk ds8_sXSn -> select ref_sXS1 (GHC.STRef.STRef var#_sXS4 -> let !s2#_sXSv = writeMutVar# var#_sXS4 (Data.Maybe.Just initially1_sXS5) ipv8_sXS7, !ds9_sY0X = Gui.Base.Dropdown.dropdown5 Gui.FRP.Dropdown.a1 Javascript.Base.String.$fEqPtr (Gui.FRP.Dropdown.dropdown6$2 ipv7_sXS9) (Gui.FRP.Dropdown.dropdown6$8 ds7_sXSk ds8_sXSn var#_sXS4) s2#_sXSv in select ds9_sY0X (<{GHC.Tuple.(,)}> ipv10_sXSD ipv11_sXSz -> select ipv11_sXSz (GHC.Ptr.Ptr ww_sXSC -> let !ds10_sY0W = Gui.Base.Dropdown.$wa5 Javascript.Base.String.$fEqPtr Gui.FRP.Dropdown.a1 initially1_sXS5 ww_sXSC ipv10_sXSD in select ds10_sY0W (<{GHC.Tuple.(,)}> ipv12_sXT1 ipv13_sY0D -> let !ds11_sY14 = FRP.Fursuit.Signal.removableSink1 (Gui.FRP.Dropdown.dropdown6$9 ww_sXSC) sigIn_sXRl ipv12_sXT1 in select ds11_sY14 (<{GHC.Tuple.(,)}> ipv14_sXU7 ipv15_sY0x -> let !ds12_sY1c = FRP.Fursuit.Signal.removableSink1 (Gui.FRP.Dropdown.dropdown6$11 (Gui.FRP.Dropdown.dropdown6$10 sigIn_sXRl ww_sXSC) ipv11_sXSz) sigListIn_sXRv ipv14_sXU7 in select ds12_sY1c (<{GHC.Tuple.(,)}> ipv16_sXUb ipv17_sY0s -> <{GHC.Tuple.(,)}> ipv16_sXUb (<{GHC.Tuple.(,)}> ipv11_sXSz ds6_sXUc)))))))))))))) Gui.FRP.Dropdown.dropdown6$8 ds7_sXSk ds8_sXSn var#_sXS4 w1_sXSs w2_sXSt = select ds7_sXSk (GHC.STRef.STRef ww6_sXSq -> select ds8_sXSn (GHC.STRef.STRef ww8_sXSr -> FRP.Fursuit.Pipe.$wa1 var#_sXS4 ww6_sXSq ww8_sXSr w1_sXSs w2_sXSt)) Gui.FRP.Dropdown.dropdown6$9 ww_sXSC vs_sXSV eta1_sXSN = select Javascript.JQuery.Basic.hasFocus1 (GHC.Ptr.Ptr ds12_sXSM -> let !wild3_sY0U = ffi_wrapper4 _Javascript_JQuery_Basic_isText ds12_sXSM ww_sXSC eta1_sXSN in select wild3_sY0U (<{GHC.Tuple.(,)}> ds13_sXSU ds14_sXSS -> select ds14_sXSS (_ -> <{GHC.Tuple.(,)}> ds13_sXSU <{GHC.Tuple.()}>) (0 -> let !ds15_sY0Y = Gui.Base.Dropdown.$wa5 Javascript.Base.String.$fEqPtr Gui.FRP.Dropdown.a1 vs_sXSV ww_sXSC ds13_sXSU in select ds15_sY0Y (<{GHC.Tuple.(,)}> ipv14_sXSZ ipv15_sY0E -> <{GHC.Tuple.(,)}> ipv14_sXSZ <{GHC.Tuple.()}>)))) Gui.FRP.Dropdown.dropdown6$10 sigIn_sXRl ww_sXSC s_sXT7 = let !ds12_sY13 = FRP.Fursuit.Signal.compile1 sigIn_sXRl s_sXT7 in select ds12_sY13 (<{GHC.Tuple.(,)}> ipv16_sXTb ipv17_sXTc -> let !ds13_sY12 = ipv17_sXTc ipv16_sXTb in select ds13_sY12 (<{GHC.Tuple.(,)}> ipv18_sXTk ipv19_sXTs -> select Javascript.JQuery.Basic.hasFocus1 (GHC.Ptr.Ptr ds15_sXTj -> let !wild3_sY10 = ffi_wrapper4 _Javascript_JQuery_Basic_isText ds15_sXTj ww_sXSC ipv18_sXTk in select wild3_sY10 (<{GHC.Tuple.(,)}> ds16_sXTr ds17_sXTp -> select ds17_sXTp (_ -> <{GHC.Tuple.(,)}> ds16_sXTr <{GHC.Tuple.()}>) (0 -> let !ds18_sY17 = Gui.Base.Dropdown.$wa5 Javascript.Base.String.$fEqPtr Gui.FRP.Dropdown.a1 (Gui.FRP.Dropdown.dropdown6$3 ipv19_sXTs) ww_sXSC ds16_sXTr in select ds18_sY17 (<{GHC.Tuple.(,)}> ipv20_sXTE ipv21_sY0z -> <{GHC.Tuple.(,)}> ipv20_sXTE <{GHC.Tuple.()}>)))))) Gui.FRP.Dropdown.dropdown6$11 a2_sXTF ipv11_sXSz l_sXTK s_sXTM = let !ds12_sY1b = Gui.Base.Dropdown.$wa6 Javascript.Base.String.$fEqPtr Gui.FRP.Dropdown.a1 Gui.Base.Dropdown.dropdownManip2 Gui.Base.Dropdown.allOptions1 l_sXTK ipv11_sXSz s_sXTM in select ds12_sY1b (<{GHC.Tuple.(,)}> ipv16_sXU0 ipv17_sY0t -> select (Javascript.Base.Types.FakePtr a2_sXTF) (GHC.Ptr.Ptr ds14_sXTT -> let !wild3_sY19 = ffi_wrapper3 makeCallback ds14_sXTT GHC.Prim.realWorld# in select wild3_sY19 (<{GHC.Tuple.(,)}> ds15_sY0u ds16_sXTZ -> let !wild4_sY18 = ffi_wrapper4 _Javascript_Utils_setTimeout_ 0 ds16_sXTZ ipv16_sXU0 in select wild4_sY18 (<{GHC.Tuple.(,)}> ds17_sXU5 ds18_sY0v -> <{GHC.Tuple.(,)}> ds17_sXU5 <{GHC.Tuple.()}>)))) Gui.FRP.Dropdown.dropdown6$1 ipv3_sXRF = select ipv3_sXRF (Data.Maybe.Nothing -> <{GHC.Types.[]}>) (Data.Maybe.Just a2_sXRI -> select a2_sXRI (<{GHC.Tuple.(,)}> x_sXRM ds5_sY1e -> x_sXRM)) Gui.FRP.Dropdown.dropdown6$2 ipv7_sXS9 = select ipv7_sXS9 (Data.Maybe.Nothing -> <{GHC.Types.[]}>) (Data.Maybe.Just a2_sXSc -> select a2_sXSc (<{GHC.Tuple.(,)}> x_sXSg ds9_sY0F -> x_sXSg)) Gui.FRP.Dropdown.dropdown6$3 ipv19_sXTs = select ipv19_sXTs (Data.Maybe.Nothing -> <{GHC.Types.[]}>) (Data.Maybe.Just a3_sXTv -> select a3_sXTv (<{GHC.Tuple.(,)}> x_sXTz ds18_sY0A -> x_sXTz)) Gui.FRP.Dropdown.dropdown12 $dEq_sXV8 $dTypeable_sXV7 sigIn_sXUj sigListIn_sXUt eta_sXUk = let !ds1_sY27 = FRP.Fursuit.Signal.compile1 sigIn_sXUj eta_sXUk in select ds1_sY27 (<{GHC.Tuple.(,)}> ipv_sXUo ipv1_sXUp -> let !ds2_sY26 = ipv1_sXUp ipv_sXUo in select ds2_sY26 (<{GHC.Tuple.(,)}> ipv2_sXUu ipv3_sXUD -> let !ds3_sY25 = FRP.Fursuit.Signal.compile1 sigListIn_sXUt ipv2_sXUu in select ds3_sY25 (<{GHC.Tuple.(,)}> ipv4_sXUy ipv5_sXUz -> let !ds4_sY24 = ipv5_sXUz ipv4_sXUy in select ds4_sY24 (<{GHC.Tuple.(,)}> ipv6_sXUM ipv7_sXV9 -> let !initially1_sXV3 = Gui.FRP.Dropdown.dropdown12$4 ipv3_sXUD, !ds5_sY23 = FRP.Fursuit.Pipe.emptyPipe1 ipv6_sXUM in select ds5_sY23 (<{GHC.Tuple.(,)}> ipv8_sXV5 ipv9_sXUQ -> select ipv9_sXUQ (<{GHC.Tuple.(,)}> ds_sXUU ds6_sXXr -> select ds_sXUU (FRP.Fursuit.Signal.P ref_sXUZ ds7_sXVk ds8_sXVn -> select ref_sXUZ (GHC.STRef.STRef var#_sXV2 -> let !s2#_sXVv = writeMutVar# var#_sXV2 (Data.Maybe.Just initially1_sXV3) ipv8_sXV5, !ds9_sY2g = Gui.Base.Dropdown.dropdown5 $dTypeable_sXV7 $dEq_sXV8 (Gui.FRP.Dropdown.dropdown12$5 ipv7_sXV9) (Gui.FRP.Dropdown.dropdown12$12 ds7_sXVk ds8_sXVn var#_sXV2) s2#_sXVv in select ds9_sY2g (<{GHC.Tuple.(,)}> ipv10_sXVD ipv11_sXVz -> select ipv11_sXVz (GHC.Ptr.Ptr ww_sXVC -> let !ds10_sY2f = Gui.Base.Dropdown.$wa5 $dEq_sXV8 $dTypeable_sXV7 initially1_sXV3 ww_sXVC ipv10_sXVD in select ds10_sY2f (<{GHC.Tuple.(,)}> ipv12_sXW1 ipv13_sY1W -> let !ds11_sY2n = FRP.Fursuit.Signal.removableSink1 (Gui.FRP.Dropdown.dropdown12$13 $dEq_sXV8 $dTypeable_sXV7 ww_sXVC) sigIn_sXUj ipv12_sXW1 in select ds11_sY2n (<{GHC.Tuple.(,)}> ipv14_sXXm ipv15_sY1Q -> let !ds12_sY2x = FRP.Fursuit.Signal.removableSink1 (Gui.FRP.Dropdown.dropdown12$15 $dEq_sXV8 $dTypeable_sXV7 (Gui.FRP.Dropdown.dropdown12$14 $dEq_sXV8 $dTypeable_sXV7 sigIn_sXUj ww_sXVC) ipv11_sXVz (Gui.FRP.Dropdown.dropdown12$16 $dTypeable_sXV7)) sigListIn_sXUt ipv14_sXXm in select ds12_sY2x (<{GHC.Tuple.(,)}> ipv16_sXXq ipv17_sY1K -> <{GHC.Tuple.(,)}> ipv16_sXXq (<{GHC.Tuple.(,)}> ipv11_sXVz ds6_sXXr)))))))))))))) Gui.FRP.Dropdown.dropdown12$16 $dTypeable_sXV7 = let !ww1_sY2r = Gui.Base.Dropdown.$wdropdownManip $dTypeable_sXV7 in select ww1_sY2r (<{GHC.Tuple.(,,)}> ww2_sXWN ww3_sXWO ww4_sXWP -> Gui.Base.Dropdown.ListManip ww2_sXWN ww3_sXWO ww4_sXWP) Gui.FRP.Dropdown.dropdown12$12 ds7_sXVk ds8_sXVn var#_sXV2 w1_sXVs w2_sXVt = select ds7_sXVk (GHC.STRef.STRef ww6_sXVq -> select ds8_sXVn (GHC.STRef.STRef ww8_sXVr -> FRP.Fursuit.Pipe.$wa1 var#_sXV2 ww6_sXVq ww8_sXVr w1_sXVs w2_sXVt)) Gui.FRP.Dropdown.dropdown12$13 $dEq_sXV8 $dTypeable_sXV7 ww_sXVC vs_sXVV eta1_sXVN = select Javascript.JQuery.Basic.hasFocus1 (GHC.Ptr.Ptr ds12_sXVM -> let !wild3_sY2d = ffi_wrapper4 _Javascript_JQuery_Basic_isText ds12_sXVM ww_sXVC eta1_sXVN in select wild3_sY2d (<{GHC.Tuple.(,)}> ds13_sXVU ds14_sXVS -> select ds14_sXVS (_ -> <{GHC.Tuple.(,)}> ds13_sXVU <{GHC.Tuple.()}>) (0 -> let !ds15_sY2h = Gui.Base.Dropdown.$wa5 $dEq_sXV8 $dTypeable_sXV7 vs_sXVV ww_sXVC ds13_sXVU in select ds15_sY2h (<{GHC.Tuple.(,)}> ipv14_sXVZ ipv15_sY1X -> <{GHC.Tuple.(,)}> ipv14_sXVZ <{GHC.Tuple.()}>)))) Gui.FRP.Dropdown.dropdown12$14 $dEq_sXV8 $dTypeable_sXV7 sigIn_sXUj ww_sXVC s_sXW7 = let !ds12_sY2m = FRP.Fursuit.Signal.compile1 sigIn_sXUj s_sXW7 in select ds12_sY2m (<{GHC.Tuple.(,)}> ipv16_sXWb ipv17_sXWc -> let !ds13_sY2l = ipv17_sXWc ipv16_sXWb in select ds13_sY2l (<{GHC.Tuple.(,)}> ipv18_sXWk ipv19_sXWs -> select Javascript.JQuery.Basic.hasFocus1 (GHC.Ptr.Ptr ds15_sXWj -> let !wild3_sY2j = ffi_wrapper4 _Javascript_JQuery_Basic_isText ds15_sXWj ww_sXVC ipv18_sXWk in select wild3_sY2j (<{GHC.Tuple.(,)}> ds16_sXWr ds17_sXWp -> select ds17_sXWp (_ -> <{GHC.Tuple.(,)}> ds16_sXWr <{GHC.Tuple.()}>) (0 -> let !ds18_sY2q = Gui.Base.Dropdown.$wa5 $dEq_sXV8 $dTypeable_sXV7 (Gui.FRP.Dropdown.dropdown12$6 ipv19_sXWs) ww_sXVC ds16_sXWr in select ds18_sY2q (<{GHC.Tuple.(,)}> ipv20_sXWE ipv21_sY1S -> <{GHC.Tuple.(,)}> ipv20_sXWE <{GHC.Tuple.()}>)))))) Gui.FRP.Dropdown.dropdown12$15 $dEq_sXV8 $dTypeable_sXV7 a2_sXWF ipv11_sXVz lm_sXWQ l_sXWZ s_sXX1 = select lm_sXWQ (Gui.Base.Dropdown.ListManip ww1_sY1L ww2_sXWX ww3_sXWY -> let !ds12_sY2v = Gui.Base.Dropdown.$wa6 $dEq_sXV8 $dTypeable_sXV7 ww2_sXWX ww3_sXWY l_sXWZ ipv11_sXVz s_sXX1 in select ds12_sY2v (<{GHC.Tuple.(,)}> ipv16_sXXf ipv17_sY1M -> select (Javascript.Base.Types.FakePtr a2_sXWF) (GHC.Ptr.Ptr ds14_sXX8 -> let !wild3_sY2t = ffi_wrapper3 makeCallback ds14_sXX8 GHC.Prim.realWorld# in select wild3_sY2t (<{GHC.Tuple.(,)}> ds15_sY1N ds16_sXXe -> let !wild4_sY2s = ffi_wrapper4 _Javascript_Utils_setTimeout_ 0 ds16_sXXe ipv16_sXXf in select wild4_sY2s (<{GHC.Tuple.(,)}> ds17_sXXk ds18_sY1O -> <{GHC.Tuple.(,)}> ds17_sXXk <{GHC.Tuple.()}>))))) Gui.FRP.Dropdown.dropdown12$4 ipv3_sXUD = select ipv3_sXUD (Data.Maybe.Nothing -> <{GHC.Types.[]}>) (Data.Maybe.Just a2_sXUG -> select a2_sXUG (<{GHC.Tuple.(,)}> x_sXUK ds5_sY2z -> x_sXUK)) Gui.FRP.Dropdown.dropdown12$5 ipv7_sXV9 = select ipv7_sXV9 (Data.Maybe.Nothing -> <{GHC.Types.[]}>) (Data.Maybe.Just a2_sXVc -> select a2_sXVc (<{GHC.Tuple.(,)}> x_sXVg ds9_sY1Y -> x_sXVg)) Gui.FRP.Dropdown.dropdown12$6 ipv19_sXWs = select ipv19_sXWs (Data.Maybe.Nothing -> <{GHC.Types.[]}>) (Data.Maybe.Just a3_sXWv -> select a3_sXWv (<{GHC.Tuple.(,)}> x_sXWz ds18_sY1T -> x_sXWz)) Gui.FRP.Dropdown.dropdownMulti1 sigIn_sXXw sigListIn_sXXx s_sXXy = let !ds1_sY2I = Gui.FRP.Dropdown.dropdown6 sigIn_sXXw sigListIn_sXXx s_sXXy in select ds1_sY2I (<{GHC.Tuple.(,)}> ipv_sXXR ipv1_sXXC -> select ipv1_sXXC (<{GHC.Tuple.(,)}> inp_sXXK ds_sY2H -> select Gui.Base.Dropdown.dropdownMulti3 (GHC.Ptr.Ptr ds4_sXXO -> select Gui.Base.Dropdown.dropdownMulti2 (GHC.Ptr.Ptr ds6_sXXP -> select inp_sXXK (GHC.Ptr.Ptr ds8_sXXQ -> let !wild1_sY2D = ffi_wrapper5 _Javascript_JQuery_Basic_jq_setProp ds4_sXXO ds6_sXXP ds8_sXXQ ipv_sXXR in select wild1_sY2D (<{GHC.Tuple.(,)}> ds10_sXXW ds11_sY2C -> <{GHC.Tuple.(,)}> ds10_sXXW ipv1_sXXC)))))) Gui.FRP.Dropdown.dropdownMulti_$sdropdownMulti eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.FRP.Dropdown.dropdownMulti1 eta_B3_B3 eta_B2_B2 eta_B1_B1 Gui.FRP.Dropdown.$wa ww_sXY8 ww1_sXYg w_sXY9 = select Gui.Base.Dropdown.dropdownMulti3 (GHC.Ptr.Ptr ds4_sXY6 -> select Gui.Base.Dropdown.dropdownMulti2 (GHC.Ptr.Ptr ds6_sXY7 -> let !wild_sY2N = ffi_wrapper5 _Javascript_JQuery_Basic_jq_setProp ds4_sXY6 ds6_sXY7 ww_sXY8 w_sXY9 in select wild_sY2N (<{GHC.Tuple.(,)}> ds10_sXYe ds11_sY2M -> <{GHC.Tuple.(,)}> ds10_sXYe (<{GHC.Tuple.(,)}> (GHC.Ptr.Ptr ww_sXY8) ww1_sXYg)))) Gui.FRP.Dropdown.dropdownMulti3 w_sXYl w1_sXYu = select w_sXYl (<{GHC.Tuple.(,)}> ww_sXYp ww1_sXYt -> select ww_sXYp (GHC.Ptr.Ptr ww3_sXYs -> Gui.FRP.Dropdown.$wa ww3_sXYs ww1_sXYt w1_sXYu)) Gui.FRP.Dropdown.dropdownMulti2 $dEq_sXYA $dTypeable_sXYB sigIn_sXYC sigListIn_sXYD s_sXYE = let !ds1_sY2U = Gui.FRP.Dropdown.dropdown12 $dEq_sXYA $dTypeable_sXYB sigIn_sXYC sigListIn_sXYD s_sXYE in select ds1_sY2U (<{GHC.Tuple.(,)}> ipv_sXYJ ipv1_sXYI -> Gui.FRP.Dropdown.dropdownMulti3 ipv1_sXYI ipv_sXYJ) Gui.FRP.Dropdown.dropdownMulti eta_B5_B5 eta_B4_B4 eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.FRP.Dropdown.dropdownMulti2 eta_B5_B5 eta_B4_B4 eta_B3_B3 eta_B2_B2 eta_B1_B1 Gui.FRP.Dropdown.dropdown3 ds_sXYL = select ds_sXYL (<{GHC.Types.[]}> -> Data.Maybe.Nothing) (<{GHC.Types.:}> a2_sXYP ds1_sY2Y -> Data.Maybe.Just a2_sXYP) Gui.FRP.Dropdown.dropdown5 ds1_sXYR = select ds1_sXYR (Data.Maybe.Nothing -> <{GHC.Types.[]}>) (Data.Maybe.Just x_sXYU -> <{GHC.Types.:}> x_sXYU <{GHC.Types.[]}>) Gui.FRP.Dropdown.dropdown2 =: FRP.Fursuit.Signal.Pure Gui.FRP.Dropdown.dropdown3 Gui.FRP.Dropdown.dropdown4 =: FRP.Fursuit.Signal.Pure Gui.FRP.Dropdown.dropdown5 Gui.FRP.Dropdown.dropdown1 sigIn_sXYY sigListIn_sXZ0 s_sXZ1 = let !ds_sY38 = Gui.FRP.Dropdown.dropdown6 (FRP.Fursuit.Signal.App Gui.FRP.Dropdown.dropdown4 sigIn_sXYY) sigListIn_sXZ0 s_sXZ1 in select ds_sY38 (<{GHC.Tuple.(,)}> ipv_sXZ5 ipv1_sXZ6 -> <{GHC.Tuple.(,)}> ipv_sXZ5 (Gui.FRP.Dropdown.dropdown1$7 ipv1_sXZ6)) Gui.FRP.Dropdown.dropdown1$7 ipv1_sXZ6 = select ipv1_sXZ6 (<{GHC.Tuple.(,)}> a2_sXZa b_sXZb -> <{GHC.Tuple.(,)}> a2_sXZa (FRP.Fursuit.Signal.App FRP.Fursuit.filterMapS1 (FRP.Fursuit.Signal.Filter Data.Maybe.isJust (FRP.Fursuit.Signal.App Gui.FRP.Dropdown.dropdown2 b_sXZb)))) Gui.FRP.Dropdown.dropdown_$sdropdown eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.FRP.Dropdown.dropdown1 eta_B3_B3 eta_B2_B2 eta_B1_B1 Gui.FRP.Dropdown.dropdown9 ds_sXZj = select ds_sXZj (<{GHC.Types.[]}> -> Data.Maybe.Nothing) (<{GHC.Types.:}> a2_sXZn ds1_sY3c -> Data.Maybe.Just a2_sXZn) Gui.FRP.Dropdown.lvl =: FRP.Fursuit.Signal.Pure Gui.FRP.Dropdown.dropdown9 Gui.FRP.Dropdown.dropdown8 ds_sXZp = select ds_sXZp (<{GHC.Tuple.(,)}> a2_sXZt b_sXZu -> <{GHC.Tuple.(,)}> a2_sXZt (FRP.Fursuit.Signal.App FRP.Fursuit.filterMapS1 (FRP.Fursuit.Signal.Filter Data.Maybe.isJust (FRP.Fursuit.Signal.App Gui.FRP.Dropdown.lvl b_sXZu)))) Gui.FRP.Dropdown.dropdown11 ds1_sXZB = select ds1_sXZB (Data.Maybe.Nothing -> <{GHC.Types.[]}>) (Data.Maybe.Just x_sXZE -> <{GHC.Types.:}> x_sXZE <{GHC.Types.[]}>) Gui.FRP.Dropdown.dropdown10 =: FRP.Fursuit.Signal.Pure Gui.FRP.Dropdown.dropdown11 Gui.FRP.Dropdown.dropdown7 $dEq_sXZK $dTypeable_sXZL sigIn_sXZM sigListIn_sXZO s_sXZP = let !ds_sY3n = Gui.FRP.Dropdown.dropdown12 $dEq_sXZK $dTypeable_sXZL (FRP.Fursuit.Signal.App Gui.FRP.Dropdown.dropdown10 sigIn_sXZM) sigListIn_sXZO s_sXZP in select ds_sY3n (<{GHC.Tuple.(,)}> ipv_sXZT ipv1_sXZU -> <{GHC.Tuple.(,)}> ipv_sXZT (Gui.FRP.Dropdown.dropdown8 ipv1_sXZU)) Gui.FRP.Dropdown.dropdown eta_B5_B5 eta_B4_B4 eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.FRP.Dropdown.dropdown7 eta_B5_B5 eta_B4_B4 eta_B3_B3 eta_B2_B2 eta_B1_B1 Gui.FRP.Dropdown.stringDropdown4 a2_sXZX = <{GHC.Tuple.(,)}> a2_sXZX a2_sXZX Gui.FRP.Dropdown.stringDropdown3 eta_B1_B1 = GHC.Base.map Gui.FRP.Dropdown.stringDropdown4 eta_B1_B1 Gui.FRP.Dropdown.stringDropdown5 =: FRP.Fursuit.Signal.Pure Gui.FRP.Dropdown.dropdown11 Gui.FRP.Dropdown.stringDropdown2 =: FRP.Fursuit.Signal.Pure Gui.FRP.Dropdown.stringDropdown3 Gui.FRP.Dropdown.stringDropdown1 sigIn_sY01 sigListIn_sY03 s_sY05 = let !ds_sY3x = Gui.FRP.Dropdown.dropdown6 (FRP.Fursuit.Signal.App Gui.FRP.Dropdown.stringDropdown5 sigIn_sY01) (FRP.Fursuit.Signal.App Gui.FRP.Dropdown.stringDropdown2 sigListIn_sY03) s_sY05 in select ds_sY3x (<{GHC.Tuple.(,)}> ipv_sY09 ipv1_sY0a -> <{GHC.Tuple.(,)}> ipv_sY09 (Gui.FRP.Dropdown.dropdown8 ipv1_sY0a)) Gui.FRP.Dropdown.stringDropdown eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.FRP.Dropdown.stringDropdown1 eta_B3_B3 eta_B2_B2 eta_B1_B1 Gui.FRP.Dropdown.stringDropdownMulti4 eta_B1_B1 = Gui.FRP.Dropdown.stringDropdown4 eta_B1_B1 Gui.FRP.Dropdown.stringDropdownMulti3 eta_B1_B1 = GHC.Base.map Gui.FRP.Dropdown.stringDropdownMulti4 eta_B1_B1 Gui.FRP.Dropdown.stringDropdownMulti2 =: FRP.Fursuit.Signal.Pure Gui.FRP.Dropdown.stringDropdownMulti3 Gui.FRP.Dropdown.stringDropdownMulti1 sigIn_sY0f sigListIn_sY0g s_sY0i = let !ds1_sY3E = Gui.FRP.Dropdown.dropdown6 sigIn_sY0f (FRP.Fursuit.Signal.App Gui.FRP.Dropdown.stringDropdownMulti2 sigListIn_sY0g) s_sY0i in select ds1_sY3E (<{GHC.Tuple.(,)}> ipv_sY0n ipv1_sY0m -> Gui.FRP.Dropdown.dropdownMulti3 ipv1_sY0m ipv_sY0n) Gui.FRP.Dropdown.stringDropdownMulti eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.FRP.Dropdown.stringDropdownMulti1 eta_B3_B3 eta_B2_B2 eta_B1_B1