Gui.Generic.Utils.defElems_x1 =: GHC.CString.unpackCString# "<label />"
Gui.Generic.Utils.defElems3 =: let !ds_sQOx = Javascript.Base.Types.FakePtr Gui.Generic.Utils.defElems_x1 in select ds_sQOx (GHC.Ptr.Ptr ds1_sQKD -> let !tpl_sQOw = Gui.Generic.Utils.defElems_x1, !wild_sQOv = ffi_wrapper3 jsToString ds1_sQKD GHC.Prim.realWorld# in select wild_sQOv (<{GHC.Tuple.(,)}> ds2_sQOu ds3_sQKI -> GHC.Ptr.Ptr ds3_sQKI))
Gui.Generic.Utils.defElems_x =: GHC.CString.unpackCString# "label"
Gui.Generic.Utils.defElems2 =: let !ds_sQOJ = Javascript.Base.Types.FakePtr Gui.Generic.Utils.defElems_x in select ds_sQOJ (GHC.Ptr.Ptr ds1_sQKN -> let !tpl_sQOI = Gui.Generic.Utils.defElems_x, !wild_sQOH = ffi_wrapper3 jsToString ds1_sQKN GHC.Prim.realWorld# in select wild_sQOH (<{GHC.Tuple.(,)}> ds2_sQOG ds3_sQKS -> GHC.Ptr.Ptr ds3_sQKS))
Gui.Generic.Utils.defElems1 ds_sQKW ds1_sQLA eta_sQKY = select ds_sQKW (Data.Maybe.Nothing  -> <{GHC.Tuple.(,)}> eta_sQKY <{GHC.Tuple.()}>) (Data.Maybe.Just ips_sQLi -> select Gui.Generic.Utils.defElems3 (GHC.Ptr.Ptr ds3_sQL3 -> let !wild1_sQOY = ffi_wrapper3 _Javascript_JQuery_Basic_jQuery_ ds3_sQL3 eta_sQKY in select wild1_sQOY (<{GHC.Tuple.(,)}> ds4_sQLd ds5_sQLc -> select Gui.Generic.Utils.defElems2 (GHC.Ptr.Ptr ds7_sQLb -> let !wild2_sQOW = ffi_wrapper4 _Javascript_JQuery_Basic_addClass ds7_sQLb ds5_sQLc ds4_sQLd in select wild2_sQOW (<{GHC.Tuple.(,)}> ds8_sQLv ds9_sQLu -> select ips_sQLi (Gui.Generic.Types.InputSettings ds10_sQLp ds11_sQOR ds12_sQOS ds13_sQOT ds14_sQOU -> select ds10_sQLp (GHC.Ptr.Ptr ds16_sQLt -> let !wild4_sQOP = ffi_wrapper4 _Javascript_JQuery_Basic_setText ds16_sQLt ds9_sQLu ds8_sQLv in select wild4_sQOP (<{GHC.Tuple.(,)}> ds17_sQLG ds18_sQLE -> select ds1_sQLA (GHC.Ptr.Ptr ds20_sQLF -> let !wild5_sQON = ffi_wrapper4 _Javascript_JQuery_Basic_appendJQuery ds18_sQLE ds20_sQLF ds17_sQLG in select wild5_sQON (<{GHC.Tuple.(,)}> ds21_sQLL ds22_sQOM -> <{GHC.Tuple.(,)}> ds21_sQLL <{GHC.Tuple.()}>))))))))))
Gui.Generic.Utils.putLabel eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.Generic.Utils.defElems1 eta_B3_B3 eta_B2_B2 eta_B1_B1
Gui.Generic.Utils.defElems_x3 =: GHC.CString.unpackCString# "<span />"
Gui.Generic.Utils.defElems_x2 =: GHC.CString.unpackCString# "tooltip"
Gui.Generic.Utils.defElems5 =: Javascript.Base.Types.FakePtr Gui.Generic.Utils.defElems_x2
Gui.Generic.Utils.defElems6 =: Javascript.Base.Types.FakePtr Gui.Generic.Utils.defElems_x3
Gui.Generic.Utils.defElems4 ips_sQLP e_sQMR eta_sQLR = select ips_sQLP (Data.Maybe.Nothing  -> <{GHC.Tuple.(,)}> eta_sQLR <{GHC.Tuple.()}>) (Data.Maybe.Just a_sQLT -> select a_sQLT (Gui.Generic.Types.InputSettings ds1_sQP8 ds2_sQM0 ds3_sQP9 ds4_sQPa ds5_sQPb -> select ds2_sQM0 (Data.Maybe.Nothing  -> <{GHC.Tuple.(,)}> eta_sQLR <{GHC.Tuple.()}>) (Data.Maybe.Just x_sQMG -> select Gui.Generic.Utils.defElems6 (GHC.Ptr.Ptr ds6_sQM7 -> let !tpl_sQPr = Gui.Generic.Utils.defElems_x3, !wild3_sQPq = ffi_wrapper3 jsToString ds6_sQM7 GHC.Prim.realWorld# in select wild3_sQPq (<{GHC.Tuple.(,)}> ds7_sQPp ds8_sQMd -> let !wild4_sQPo = ffi_wrapper3 _Javascript_JQuery_Basic_jQuery_ ds8_sQMd eta_sQLR in select wild4_sQPo (<{GHC.Tuple.(,)}> ds9_sQMu ds10_sQMt -> select Gui.Generic.Utils.defElems5 (GHC.Ptr.Ptr ds12_sQMm -> let !tpl1_sQPm = Gui.Generic.Utils.defElems_x2, !wild5_sQPl = ffi_wrapper3 jsToString ds12_sQMm GHC.Prim.realWorld# in select wild5_sQPl (<{GHC.Tuple.(,)}> ds13_sQPk ds14_sQMs -> let !wild6_sQPj = ffi_wrapper4 _Javascript_JQuery_Basic_addClass ds14_sQMs ds10_sQMt ds9_sQMu in select wild6_sQPj (<{GHC.Tuple.(,)}> ds15_sQMB ds16_sQMA -> let !wild7_sQPi = ffi_wrapper3 _Javascript_JQuery_Basic_hide ds16_sQMA ds15_sQMB in select wild7_sQPi (<{GHC.Tuple.(,)}> ds17_sQMM ds18_sQML -> select x_sQMG (GHC.Ptr.Ptr ds20_sQMK -> let !wild8_sQPg = ffi_wrapper4 _Javascript_JQuery_Basic_setText ds20_sQMK ds18_sQML ds17_sQMM in select wild8_sQPg (<{GHC.Tuple.(,)}> ds21_sQMX ds22_sQMV -> select e_sQMR (GHC.Ptr.Ptr ds24_sQMW -> let !wild9_sQPe = ffi_wrapper4 _Javascript_JQuery_Basic_appendJQuery ds22_sQMV ds24_sQMW ds21_sQMX in select wild9_sQPe (<{GHC.Tuple.(,)}> ds25_sQN2 ds26_sQPd -> <{GHC.Tuple.(,)}> ds25_sQN2 <{GHC.Tuple.()}>))))))))))))))
Gui.Generic.Utils.putTooltip eta_B3_B3 eta_B2_B2 eta_B1_B1 = Gui.Generic.Utils.defElems4 eta_B3_B3 eta_B2_B2 eta_B1_B1
Gui.Generic.Utils.defElems_x5 =: GHC.CString.unpackCString# "<div />"
Gui.Generic.Utils.defElems8 =: let !ds_sQPz = Javascript.Base.Types.FakePtr Gui.Generic.Utils.defElems_x5 in select ds_sQPz (GHC.Ptr.Ptr ds1_sQN7 -> let !tpl_sQPy = Gui.Generic.Utils.defElems_x5, !wild_sQPx = ffi_wrapper3 jsToString ds1_sQN7 GHC.Prim.realWorld# in select wild_sQPx (<{GHC.Tuple.(,)}> ds2_sQPw ds3_sQNc -> GHC.Ptr.Ptr ds3_sQNc))
Gui.Generic.Utils.defElems_x4 =: GHC.CString.unpackCString# "container"
Gui.Generic.Utils.defElems7 =: let !ds_sQPF = Javascript.Base.Types.FakePtr Gui.Generic.Utils.defElems_x4 in select ds_sQPF (GHC.Ptr.Ptr ds1_sQNh -> let !tpl_sQPE = Gui.Generic.Utils.defElems_x4, !wild_sQPD = ffi_wrapper3 jsToString ds1_sQNh GHC.Prim.realWorld# in select wild_sQPD (<{GHC.Tuple.(,)}> ds2_sQPC ds3_sQNm -> GHC.Ptr.Ptr ds3_sQNm))
Gui.Generic.Utils.defElems $dMonadIO_sQNq eta_sQNO = let $dMonad_sQO2 = Control.Monad.IO.Class.$p1MonadIO $dMonadIO_sQNq in Gui.Generic.Utils.defElems$4 (Control.Monad.Trans.State.Lazy.$w$cliftIO $dMonadIO_sQNq (Gui.Generic.Utils.defElems$5 eta_sQNO)) (Gui.Generic.Utils.defElems$3 (GHC.Base.return $dMonad_sQO2)) (<{GHC.Base.>>=}> $dMonad_sQO2)
Gui.Generic.Utils.defElems$3 lvl_sQO4 ds_sQO7 = lvl_sQO4 (<{GHC.Tuple.(,)}> (Gui.Generic.Utils.defElems$2 ds_sQO7) (Gui.Generic.Utils.defElems$1 ds_sQO7))
Gui.Generic.Utils.defElems$4 a_sQO0 lvl1_sQOl lvl2_sQOn eta1_sQOp = lvl2_sQOn (a_sQO0 eta1_sQOp) lvl1_sQOl
Gui.Generic.Utils.defElems$5 eta_sQNO s_sQNw = select Gui.Generic.Utils.defElems8 (GHC.Ptr.Ptr ds1_sQNv -> let !wild_sQPP = ffi_wrapper3 _Javascript_JQuery_Basic_jQuery_ ds1_sQNv s_sQNw in select wild_sQPP (<{GHC.Tuple.(,)}> ds2_sQNG ds3_sQNF -> select Gui.Generic.Utils.defElems7 (GHC.Ptr.Ptr ds5_sQNE -> let !wild1_sQPN = ffi_wrapper4 _Javascript_JQuery_Basic_addClass ds5_sQNE ds3_sQNF ds2_sQNG in select wild1_sQPN (<{GHC.Tuple.(,)}> ds7_sQNP ds8_sQNM -> let div_sQNN = GHC.Ptr.Ptr ds8_sQNM, !ds6_sQPS = Gui.Generic.Utils.defElems4 eta_sQNO div_sQNN ds7_sQNP in select ds6_sQPS (<{GHC.Tuple.(,)}> ipv_sQNT ipv1_sQPH -> let !ds9_sQPR = Gui.Generic.Utils.defElems1 eta_sQNO div_sQNN ipv_sQNT in select ds9_sQPR (<{GHC.Tuple.(,)}> ipv2_sQNX ipv3_sQPI -> <{GHC.Tuple.(,)}> ipv2_sQNX div_sQNN))))))
Gui.Generic.Utils.defElems$1 ds_sQO7 = select ds_sQO7 (<{GHC.Tuple.(,)}> a5_sQPM <{s'_sQOg}> -> <{s'_sQOg}>)
Gui.Generic.Utils.defElems$2 ds_sQO7 = select ds_sQO7 (<{GHC.Tuple.(,)}> a5_sQOb <{s'_sQPK}> -> a5_sQOb)