:: Gui.Base.Dropdown.ListManip = Gui.Base.Dropdown.ListManip a1 a2 a3 Gui.Base.Dropdown.dropdownMulti_x =: GHC.CString.unpackCString# "multiple" Gui.Base.Dropdown.dropdownMulti3 =: let !ds_sUBd = Javascript.Base.Types.FakePtr Gui.Base.Dropdown.dropdownMulti_x in select ds_sUBd (GHC.Ptr.Ptr ds1_sU8q -> let !tpl_sUBc = Gui.Base.Dropdown.dropdownMulti_x, !wild_sUBb = ffi_wrapper3 jsToString ds1_sU8q GHC.Prim.realWorld# in select wild_sUBb (<{GHC.Tuple.(,)}> ds2_sUBa ds3_sU8v -> GHC.Ptr.Ptr ds3_sU8v)) Gui.Base.Dropdown.dropdownMulti2 =: let !ds_sUBo = Javascript.Base.Types.FakePtr Gui.Base.Dropdown.dropdownMulti_x in select ds_sUBo (GHC.Ptr.Ptr ds1_sU8A -> let !tpl_sUBn = Gui.Base.Dropdown.dropdownMulti_x, !wild_sUBm = ffi_wrapper3 jsToString ds1_sU8A GHC.Prim.realWorld# in select wild_sUBm (<{GHC.Tuple.(,)}> ds2_sUBl ds3_sU8F -> GHC.Ptr.Ptr ds3_sU8F)) Gui.Base.Dropdown.mkMultiple eta_B2_B2 eta_B1_B1 = Javascript.JQuery.Basic.jq_setProp Gui.Base.Dropdown.dropdownMulti3 Gui.Base.Dropdown.dropdownMulti2 eta_B2_B2 eta_B1_B1 Gui.Base.Dropdown.getItems ds_sU8H = select ds_sU8H (Gui.Base.Dropdown.ListManip ds1_sUBr ds2_sUBs ds3_sU8M -> ds3_sU8M) Gui.Base.Dropdown.createItem ds_sU8O = select ds_sU8O (Gui.Base.Dropdown.ListManip ds1_sUBv ds2_sU8T ds3_sUBw -> ds2_sU8T) Gui.Base.Dropdown.createContainer ds_sU8V = select ds_sU8V (Gui.Base.Dropdown.ListManip ds1_sU90 ds2_sUBz ds3_sUBA -> ds1_sU90) Gui.Base.Dropdown.dropdown4 =: Data.Typeable.Internal.typeOfDefault Javascript.Base.Types.$fTypeable1JSObject__$ctypeOf1 Javascript.Base.Types.$fTypeableJSString__$ctypeOf Gui.Base.Dropdown.dropdown3 =: Data.Typeable.Internal.typeOfDefault Data.Typeable.Internal.$fTypeable1Ptr_$ctypeOf1 Gui.Base.Dropdown.dropdown4 Gui.Base.Dropdown.allValues_x =: GHC.CString.unpackCString# "val" Gui.Base.Dropdown.key =: let !ds_sUBJ = Javascript.Base.Types.FakePtr Gui.Base.Dropdown.allValues_x in select ds_sUBJ (GHC.Ptr.Ptr ds1_sU95 -> let !tpl_sUBI = Gui.Base.Dropdown.allValues_x, !wild_sUBH = ffi_wrapper3 jsToString ds1_sU95 GHC.Prim.realWorld# in select wild_sUBH (<{GHC.Tuple.(,)}> ds2_sUBG ds3_sU9a -> GHC.Ptr.Ptr ds3_sU9a)) Gui.Base.Dropdown.dropdownSize_x =: GHC.CString.unpackCString# "size" Gui.Base.Dropdown.dropdownSize_t =: let !ds_sUBP = Javascript.Base.Types.FakePtr Gui.Base.Dropdown.dropdownSize_x in select ds_sUBP (GHC.Ptr.Ptr ds1_sU9f -> let !tpl_sUBO = Gui.Base.Dropdown.dropdownSize_x, !wild_sUBN = ffi_wrapper3 jsToString ds1_sU9f GHC.Prim.realWorld# in select wild_sUBN (<{GHC.Tuple.(,)}> ds2_sUBM ds3_sU9k -> GHC.Ptr.Ptr ds3_sU9k)) Gui.Base.Dropdown.dropdownSize1 eta_sU9q eta1_sU9t eta2_sU9A = select Gui.Base.Dropdown.dropdownSize_t (GHC.Ptr.Ptr ds4_sU9x -> select eta_sU9q (GHC.Ptr.Ptr ds6_sU9y -> select eta1_sU9t (GHC.Ptr.Ptr ds8_sU9z -> let !wild_sUBS = ffi_wrapper5 _Javascript_JQuery_Basic_jq_setProp ds4_sU9x ds6_sU9y ds8_sU9z eta2_sU9A in select wild_sUBS (<{GHC.Tuple.(,)}> ds10_sU9F ds11_sU9G -> <{GHC.Tuple.(,)}> ds10_sU9F (GHC.Ptr.Ptr ds11_sU9G))))) Gui.Base.Dropdown.dropdownSize eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.Base.Dropdown.dropdownSize1 eta_B3_B3 eta_B2_B2 eta_B1_B1 Gui.Base.Dropdown.x =: GHC.CString.unpackCString# "selected" Gui.Base.Dropdown.lvl =: let !ds_sUC2 = Javascript.Base.Types.FakePtr Gui.Base.Dropdown.x in select ds_sUC2 (GHC.Ptr.Ptr ds1_sU9M -> let !tpl_sUC1 = Gui.Base.Dropdown.x, !wild_sUC0 = ffi_wrapper3 jsToString ds1_sU9M GHC.Prim.realWorld# in select wild_sUC0 (<{GHC.Tuple.(,)}> ds2_sUBZ ds3_sU9R -> GHC.Ptr.Ptr ds3_sU9R)) Gui.Base.Dropdown.lvl1 =: let !ds_sUC7 = Javascript.Base.Types.FakePtr Gui.Base.Dropdown.x in select ds_sUC7 (GHC.Ptr.Ptr ds1_sU9W -> let !tpl_sUC6 = Gui.Base.Dropdown.x, !wild_sUC5 = ffi_wrapper3 jsToString ds1_sU9W GHC.Prim.realWorld# in select wild_sUC5 (<{GHC.Tuple.(,)}> ds2_sUC4 ds3_sUa1 -> GHC.Ptr.Ptr ds3_sUa1)) Gui.Base.Dropdown.x1 =: GHC.CString.unpackCString# "true" Gui.Base.Dropdown.lvl2 =: let !ds_sUCd = Javascript.Base.Types.FakePtr Gui.Base.Dropdown.x1 in select ds_sUCd (GHC.Ptr.Ptr ds1_sUa6 -> let !tpl_sUCc = Gui.Base.Dropdown.x1, !wild_sUCb = ffi_wrapper3 jsToString ds1_sUa6 GHC.Prim.realWorld# in select wild_sUCb (<{GHC.Tuple.(,)}> ds2_sUCa ds3_sUab -> GHC.Ptr.Ptr ds3_sUab)) Gui.Base.Dropdown.dropdown_x4 =: GHC.CString.unpackCString# "