:: Data.Utils.Proxy = Data.Utils.Proxy Data.Utils.fromProxy $dTypeable_sSc5 = GHC.Err.undefined Data.Utils.lvl =: GHC.Err.undefined Data.Utils.moduleName $dTypeable_sSc9 a_sScn = let !wild_sSdG = $dTypeable_sSc9 Data.Utils.lvl in select wild_sSdG (Data.Typeable.Internal.TypeRep rb_sSdD rb1_sSdE tc_sScf ds1_sSdF -> select tc_sScf (Data.Typeable.Internal.TyCon rb2_sSdy rb3_sSdz ds2_sSdA ds3_sScm ds4_sSdB -> ds3_sScm)) Data.Utils.modTypeName1 =: GHC.Types.C# '.' Data.Utils.modTypeName $dTypeable_sScq a_sScG = let !wild_sSdX = $dTypeable_sScq Data.Utils.lvl in select wild_sSdX (Data.Typeable.Internal.TypeRep rb_sSdU rb1_sSdV tc_sScw ds1_sSdW -> select tc_sScw (Data.Typeable.Internal.TyCon rb2_sSdQ rb3_sSdR ds2_sSdS ds3_sScD ds4_sScE -> <{GHC.Base.++}> ds3_sScD (<{GHC.Types.:}> Data.Utils.modTypeName1 ds4_sScE))) Data.Utils.typeName $dTypeable_sScJ a_sScX = let !wild_sSe7 = $dTypeable_sScJ Data.Utils.lvl in select wild_sSe7 (Data.Typeable.Internal.TypeRep rb_sSe4 rb1_sSe5 tc_sScP ds1_sSe6 -> select tc_sScP (Data.Typeable.Internal.TyCon rb2_sSdZ rb3_sSe0 ds2_sSe1 ds3_sSe2 ds4_sScW -> ds4_sScW)) Data.Utils.toProxy ds_sScZ = Data.Utils.Proxy Data.Utils.$wvalidCSSIdentifierChar ww_sSd2 = let !sat_sSea_sSea = ord# ww_sSd2, !wild1_sSed = ffi_wrapper3 u_iswalnum sat_sSea_sSea GHC.Prim.realWorld# in select wild1_sSed (<{GHC.Tuple.(,)}> ds_sSec ds1_sSd8 -> select ds1_sSd8 (_ -> true) (0 -> select ww_sSd2 (_ -> false) ('-' -> true) ('_' -> true))) Data.Utils.validCSSIdentifierChar w_sSdc = select w_sSdc (GHC.Types.C# ww_sSdf -> Data.Utils.$wvalidCSSIdentifierChar ww_sSdf) Data.Utils.toCSSIdentifier3 =: GHC.Types.C# '_' Data.Utils.toCSSIdentifier2 =: GHC.Types.C# '-' Data.Utils.$wa ww_sSdi = let !sat_sSek_sSek = ord# ww_sSdi, !wild1_sSen = ffi_wrapper3 u_iswalnum sat_sSek_sSek GHC.Prim.realWorld# in select wild1_sSen (<{GHC.Tuple.(,)}> ds_sSem ds1_sSdo -> select ds1_sSdo (_ -> GHC.Types.C# ww_sSdi) (0 -> select ww_sSdi (_ -> Data.Utils.toCSSIdentifier3) ('-' -> Data.Utils.toCSSIdentifier2))) Data.Utils.toCSSIdentifier1 w_sSds = select w_sSds (GHC.Types.C# ww_sSdv -> Data.Utils.$wa ww_sSdv) Data.Utils.toCSSIdentifier eta_B1_B1 = GHC.Base.map Data.Utils.toCSSIdentifier1 eta_B1_B1