:: Data.Attoparsec.Number.Number = Data.Attoparsec.Number.I a1 | Data.Attoparsec.Number.D a1 Data.Attoparsec.Number.$WI tpl_s5UP_s5UP = let !tpl_s5UR_s5UR = tpl_s5UP_s5UP in Data.Attoparsec.Number.I tpl_s5UR_s5UR Data.Attoparsec.Number.$WD tpl_s5UT_s5UT = select tpl_s5UT_s5UT (GHC.Types.D# tpl_s5UW_s5UW -> Data.Attoparsec.Number.D tpl_s5UW_s5UW) Data.Attoparsec.Number.a =: GHC.CString.unpackCString# "Data.Attoparsec.Number.Number" Data.Attoparsec.Number.a1 =: GHC.Types.C# 'D' Data.Attoparsec.Number.a2 =: GHC.Types.C# 'I' Data.Attoparsec.Number.w1 =: <{GHC.Types.:}> Data.Attoparsec.Number.a2 <{GHC.Types.[]}> Data.Attoparsec.Number.w2 =: <{GHC.Types.:}> Data.Attoparsec.Number.a1 <{GHC.Types.[]}> Data.Attoparsec.Number.lvl x_s5V0 y_s5Va r_s5V9 = select x_s5V0 (Data.Data.Constr ds2_s67a ds3_s5V7 ds4_s67c ds5_s67d ds6_s67e -> let !wild3_s679 = GHC.Base.eqString ds3_s5V7 Data.Attoparsec.Number.w2 in if wild3_s679 y_s5Va r_s5V9) Data.Attoparsec.Number.lvl1 x_s5Ve y_s5Vo r_s5Vn = select x_s5Ve (Data.Data.Constr ds2_s67g ds3_s5Vl ds4_s67i ds5_s67j ds6_s67k -> let !wild3_s67f = GHC.Base.eqString ds3_s5Vl Data.Attoparsec.Number.w1 in if wild3_s67f y_s5Vo r_s5Vn) Data.Attoparsec.Number.a3 =: Data.Data.AlgConstr Data.Attoparsec.Number.a8 Data.Attoparsec.Number.a4 =: Data.Data.AlgConstr Data.Attoparsec.Number.a7 Data.Attoparsec.Number.lvl2 =: <{GHC.Types.:}> Data.Attoparsec.Number.$cD <{GHC.Types.[]}> Data.Attoparsec.Number.$cI =: Data.Data.Constr Data.Attoparsec.Number.a3 Data.Attoparsec.Number.w1 <{GHC.Types.[]}> Data.Data.Prefix Data.Attoparsec.Number.$tNumber Data.Attoparsec.Number.a5 =: <{GHC.Types.:}> Data.Attoparsec.Number.$cI Data.Attoparsec.Number.lvl2 Data.Attoparsec.Number.a6 =: Data.Data.AlgRep Data.Attoparsec.Number.a5 Data.Attoparsec.Number.$tNumber =: Data.Data.DataType Data.Attoparsec.Number.a Data.Attoparsec.Number.a6 Data.Attoparsec.Number.$cD =: Data.Data.Constr Data.Attoparsec.Number.a4 Data.Attoparsec.Number.w2 <{GHC.Types.[]}> Data.Data.Prefix Data.Attoparsec.Number.$tNumber Data.Attoparsec.Number.a7 =: GHC.List.foldr2 Data.Attoparsec.Number.lvl GHC.List.badHead Data.Attoparsec.Number.a5 Data.Data.mkConstr1 Data.Attoparsec.Number.a8 =: GHC.List.foldr2 Data.Attoparsec.Number.lvl1 GHC.List.badHead Data.Attoparsec.Number.a5 Data.Data.mkConstr1 Data.Attoparsec.Number.$fShowNumber_$cshow ds_s5Vq = select ds_s5Vq (Data.Attoparsec.Number.I a17_s5Vt -> GHC.Show.$w$cshowsPrec 0 a17_s5Vt <{GHC.Types.[]}>) (Data.Attoparsec.Number.D rb_s5Vv -> GHC.Float.$w$sshowSignedFloat GHC.Float.$fShowDouble_$sshowFloat GHC.Show.shows26 rb_s5Vv <{GHC.Types.[]}>) Data.Attoparsec.Number.$fShowNumber_$cshowsPrec ds_s5VC x_s5Vz s_s5VB = let !sat_s67m_s67m = Data.Attoparsec.Number.$fShowNumber_$cshow x_s5Vz in <{GHC.Base.++}> sat_s67m_s67m s_s5VB Data.Attoparsec.Number.$fShowNumber1 x_s5VF s_s5VH = let !sat_s67n_s67n = Data.Attoparsec.Number.$fShowNumber_$cshow x_s5VF in <{GHC.Base.++}> sat_s67n_s67n s_s5VH Data.Attoparsec.Number.$fShowNumber_$cshowList ls_s5VK s_s5VL = GHC.Show.showList__ Data.Attoparsec.Number.$fShowNumber1 ls_s5VK s_s5VL Data.Attoparsec.Number.$fShowNumber =: <{GHC.Show.D:Show}> Data.Attoparsec.Number.$fShowNumber_$cshowsPrec Data.Attoparsec.Number.$fShowNumber_$cshow Data.Attoparsec.Number.$fShowNumber_$cshowList Data.Attoparsec.Number.$fNFDataNumber_$crnf eta_s5VN = select eta_s5VN (Data.Attoparsec.Number.I ds_s67o -> <{GHC.Tuple.()}>) (Data.Attoparsec.Number.D rb_s67q -> <{GHC.Tuple.()}>) Data.Attoparsec.Number.$fNFDataNumber =: Data.Attoparsec.Number.$fNFDataNumber_$crnf Data.Attoparsec.Number.$fNumNumber_$cfromInteger x_s5VS = let !vx1_s5VU = x_s5VS in Data.Attoparsec.Number.I vx1_s5VU Data.Attoparsec.Number.$fNumNumber_$cnegate eta_s5VW = select eta_s5VW (Data.Attoparsec.Number.I a17_s5VZ -> let !vx1_s5W1 = GHC.Integer.Type.negateInteger a17_s5VZ in Data.Attoparsec.Number.I vx1_s5W1) (Data.Attoparsec.Number.D rb_s5W3 -> let !sat_s67s_s67s = negateDouble# rb_s5W3 in Data.Attoparsec.Number.D sat_s67s_s67s) Data.Attoparsec.Number.$fNumNumber_$cabs eta_s5W6 = select eta_s5W6 (Data.Attoparsec.Number.I a17_s5W9 -> let !vx1_s5Wb = GHC.Integer.Type.absInteger a17_s5W9 in Data.Attoparsec.Number.I vx1_s5Wb) (Data.Attoparsec.Number.D rb_s5Wd -> let !wild1_s67u = <{>=##}> rb_s5Wd 0.0 in if wild1_s67u eta_s5W6 (let !sat_s67t_s67t = negateDouble# rb_s5Wd in Data.Attoparsec.Number.D sat_s67t_s67t)) Data.Attoparsec.Number.lvl3 =: Data.Attoparsec.Number.D -1.0 Data.Attoparsec.Number.lvl4 =: Data.Attoparsec.Number.D 1.0 Data.Attoparsec.Number.lvl5 =: Data.Attoparsec.Number.D 0.0 Data.Attoparsec.Number.$fNumNumber_$csignum eta_s5Wi = select eta_s5Wi (Data.Attoparsec.Number.I a17_s5Wl -> let !vx1_s5Wn = GHC.Integer.Type.signumInteger a17_s5Wl in Data.Attoparsec.Number.I vx1_s5Wn) (Data.Attoparsec.Number.D rb_s5Wp -> let !wild1_s67x = <{==##}> rb_s5Wp 0.0 in if wild1_s67x Data.Attoparsec.Number.lvl5 (let !wild2_s67w = <{>##}> rb_s5Wp 0.0 in if wild2_s67w Data.Attoparsec.Number.lvl4 Data.Attoparsec.Number.lvl3)) Data.Attoparsec.Number.$fRealNumber_$dNum =: GHC.Real.$fNumRatio_$s$fNumRatio Data.Attoparsec.Number.$fRealNumber_$ctoRational eta_s5Wt = select eta_s5Wt (Data.Attoparsec.Number.I a17_s5Ww -> <{GHC.Real.:%}> a17_s5Ww GHC.Real.$fNumRatio3) (Data.Attoparsec.Number.D rb_s5Wy -> let !ww_s67z = GHC.Float.$w$ctoRational rb_s5Wy in select ww_s67z (<{GHC.Tuple.(,)}> ww1_s5WC ww2_s5WD -> <{GHC.Real.:%}> ww1_s5WC ww2_s5WD)) Data.Attoparsec.Number.binop eta_s5WQ eta1_s5WU eta2_s5WI eta3_s5WL = select eta2_s5WI (Data.Attoparsec.Number.I a17_s5WO -> select eta3_s5WL (Data.Attoparsec.Number.I b_s5WP -> eta_s5WQ a17_s5WO b_s5WP) (Data.Attoparsec.Number.D rb_s5WW -> eta1_s5WU (Data.Attoparsec.Number.binop$14 a17_s5WO) (GHC.Types.D# rb_s5WW))) (Data.Attoparsec.Number.D rb_s5X1 -> select eta3_s5WL (Data.Attoparsec.Number.I b_s5X3 -> eta1_s5WU (GHC.Types.D# rb_s5X1) (Data.Attoparsec.Number.binop$15 b_s5X3)) (Data.Attoparsec.Number.D rb1_s5X9 -> eta1_s5WU (GHC.Types.D# rb_s5X1) (GHC.Types.D# rb1_s5X9))) Data.Attoparsec.Number.binop$14 a17_s5WO = let !wild2_s5WT = GHC.Integer.Type.doubleFromInteger a17_s5WO in GHC.Types.D# wild2_s5WT Data.Attoparsec.Number.binop$15 b_s5X3 = let !wild2_s5X5 = GHC.Integer.Type.doubleFromInteger b_s5X3 in GHC.Types.D# wild2_s5X5 Data.Attoparsec.Number.a9 x_s5Xd x1_s5Xe = let !vx1_s5Xg = GHC.Integer.Type.plusInteger x_s5Xd x1_s5Xe in Data.Attoparsec.Number.I vx1_s5Xg Data.Attoparsec.Number.a10 x_s5Xj x1_s5Xm = select x_s5Xj (GHC.Types.D# x2_s5Xp -> select x1_s5Xm (GHC.Types.D# y_s5Xq -> let !sat_s67J_s67J = <{+##}> x2_s5Xp y_s5Xq in Data.Attoparsec.Number.D sat_s67J_s67J)) <{Data.Attoparsec.Number.$fNumNumber_$c+}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop Data.Attoparsec.Number.a9 Data.Attoparsec.Number.a10 eta_B2_B2 eta_B1_B1 Data.Attoparsec.Number.a11 x_s5Xu x1_s5Xv = let !vx1_s5Xx = GHC.Integer.Type.timesInteger x_s5Xu x1_s5Xv in Data.Attoparsec.Number.I vx1_s5Xx Data.Attoparsec.Number.a12 x_s5XA x1_s5XD = select x_s5XA (GHC.Types.D# x2_s5XG -> select x1_s5XD (GHC.Types.D# y_s5XH -> let !sat_s67M_s67M = <{*##}> x2_s5XG y_s5XH in Data.Attoparsec.Number.D sat_s67M_s67M)) <{Data.Attoparsec.Number.$fNumNumber_$c*}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop Data.Attoparsec.Number.a11 Data.Attoparsec.Number.a12 eta_B2_B2 eta_B1_B1 Data.Attoparsec.Number.a13 x_s5XL x1_s5XM = let !vx1_s5XO = GHC.Integer.Type.minusInteger x_s5XL x1_s5XM in Data.Attoparsec.Number.I vx1_s5XO Data.Attoparsec.Number.a14 x_s5XR x1_s5XU = select x_s5XR (GHC.Types.D# x2_s5XX -> select x1_s5XU (GHC.Types.D# y_s5XY -> let !sat_s67P_s67P = <{-##}> x2_s5XX y_s5XY in Data.Attoparsec.Number.D sat_s67P_s67P)) <{Data.Attoparsec.Number.$fNumNumber_$c-}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop Data.Attoparsec.Number.a13 Data.Attoparsec.Number.a14 eta_B2_B2 eta_B1_B1 Data.Attoparsec.Number.$fNumNumber =: <{GHC.Num.D:Num}> <{Data.Attoparsec.Number.$fNumNumber_$c+}> <{Data.Attoparsec.Number.$fNumNumber_$c*}> <{Data.Attoparsec.Number.$fNumNumber_$c-}> Data.Attoparsec.Number.$fNumNumber_$cnegate Data.Attoparsec.Number.$fNumNumber_$cabs Data.Attoparsec.Number.$fNumNumber_$csignum Data.Attoparsec.Number.$fNumNumber_$cfromInteger Data.Attoparsec.Number.$fOrdNumber_$ccompare eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop GHC.Integer.Type.compareInteger GHC.Classes.$fOrdDouble_$ccompare eta_B2_B2 eta_B1_B1 <{Data.Attoparsec.Number.$fOrdNumber_$c<}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop GHC.Integer.Type.ltInteger <{GHC.Classes.$fOrdDouble_$c<}> eta_B2_B2 eta_B1_B1 <{Data.Attoparsec.Number.$fOrdNumber_$c>=}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop GHC.Integer.Type.geInteger <{GHC.Classes.$fOrdDouble_$c>=}> eta_B2_B2 eta_B1_B1 <{Data.Attoparsec.Number.$fOrdNumber_$c>}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop GHC.Integer.Type.gtInteger <{GHC.Classes.$fOrdDouble_$c>}> eta_B2_B2 eta_B1_B1 <{Data.Attoparsec.Number.$fOrdNumber_$c<=}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop GHC.Integer.Type.leInteger <{GHC.Classes.$fOrdDouble_$c<=}> eta_B2_B2 eta_B1_B1 <{Data.Attoparsec.Number.$fEqNumber_$c==}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop GHC.Integer.Type.eqInteger <{GHC.Classes.$fEqDouble_$c==}> eta_B2_B2 eta_B1_B1 <{Data.Attoparsec.Number.$fEqNumber_$c/=}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop GHC.Integer.Type.neqInteger <{GHC.Classes.$fEqDouble_$c/=}> eta_B2_B2 eta_B1_B1 Data.Attoparsec.Number.$fEqNumber =: <{GHC.Classes.D:Eq}> <{Data.Attoparsec.Number.$fEqNumber_$c==}> <{Data.Attoparsec.Number.$fEqNumber_$c/=}> Data.Attoparsec.Number.$fOrdNumber_$cmin x_s5Y2 y_s5Y5 = select x_s5Y2 (Data.Attoparsec.Number.I a17_s5Y8 -> select y_s5Y5 (Data.Attoparsec.Number.I b_s5Y9 -> let !wild2_s67S = GHC.Integer.Type.leInteger a17_s5Y8 b_s5Y9 in if wild2_s67S x_s5Y2 y_s5Y5) (Data.Attoparsec.Number.D rb_s5Yg -> let !wild2_s5Yf = GHC.Integer.Type.doubleFromInteger a17_s5Y8, !wild3_s67T = <{<=##}> wild2_s5Yf rb_s5Yg in if wild3_s67T x_s5Y2 y_s5Y5)) (Data.Attoparsec.Number.D rb_s5Yn -> select y_s5Y5 (Data.Attoparsec.Number.I b_s5Yl -> let !wild2_s5Yo = GHC.Integer.Type.doubleFromInteger b_s5Yl, !wild3_s67U = <{<=##}> rb_s5Yn wild2_s5Yo in if wild3_s67U x_s5Y2 y_s5Y5) (Data.Attoparsec.Number.D rb1_s5Ys -> let !wild2_s67V = <{<=##}> rb_s5Yn rb1_s5Ys in if wild2_s67V x_s5Y2 y_s5Y5)) Data.Attoparsec.Number.$fOrdNumber_$cmax x_s5Yw y_s5Yz = select x_s5Yw (Data.Attoparsec.Number.I a17_s5YC -> select y_s5Yz (Data.Attoparsec.Number.I b_s5YD -> let !wild2_s67W = GHC.Integer.Type.leInteger a17_s5YC b_s5YD in if wild2_s67W y_s5Yz x_s5Yw) (Data.Attoparsec.Number.D rb_s5YK -> let !wild2_s5YJ = GHC.Integer.Type.doubleFromInteger a17_s5YC, !wild3_s67X = <{<=##}> wild2_s5YJ rb_s5YK in if wild3_s67X y_s5Yz x_s5Yw)) (Data.Attoparsec.Number.D rb_s5YR -> select y_s5Yz (Data.Attoparsec.Number.I b_s5YP -> let !wild2_s5YS = GHC.Integer.Type.doubleFromInteger b_s5YP, !wild3_s67Y = <{<=##}> rb_s5YR wild2_s5YS in if wild3_s67Y y_s5Yz x_s5Yw) (Data.Attoparsec.Number.D rb1_s5YW -> let !wild2_s67Z = <{<=##}> rb_s5YR rb1_s5YW in if wild2_s67Z y_s5Yz x_s5Yw)) Data.Attoparsec.Number.$fOrdNumber =: <{GHC.Classes.D:Ord}> Data.Attoparsec.Number.$fEqNumber Data.Attoparsec.Number.$fOrdNumber_$ccompare <{Data.Attoparsec.Number.$fOrdNumber_$c<}> <{Data.Attoparsec.Number.$fOrdNumber_$c>=}> <{Data.Attoparsec.Number.$fOrdNumber_$c>}> <{Data.Attoparsec.Number.$fOrdNumber_$c<=}> Data.Attoparsec.Number.$fOrdNumber_$cmax Data.Attoparsec.Number.$fOrdNumber_$cmin Data.Attoparsec.Number.$fFractionalNumber_$crecip eta_s5YZ = select eta_s5YZ (Data.Attoparsec.Number.I a17_s5Z2 -> let !wild1_s5Z4 = GHC.Integer.Type.doubleFromInteger a17_s5Z2, !wild2_s5Z6 = <{/##}> 1.0 wild1_s5Z4 in Data.Attoparsec.Number.D wild2_s5Z6) (Data.Attoparsec.Number.D rb_s5Z8 -> let !wild1_s5Za = <{/##}> 1.0 rb_s5Z8 in Data.Attoparsec.Number.D wild1_s5Za) Data.Attoparsec.Number.$fFractionalNumber_$cfromRational x_s5Zc = select x_s5Zc (<{GHC.Real.:%}> ww_s5Zg ww1_s5Zh -> let !vx1_s681 = GHC.Float.$w$cfromRational ww_s5Zg ww1_s5Zh in select vx1_s681 (GHC.Types.D# ipv_s5Zk -> Data.Attoparsec.Number.D ipv_s5Zk)) Data.Attoparsec.Number.a15 x_s5Zn y_s5Zp = let !wild_s5Zr = GHC.Integer.Type.doubleFromInteger x_s5Zn, !wild1_s5Zs = GHC.Integer.Type.doubleFromInteger y_s5Zp, !wild2_s5Zu = <{/##}> wild_s5Zr wild1_s5Zs in Data.Attoparsec.Number.D wild2_s5Zu Data.Attoparsec.Number.a16 x_s5Zx x1_s5ZA = select x_s5Zx (GHC.Types.D# x2_s5ZD -> select x1_s5ZA (GHC.Types.D# y_s5ZE -> let !wild2_s5ZG = <{/##}> x2_s5ZD y_s5ZE in Data.Attoparsec.Number.D wild2_s5ZG)) <{Data.Attoparsec.Number.$fFractionalNumber_$c/}> eta_B2_B2 eta_B1_B1 = Data.Attoparsec.Number.binop Data.Attoparsec.Number.a15 Data.Attoparsec.Number.a16 eta_B2_B2 eta_B1_B1 Data.Attoparsec.Number.$fRealNumber =: <{GHC.Real.D:Real}> Data.Attoparsec.Number.$fNumNumber Data.Attoparsec.Number.$fOrdNumber Data.Attoparsec.Number.$fRealNumber_$ctoRational Data.Attoparsec.Number.$fFractionalNumber =: <{GHC.Real.D:Fractional}> Data.Attoparsec.Number.$fNumNumber <{Data.Attoparsec.Number.$fFractionalNumber_$c/}> Data.Attoparsec.Number.$fFractionalNumber_$crecip Data.Attoparsec.Number.$fFractionalNumber_$cfromRational Data.Attoparsec.Number.lvl6 =: GHC.Integer.Type.S# 1 Data.Attoparsec.Number.$fRealFracNumber_$cfloor eta_s5ZM eta1_s5ZJ = select eta1_s5ZJ (Data.Attoparsec.Number.I a17_s5ZQ -> let !sat_s5ZO_s5ZO = GHC.Real.$p1Integral eta_s5ZM, !sat_s685_s685 = GHC.Real.$p1Real sat_s5ZO_s5ZO in GHC.Num.fromInteger sat_s685_s685 a17_s5ZQ) (Data.Attoparsec.Number.D rb_s5ZS -> let !ww_s689 = GHC.Float.$w$cproperFraction eta_s5ZM rb_s5ZS in select ww_s689 (<{GHC.Tuple.(,)}> ww1_s601 ww2_s5ZW -> select ww2_s5ZW (GHC.Types.D# x1_s5ZZ -> let !wild2_s687 = <{<##}> x1_s5ZZ 0.0 in if wild2_s687 (let $dNum_s605 = GHC.Real.$p1Real (GHC.Real.$p1Integral eta_s5ZM) in <{GHC.Num.-}> $dNum_s605 ww1_s601 (GHC.Num.fromInteger $dNum_s605 Data.Attoparsec.Number.lvl6)) ww1_s601))) Data.Attoparsec.Number.$fRealFracNumber_$cceiling eta_s60c eta1_s609 = select eta1_s609 (Data.Attoparsec.Number.I a17_s60g -> let !sat_s60e_s60e = GHC.Real.$p1Integral eta_s60c, !sat_s68b_s68b = GHC.Real.$p1Real sat_s60e_s60e in GHC.Num.fromInteger sat_s68b_s68b a17_s60g) (Data.Attoparsec.Number.D rb_s60i -> let !ww_s68f = GHC.Float.$w$cproperFraction eta_s60c rb_s60i in select ww_s68f (<{GHC.Tuple.(,)}> ww1_s60r ww2_s60m -> select ww2_s60m (GHC.Types.D# x1_s60p -> let !wild2_s68d = <{>##}> x1_s60p 0.0 in if wild2_s68d (let $dNum_s60v = GHC.Real.$p1Real (GHC.Real.$p1Integral eta_s60c) in <{GHC.Num.+}> $dNum_s60v ww1_s60r (GHC.Num.fromInteger $dNum_s60v Data.Attoparsec.Number.lvl6)) ww1_s60r))) Data.Attoparsec.Number.$fRealFracNumber_$cround eta_s60C eta1_s60z = select eta1_s60z (Data.Attoparsec.Number.I a17_s60G -> let !sat_s60E_s60E = GHC.Real.$p1Integral eta_s60C, !sat_s68h_s68h = GHC.Real.$p1Real sat_s60E_s60E in GHC.Num.fromInteger sat_s68h_s68h a17_s60G) (Data.Attoparsec.Number.D rb_s60I -> GHC.Float.$w$cround eta_s60C rb_s60I) Data.Attoparsec.Number.$fRealFracNumber_$ctruncate eta_s60O eta1_s60L = select eta1_s60L (Data.Attoparsec.Number.I a17_s60S -> let !sat_s60Q_s60Q = GHC.Real.$p1Integral eta_s60O, !sat_s68j_s68j = GHC.Real.$p1Real sat_s60Q_s60Q in GHC.Num.fromInteger sat_s68j_s68j a17_s60S) (Data.Attoparsec.Number.D rb_s60U -> let !ww_s68l = GHC.Float.$w$cproperFraction eta_s60O rb_s60U in select ww_s68l (<{GHC.Tuple.(,)}> ww1_s60Y ww2_s68m -> ww1_s60Y)) Data.Attoparsec.Number.vx =: GHC.Integer.Type.S# 0 Data.Attoparsec.Number.lvl7 =: Data.Attoparsec.Number.I Data.Attoparsec.Number.vx Data.Attoparsec.Number.$fRealFracNumber_$cproperFraction eta_s614 eta1_s611 = select eta1_s611 (Data.Attoparsec.Number.I a17_s618 -> <{GHC.Tuple.(,)}> (Data.Attoparsec.Number.$fRealFracNumber_$cproperFraction$16 a17_s618 eta_s614) Data.Attoparsec.Number.lvl7) (Data.Attoparsec.Number.D rb_s61b -> let !ww_s68r = GHC.Float.$w$cproperFraction eta_s614 rb_s61b in select ww_s68r (<{GHC.Tuple.(,)}> ww1_s61f ww2_s61g -> <{GHC.Tuple.(,)}> ww1_s61f (Data.Attoparsec.Number.$WD ww2_s61g))) Data.Attoparsec.Number.$fRealFracNumber_$cproperFraction$16 a17_s618 eta_s614 = let !sat_s616_s616 = GHC.Real.$p1Integral eta_s614, !sat_s68n_s68n = GHC.Real.$p1Real sat_s616_s616 in GHC.Num.fromInteger sat_s68n_s68n a17_s618 Data.Attoparsec.Number.$fRealFracNumber =: <{GHC.Real.D:RealFrac}> Data.Attoparsec.Number.$fRealNumber Data.Attoparsec.Number.$fFractionalNumber Data.Attoparsec.Number.$fRealFracNumber_$cproperFraction Data.Attoparsec.Number.$fRealFracNumber_$ctruncate Data.Attoparsec.Number.$fRealFracNumber_$cround Data.Attoparsec.Number.$fRealFracNumber_$cceiling Data.Attoparsec.Number.$fRealFracNumber_$cfloor Data.Attoparsec.Number.$fDataNumber_$cdataTypeOf ds_s61j = Data.Attoparsec.Number.$tNumber Data.Attoparsec.Number.$fDataNumber_$ctoConstr ds_s61l = select ds_s61l (Data.Attoparsec.Number.I ds1_s68s -> Data.Attoparsec.Number.$cI) (Data.Attoparsec.Number.D rb_s68u -> Data.Attoparsec.Number.$cD) Data.Attoparsec.Number.$w$cgunfold w_s61C w3_s61B ww_s61s = select ww_s61s (_ -> <{Data.Data.$fData()5}>) (Data.Data.AlgConstr idx_s61w -> select idx_s61w (GHC.Types.I# ds_s61z -> select ds_s61z (_ -> w_s61C Data.Data.$fDataDouble (w3_s61B Data.Attoparsec.Number.$WD)) (1 -> w_s61C Data.Data.$fDataInteger (w3_s61B Data.Attoparsec.Number.$WI)))) Data.Attoparsec.Number.$fDataNumber_$cgunfold w_s61P w3_s61Q w4_s61I = select w4_s61I (Data.Data.Constr ww_s61R ww1_s68B ww2_s68C ww3_s68D ww4_s68E -> Data.Attoparsec.Number.$w$cgunfold w_s61P w3_s61Q ww_s61R) Data.Attoparsec.Number.$fDataNumber_$cgfoldl k_s61Z z_s61Y ds_s61V = select ds_s61V (Data.Attoparsec.Number.I a17_s621 -> k_s61Z Data.Data.$fDataInteger (z_s61Y Data.Attoparsec.Number.$WI) a17_s621) (Data.Attoparsec.Number.D rb_s624 -> k_s61Z Data.Data.$fDataDouble (z_s61Y Data.Attoparsec.Number.$WD) (GHC.Types.D# rb_s624)) Data.Attoparsec.Number.$fTypeableNumber_ds =: GHC.CString.unpackCString# "attoparsec-0.10.4.0" Data.Attoparsec.Number.$fTypeableNumber_ds1 =: GHC.CString.unpackCString# "Data.Attoparsec.Number" Data.Attoparsec.Number.$fTypeableNumber_ds2 =: GHC.CString.unpackCString# "Number" Data.Attoparsec.Number.$fTypeableNumber_wild =: Data.Typeable.Internal.TyCon 5713365588862295363 5669325285264340168 Data.Attoparsec.Number.$fTypeableNumber_ds Data.Attoparsec.Number.$fTypeableNumber_ds1 Data.Attoparsec.Number.$fTypeableNumber_ds2 Data.Attoparsec.Number.$fTypeableNumber1 =: Data.Typeable.Internal.TypeRep 5713365588862295363 5669325285264340168 Data.Attoparsec.Number.$fTypeableNumber_wild <{GHC.Types.[]}> Data.Attoparsec.Number.$fTypeableNumber_$ctypeOf ds_s627 = Data.Attoparsec.Number.$fTypeableNumber1 Data.Attoparsec.Number.$fTypeableNumber =: Data.Attoparsec.Number.$fTypeableNumber_$ctypeOf Data.Attoparsec.Number.$fDataNumber2 =: <{GHC.Tuple.(,)}> Data.Attoparsec.Number.$WI false Data.Attoparsec.Number.$fDataNumber1 =: <{GHC.Tuple.(,)}> Data.Attoparsec.Number.$WD false Data.Attoparsec.Number.$w$cgmapMo ww_s62d ww1_s63d ww2_s62J w_s62q w3_s62W = select ww_s62d (<{GHC.Base.D:Monad}> ww3_s62H ww4_s68W ww5_s62E ww6_s68X -> ww3_s62H (Data.Attoparsec.Number.$w$cgmapMo$4 w3_s62W w_s62q ww2_s62J ww3_s62H ww5_s62E) (Data.Attoparsec.Number.$w$cgmapMo$6 ww1_s63d ww5_s62E)) Data.Attoparsec.Number.$w$cgmapMo$6 ww1_s63d ww5_s62E ds_s637 = select ds_s637 (<{GHC.Tuple.(,)}> <{x'_s63e}> b_s63b -> if b_s63b (ww5_s62E <{x'_s63e}>) ww1_s63d) Data.Attoparsec.Number.$w$cgmapMo$4 w3_s62W w_s62q ww2_s62J ww3_s62H ww5_s62E = select w3_s62W (Data.Attoparsec.Number.I a18_s630 -> Data.Attoparsec.Number.$w$cgmapMo$1 w_s62q ww2_s62J ww3_s62H ww5_s62E Data.Data.$fDataInteger (ww5_s62E Data.Attoparsec.Number.$fDataNumber2) a18_s630) (Data.Attoparsec.Number.D rb_s633 -> Data.Attoparsec.Number.$w$cgmapMo$1 w_s62q ww2_s62J ww3_s62H ww5_s62E Data.Data.$fDataDouble (ww5_s62E Data.Attoparsec.Number.$fDataNumber1) (GHC.Types.D# rb_s633)) Data.Attoparsec.Number.$w$cgmapMo$1 w_s62q ww2_s62J ww3_s62H ww5_s62E $dData1_s62o ds_s62s y_s62p = ww3_s62H ds_s62s (Data.Attoparsec.Number.$w$cgmapMo$7 $dData1_s62o w_s62q ww2_s62J ww3_s62H ww5_s62E y_s62p) Data.Attoparsec.Number.$w$cgmapMo$7 $dData1_s62o w_s62q ww2_s62J ww3_s62H ww5_s62E y_s62p ds1_s62u = select ds1_s62u (<{GHC.Tuple.(,)}> h_s62C b_s62y -> if b_s62y (ww5_s62E (<{GHC.Tuple.(,)}> (h_s62C y_s62p) true)) (ww2_s62J (ww3_s62H (w_s62q $dData1_s62o y_s62p) (Data.Attoparsec.Number.$w$cgmapMo$8 h_s62C ww5_s62E)) (ww5_s62E (<{GHC.Tuple.(,)}> (h_s62C y_s62p) false)))) Data.Attoparsec.Number.$w$cgmapMo$8 h_s62C ww5_s62E <{y'_s62B}> = ww5_s62E (<{GHC.Tuple.(,)}> (h_s62C <{y'_s62B}>) true) Data.Attoparsec.Number.$fDataNumber_$cgmapMo w_s63j w3_s63r w4_s63s = select w_s63j (<{Control.Monad.D:MonadPlus}> ww_s63o ww1_s63p ww2_s63q -> Data.Attoparsec.Number.$w$cgmapMo ww_s63o ww1_s63p ww2_s63q w3_s63r w4_s63s) Data.Attoparsec.Number.$w$cgmapMp ww_s63y ww1_s64u ww2_s642 w_s63L w3_s64d = select ww_s63y (<{GHC.Base.D:Monad}> ww3_s640 ww4_s69e ww5_s63X ww6_s69f -> ww3_s640 (Data.Attoparsec.Number.$w$cgmapMp$5 w3_s64d w_s63L ww2_s642 ww3_s640 ww5_s63X) (Data.Attoparsec.Number.$w$cgmapMp$9 ww1_s64u ww5_s63X)) Data.Attoparsec.Number.$w$cgmapMp$9 ww1_s64u ww5_s63X ds_s64o = select ds_s64o (<{GHC.Tuple.(,)}> <{x'_s64v}> b_s64s -> if b_s64s (ww5_s63X <{x'_s64v}>) ww1_s64u) Data.Attoparsec.Number.$w$cgmapMp$5 w3_s64d w_s63L ww2_s642 ww3_s640 ww5_s63X = select w3_s64d (Data.Attoparsec.Number.I a18_s64h -> Data.Attoparsec.Number.$w$cgmapMp$2 w_s63L ww2_s642 ww3_s640 ww5_s63X Data.Data.$fDataInteger (ww5_s63X Data.Attoparsec.Number.$fDataNumber2) a18_s64h) (Data.Attoparsec.Number.D rb_s64k -> Data.Attoparsec.Number.$w$cgmapMp$2 w_s63L ww2_s642 ww3_s640 ww5_s63X Data.Data.$fDataDouble (ww5_s63X Data.Attoparsec.Number.$fDataNumber1) (GHC.Types.D# rb_s64k)) Data.Attoparsec.Number.$w$cgmapMp$2 w_s63L ww2_s642 ww3_s640 ww5_s63X $dData1_s63J ds_s63N y_s63K = ww3_s640 ds_s63N (Data.Attoparsec.Number.$w$cgmapMp$10 $dData1_s63J w_s63L ww2_s642 ww3_s640 ww5_s63X y_s63K) Data.Attoparsec.Number.$w$cgmapMp$10 $dData1_s63J w_s63L ww2_s642 ww3_s640 ww5_s63X y_s63K ds1_s63P = select ds1_s63P (<{GHC.Tuple.(,)}> h_s63V b_s646 -> ww2_s642 (ww3_s640 (w_s63L $dData1_s63J y_s63K) (Data.Attoparsec.Number.$w$cgmapMp$11 h_s63V ww5_s63X)) (ww5_s63X (<{GHC.Tuple.(,)}> (h_s63V y_s63K) b_s646))) Data.Attoparsec.Number.$w$cgmapMp$11 h_s63V ww5_s63X <{y'_s63U}> = ww5_s63X (<{GHC.Tuple.(,)}> (h_s63V <{y'_s63U}>) true) Data.Attoparsec.Number.$fDataNumber_$cgmapMp w_s64A w3_s64I w4_s64J = select w_s64A (<{Control.Monad.D:MonadPlus}> ww_s64F ww1_s64G ww2_s64H -> Data.Attoparsec.Number.$w$cgmapMp ww_s64F ww1_s64G ww2_s64H w3_s64I w4_s64J) Data.Attoparsec.Number.$w$cgmapM ww_s654 ww1_s652 w_s64V w3_s658 = select w3_s658 (Data.Attoparsec.Number.I a17_s65c -> Data.Attoparsec.Number.$w$cgmapM$3 w_s64V ww1_s652 ww_s654 Data.Data.$fDataInteger (ww1_s652 Data.Attoparsec.Number.$WI) a17_s65c) (Data.Attoparsec.Number.D rb_s65f -> Data.Attoparsec.Number.$w$cgmapM$3 w_s64V ww1_s652 ww_s654 Data.Data.$fDataDouble (ww1_s652 Data.Attoparsec.Number.$WD) (GHC.Types.D# rb_s65f)) Data.Attoparsec.Number.$w$cgmapM$3 w_s64V ww1_s652 ww_s654 $dData1_s64T c_s64X x_s64U = ww_s654 c_s64X (Data.Attoparsec.Number.$w$cgmapM$12 $dData1_s64T w_s64V ww1_s652 ww_s654 x_s64U) Data.Attoparsec.Number.$w$cgmapM$12 $dData1_s64T w_s64V ww1_s652 ww_s654 x_s64U <{c'_s651}> = ww_s654 (w_s64V $dData1_s64T x_s64U) (Data.Attoparsec.Number.$w$cgmapM$13 <{c'_s651}> ww1_s652) Data.Attoparsec.Number.$w$cgmapM$13 <{c'_s651}> ww1_s652 <{x'_s650}> = ww1_s652 (<{c'_s651}> <{x'_s650}>) Data.Attoparsec.Number.$fDataNumber_$cgmapM w_s65k w3_s65s w4_s65t = select w_s65k (<{GHC.Base.D:Monad}> ww_s65q ww1_s69r ww2_s65r ww3_s69s -> Data.Attoparsec.Number.$w$cgmapM ww_s65q ww2_s65r w3_s65s w4_s65t) Data.Attoparsec.Number.$w$cgmapQi ww_s65A w_s65D w3_s65x = select w3_s65x (Data.Attoparsec.Number.I a17_s65C -> select ww_s65A (_ -> Data.Maybe.fromJust1) (0 -> w_s65D Data.Data.$fDataInteger a17_s65C)) (Data.Attoparsec.Number.D rb_s65G -> select ww_s65A (_ -> Data.Maybe.fromJust1) (0 -> w_s65D Data.Data.$fDataDouble (GHC.Types.D# rb_s65G))) Data.Attoparsec.Number.$fDataNumber_$cgmapQi w_s65L w3_s65P w4_s65Q = select w_s65L (GHC.Types.I# ww_s65O -> Data.Attoparsec.Number.$w$cgmapQi ww_s65O w3_s65P w4_s65Q) Data.Attoparsec.Number.$fDataNumber_$cgmapQr o_s660 r0_s662 f_s65Z x0_s65V = select x0_s65V (Data.Attoparsec.Number.I a17_s65Y -> o_s660 (f_s65Z Data.Data.$fDataInteger a17_s65Y) r0_s662) (Data.Attoparsec.Number.D rb_s664 -> o_s660 (f_s65Z Data.Data.$fDataDouble (GHC.Types.D# rb_s664)) r0_s662) Data.Attoparsec.Number.$fDataNumber_$cgmapQ f_s66e eta_s66a = select eta_s66a (Data.Attoparsec.Number.I a17_s66d -> <{GHC.Types.:}> (f_s66e Data.Data.$fDataInteger a17_s66d) <{GHC.Types.[]}>) (Data.Attoparsec.Number.D rb_s66h -> <{GHC.Types.:}> (f_s66e Data.Data.$fDataDouble (GHC.Types.D# rb_s66h)) <{GHC.Types.[]}>) Data.Attoparsec.Number.$fDataNumber_$cgmapQl o_s66v r_s66s f_s66u eta_s66p = select eta_s66p (Data.Attoparsec.Number.I a17_s66t -> o_s66v r_s66s (f_s66u Data.Data.$fDataInteger a17_s66t)) (Data.Attoparsec.Number.D rb_s66y -> o_s66v r_s66s (f_s66u Data.Data.$fDataDouble (GHC.Types.D# rb_s66y))) Data.Attoparsec.Number.$fDataNumber_$cgmapT f_s66I x0_s66E = select x0_s66E (Data.Attoparsec.Number.I a17_s66H -> let !tpl_s66K = f_s66I Data.Data.$fDataInteger a17_s66H in Data.Attoparsec.Number.I tpl_s66K) (Data.Attoparsec.Number.D rb_s66M -> let !tpl_s69J = f_s66I Data.Data.$fDataDouble (GHC.Types.D# rb_s66M) in select tpl_s69J (GHC.Types.D# tpl1_s66Q -> Data.Attoparsec.Number.D tpl1_s66Q)) Data.Attoparsec.Number.$fDataNumber_$cdataCast2 $dTypeable2_s66T ds_s66U = Data.Maybe.Nothing Data.Attoparsec.Number.$fDataNumber_$cdataCast1 $dTypeable1_s66X ds_s66Y = Data.Maybe.Nothing Data.Attoparsec.Number.$fDataNumber =: <{Data.Data.D:Data}> Data.Attoparsec.Number.$fTypeableNumber_$ctypeOf Data.Attoparsec.Number.$fDataNumber_$cgfoldl Data.Attoparsec.Number.$fDataNumber_$cgunfold Data.Attoparsec.Number.$fDataNumber_$ctoConstr Data.Attoparsec.Number.$fDataNumber_$cdataTypeOf Data.Attoparsec.Number.$fDataNumber_$cdataCast1 Data.Attoparsec.Number.$fDataNumber_$cdataCast2 Data.Attoparsec.Number.$fDataNumber_$cgmapT Data.Attoparsec.Number.$fDataNumber_$cgmapQl Data.Attoparsec.Number.$fDataNumber_$cgmapQr Data.Attoparsec.Number.$fDataNumber_$cgmapQ Data.Attoparsec.Number.$fDataNumber_$cgmapQi Data.Attoparsec.Number.$fDataNumber_$cgmapM Data.Attoparsec.Number.$fDataNumber_$cgmapMp Data.Attoparsec.Number.$fDataNumber_$cgmapMo