jhc -v -mfgrin --optc=-march=opteron -o loop loop.hs jhc 0.1 20070303 (nioteadd+12) Compiling [Right "loop.hs"] Loading libraries: ["base","haskell98"] Loading library: "base-1.0" @ "/home/dons/lib/jhc/base-1.0.hl" Found object file: ~/lib/jhc/base-1.0.hl Loading library: "haskell98-1.0" @ "/home/dons/lib/jhc/haskell98-1.0.hl" Found object file: ~/lib/jhc/haskell98-1.0.hl Found object file: loop.ho PassStats Arch: x86_64 Type analyzed methods Jhc.Basics.$ \({Jhc@.->[(0,{Jhc.IO.IOError}),(1,{Jhc.Prim.IO[(0,())]})]})({Jhc.Prim.IO[(0,())]}) Jhc.Basics.++ \({Jhc.Basics.(,)[(0,()),(1,{Jhc.Prim.[][(0,{Jhc.Prim.Char})]})],Jhc.Prim.Int,Jhc.Prim.Char}) Jhc.Basics.foldl \({Jhc.Basics.Integer})({Jhc.Basics.Integer}) Jhc.Basics.reverse \({Jhc.Basics.Integer}) Jhc.Basics.concatMap \({Jhc.Basics.(,)[(0,()),(1,{Jhc.Prim.[][(0,{Jhc.Prim.Char})]})]})({Jhc.Prim.Int}) Prelude.+ \({Jhc.Prim.Int,Jhc.Basics.Integer}) Prelude.- \({Jhc.Prim.Int,Jhc.Basics.Integer}) Prelude.* \({Jhc.Prim.Int,Jhc.Basics.Integer}) Prelude.negate \({Jhc.Basics.Integer,Jhc.Float.Double}) Prelude.signum \({Jhc.Basics.Integer}) Prelude.fromInteger \({Jhc.Prim.Int}) Prelude.fromInt \({Jhc.Prim.Int,Jhc.Basics.Integer,Jhc.Float.Double}) Prelude.quot \({Jhc.Prim.Int,Jhc.Basics.Integer}) Prelude.rem \({Jhc.Prim.Int,Jhc.Basics.Integer}) Prelude.quotRem \({Jhc.Basics.Integer}) Prelude.toInt \({Jhc.Basics.Integer}) Prelude.properFraction \({Jhc.Float.Double})({Jhc.Prim.Int}) Prelude.floatRadix \({Jhc.Float.Double}) Prelude.floatDigits \({Jhc.Float.Double}) Prelude.floatRange \({Jhc.Float.Double}) Prelude.decodeFloat \({Jhc.Float.Double}) Prelude.isNaN \({Jhc.Float.Double}) Prelude.isInfinite \({Jhc.Float.Double}) Prelude.isNegativeZero \({Jhc.Float.Double}) Prelude.even \({Jhc.Prim.Int}) Prelude.^ \({Jhc.Prim.Int,Jhc.Basics.Integer})({Jhc.Prim.Int}) Prelude.head \({Jhc.Prim.[][(0,{Jhc.Prim.Char})]}) Prelude.init \({Jhc.Prim.Int}) Prelude.foldl1 \({Jhc.Basics.Integer}) Prelude.take \({Jhc.Prim.Char}) Prelude.drop \({Jhc.Prim.Char}) Jhc.IO.ioError \({Jhc.Prim.Int,Jhc.Addr.Ptr[(0,())]}) Jhc.IO.catch \({Jhc.Basics.()}) Jhc.IO.error \({Jhc.Prim.[][(0,{Jhc.Prim.Char})]}) Jhc.Monad.>>= \({Jhc.Prim.IO})({Jhc.Prim.[][(0,())]})({Jhc.Prim.[][(0,())]}) Jhc.Monad.>> \({Jhc.Prim.IO})({Jhc.Basics.()})({Jhc.Basics.()}) Jhc.Monad.return \({Jhc.Prim.IO})({Jhc.Prim.[][(0,())],Jhc.Basics.()}) Jhc.Monad.mapM \({Jhc.Prim.IO})({Jhc.Prim.Int})({Jhc.Prim.[][(0,{Jhc.Prim.Char})]}) Jhc.Monad.mapM_ \({Jhc.Prim.IO})({Jhc.Prim.Char})({Jhc.Basics.()}) Jhc.Order.== \({Jhc.Prim.Int,Jhc.Prim.[][(0,{Jhc.Prim.Char})],Jhc.Prim.Char,Foreign.C.Types.CInt,Jhc.Basics.Integer,Jhc.Float.Double,Foreign.C.Types.CChar}) Jhc.Order.< \({Jhc.Basics.Integer,Jhc.Float.Double}) Jhc.Order.<= \({Jhc.Prim.Int}) Jhc.Order.> \({Jhc.Prim.Int,Jhc.Float.Double}) Prelude.Text.readsPrec \({Jhc.Prim.Int}) Prelude.Text.showsPrec \({Jhc.Prim.Int,Jhc.Prim.[][(0,{Jhc.Prim.Char})],Jhc.Basics.Integer,Jhc.Float.Double}) Prelude.Text.show \({Jhc.Basics.Integer}) Prelude.Text.showList \({Jhc.Prim.Char}) Prelude.Text.reads \({Jhc.Prim.Int}) Prelude.Text.shows \({Jhc.Prim.Int}) Prelude.IO.readIO \({Jhc.Prim.Int}) Jhc.IO.unsafePerformIO \({Jhc.Basics.(,)[(0,{Jhc.Basics.Integer}),(1,{Jhc.Prim.Int})]}) Jhc.IO.showError \({Jhc.Basics.(,)[(0,{Jhc.Basics.Integer}),(1,{Jhc.Prim.Int})],Jhc.Prim.Int,Jhc.Addr.Ptr[(0,())]}) Jhc.IO.errorContinuation \({Jhc.Basics.(,)[(0,{Jhc.Basics.Integer}),(1,{Jhc.Prim.Int})]}) Jhc.IO.runMain \({Jhc.Basics.()}) Jhc.IO.exitFailure \({Jhc.Basics.()}) Jhc.IO.thenIO_ \({Jhc.Basics.()}) Foreign.Storable.sizeOf \({Foreign.C.Types.CInt,Jhc.Addr.Ptr[(0,{Jhc.Addr.Ptr[(0,{Foreign.C.Types.CChar})],Foreign.C.Types.CChar})],Foreign.C.Types.CChar}) Foreign.Storable.peekElemOff \({Foreign.C.Types.CChar}) Foreign.Storable.peek \({Jhc.Addr.Ptr[(0,{Foreign.C.Types.CChar})],Foreign.C.Types.CChar}) Numeric.showInt \({Jhc.Basics.Integer}) Numeric.showIntAtBase \({Jhc.Basics.Integer}) Numeric.readSigned \({Jhc.Basics.Integer}) Numeric.readInt \({Jhc.Basics.Integer}) Numeric.readDec \({Jhc.Basics.Integer}) Numeric.showGFloat \({Jhc.Float.Double}) Numeric.showFloat \({Jhc.Float.Double}) Numeric.formatRealFloat \({Jhc.Float.Double}) Foreign.Marshal.Alloc.alloca \({Foreign.C.Types.CInt,Jhc.Addr.Ptr[(0,{Jhc.Addr.Ptr[(0,{Foreign.C.Types.CChar})]})]})({Jhc.Basics.(,)[(0,{Jhc.Basics.Integer}),(1,{Jhc.Prim.Int})],Jhc.Prim.[][(0,{Jhc.Prim.[][(0,{Jhc.Prim.Char})]})]}) Foreign.Marshal.Alloc.failWhenNULL \({Foreign.C.Types.CInt,Jhc.Addr.Ptr[(0,{Jhc.Addr.Ptr[(0,{Foreign.C.Types.CChar})]})]}) Instance@.iJhc.Monad.>>=.Jhc.Prim.IO \({Jhc.Prim.[][(0,())]})({Jhc.Prim.[][(0,())]}) Instance@.iJhc.Monad.>>.Jhc.Prim.IO \({Jhc.Basics.()})({Jhc.Basics.()}) Instance@.iJhc.Monad.return.Jhc.Prim.IO \({Jhc.Prim.[][(0,())],Jhc.Basics.()}) W@.fJhc.List.!! \({Jhc.Prim.[][(0,{Jhc.Prim.Char})]}) W@.fJhc.IO.exitFailure \({Jhc.Basics.()}) Instance@.iJhc.Order.==.Jhc.Prim.[] \({Jhc.Prim.Char}) Instance@.iJhc.Order.max.default \({Jhc.Prim.Int}) W@.fInstance@.iJhc.Order.==.Jhc.Prim.[] \({Jhc.Prim.Char}) W@.fInstance@.iJhc.Order./=.default \({Jhc.Prim.[][(0,{Jhc.Prim.Char})],Foreign.C.Types.CInt}) Instance@.iForeign.Storable.peekElemOff.default \({Foreign.C.Types.CChar}) W@.fInstance@.iForeign.Storable.peekElemOff.default \({Jhc.Addr.Ptr[(0,{Foreign.C.Types.CChar})],Foreign.C.Types.CChar}) Instance@.iForeign.Storable.peek.Jhc.Addr.Ptr \({Foreign.C.Types.CChar}) Instance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr \({Jhc.Addr.Ptr[(0,{Foreign.C.Types.CChar})],Foreign.C.Types.CChar}) Instance@.iPrelude.properFraction.Jhc.Float.Double \({Jhc.Prim.Int}) Instance@.iPrelude.Text.showsPrec.Jhc.Prim.[] \({Jhc.Prim.Char}) Instance@.iPrelude.Text.show.default \({Jhc.Prim.Int,Jhc.Prim.[][(0,{Jhc.Prim.Char})],Jhc.Basics.Integer,Jhc.Float.Double}) Instance@.iPrelude.ceiling.default \({Jhc.Float.Double})({Jhc.Prim.Int}) Instance@.iPrelude.quotRem.default \({Jhc.Basics.Integer}) Instance@.iPrelude.divMod.default \({Jhc.Basics.Integer}) W@.fInstance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr \({Jhc.Addr.Ptr[(0,{Foreign.C.Types.CChar})],Foreign.C.Types.CChar}) W@.fInstance@.iForeign.Storable.peek.Jhc.Addr.Ptr \({Foreign.C.Types.CChar}) W@.fForeign.Marshal.Array.lengthArray0 \({Foreign.C.Types.CChar}) W@.fForeign.Marshal.Alloc.mallocBytes \({Foreign.C.Types.CInt,Jhc.Addr.Ptr[(0,{Jhc.Addr.Ptr[(0,{Foreign.C.Types.CChar})]})]}) W@.fForeign.Marshal.Alloc.allocaBytes \({Foreign.C.Types.CInt,Jhc.Addr.Ptr[(0,{Jhc.Addr.Ptr[(0,{Foreign.C.Types.CChar})]})]})({Jhc.Basics.(,)[(0,{Jhc.Basics.Integer}),(1,{Jhc.Prim.Int})],Jhc.Prim.[][(0,{Jhc.Prim.[][(0,{Jhc.Prim.Char})]})]}) W@.fPrelude.span \({Jhc.Prim.Char}) W@.fPrelude.splitAt \({Jhc.Prim.Char}) W@.fPrelude.replicate \({Jhc.Prim.Int}) W@.fInstance@.iPrelude.quotRem.default \({Jhc.Basics.Integer}) W@.fInstance@.iPrelude.properFraction.Jhc.Float.Double \({Jhc.Prim.Int}) W@.fNumeric.floatToDigits \({Jhc.Float.Double}) W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[] \({Jhc.Prim.Char}) W@.fPrelude.Text.readParen \({Jhc.Basics.Integer}) -- typeAnalyze-Main-AfterMethod -- Simplify-Main-One -- Simplify-Main-One -- Simplify-Main-One -- Simplify-Main-One -- Simplify-Main-One -- Simplify-Main-One -- Simplify-Main-One -- Simplify-Main-One -- Simplify-Main-One -- Simplify-Main-One Total: Main-One ├╴E │ ├╴PrimOpt │ │ ├╴(double): 4 │ │ ├╴(int)==(char,char).ec: 1 │ │ ├╴(int)==(int,int).ec: 2 │ │ ├╴(int)==(intmax_t,intmax_t).ec: 7 │ │ ├╴(intmax_t): 3 │ │ ╰╴(intmax_t)-(intmax_t).c: 3 │ ╰╴Simplify │ ├╴application-push │ │ ├╴case: 30 │ │ ╰╴let: 15 │ ├╴case-atomic-unboxed: 11 │ ├╴case-default-case: 8 │ ├╴case-improve-default.[(#2#)]: 1 │ ├╴case-lambda: 1 │ ├╴case-of-bottom: 5 │ ├╴case-of-case: 114 │ ├╴case-of-case-join: 10 │ ├╴f-beta-reduce: 39 │ ├╴inline │ │ ├╴Forced: 83 │ │ ├╴Many: 40 │ │ ├╴ManyBranch: 9 │ │ ├╴Once: 44 │ │ ├╴OnceInLam: 46 │ │ ╰╴atomic: 54 │ ├╴known-case │ │ ├╴(#2#): 11 │ │ ├╴-1: 1 │ │ ├╴0: 6 │ │ ├╴1: 5 │ │ ├╴Addr#: 3 │ │ ├╴CChar#: 1 │ │ ├╴Double#: 7 │ │ ├╴Foreign.C.Types.CChar: 1 │ │ ├╴Int#: 29 │ │ ├╴Integer#: 25 │ │ ├╴Jhc │ │ │ ├╴Basics │ │ │ │ ├╴(,): 4 │ │ │ │ ╰╴Integer: 4 │ │ │ ├╴Float.Double: 8 │ │ │ ├╴Options.Target#: 5 │ │ │ ├╴Order.Bool#: 13 │ │ │ ╰╴Prim │ │ │ ├╴Char: 1 │ │ │ ├╴IO: 3 │ │ │ ╰╴Int: 3 │ │ ├╴Numeric.FFFormat#: 3 │ │ ├╴Prelude.Nothing: 4 │ │ ╰╴_: 53 │ ├╴let-coalesce: 43 │ ├╴let-from-case: 31 │ ╰╴strictness.cheap-eagerness.def: 4 ├╴EtaExpand │ ├╴def │ │ ├╴Foreign.Storable.peek: 2 │ │ ├╴Foreign.Storable.sizeOf: 1 │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer: 3 │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 1 │ │ ├╴Jhc.Monad.af@17471: 1 │ │ ├╴Jhc.Monad.af@17647: 1 │ │ ├╴Jhc.Order.<: 2 │ │ ├╴Jhc.Order.==: 2 │ │ ├╴Jhc.Order.>: 2 │ │ ├╴Numeric.readDec: 1 │ │ ├╴Prelude.*: 2 │ │ ├╴Prelude.+: 2 │ │ ├╴Prelude.-: 2 │ │ ├╴Prelude.Text.showsPrec: 2 │ │ ├╴Prelude.fromInt: 1 │ │ ├╴Prelude.negate: 1 │ │ ├╴Prelude.quot: 2 │ │ ├╴Prelude.rem: 2 │ │ ├╴W@.fInstance@.iPrelude.Text.readsPrec.Jhc.Basics.Integer: 1 │ │ ├╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 1 │ │ ├╴x10330: 1 │ │ ├╴x334: 1 │ │ ├╴x3428: 1 │ │ ╰╴x5706: 1 │ ├╴min │ │ ╰╴def │ │ ├╴Jhc.IO.catch: 1 │ │ ├╴Jhc.Monad.mapM: 1 │ │ ├╴Prelude.IO.putStr: 1 │ │ ├╴Prelude.IO.readIO: 1 │ │ ├╴W@.fData.Char.showLitChar: 1 │ │ ├╴x10350: 1 │ │ ╰╴x5726: 1 │ ╰╴use │ ├╴Data.Char.fl@2$38484: 1 │ ├╴Foreign.Storable.peek: 1 │ ├╴Instance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr: 1 │ ├╴Instance@.iJhc.Monad.>>=.Jhc.Prim.IO: 3 │ ├╴Instance@.iJhc.Monad.return.Jhc.Prim.IO: 2 │ ├╴Instance@.iPrelude.Text.show.default: 1 │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer: 2 │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.[]: 1 │ ├╴Jhc.IO.catch: 1 │ ├╴Prelude.IO.putChar: 1 │ ├╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 1 │ ╰╴x9388: 1 ╰╴Rule ╰╴User ├╴Rule │ ├╴Instance@.iForeign.Storable.peekElemOff.Foreign.C.Types.CChar: 1 │ ├╴Instance@.iJhc.Monad.>>.Jhc.Prim.IO: 1 │ ├╴Instance@.iJhc.Monad.>>=.Jhc.Prim.IO: 2 │ ├╴Instance@.iJhc.Monad.return.Jhc.Prim.IO: 3 │ ├╴Instance@.iJhc.Order.<.Jhc.Basics.Integer: 1 │ ├╴Instance@.iJhc.Order.<.Jhc.Float.Double: 2 │ ├╴Instance@.iJhc.Order.<=.Jhc.Prim.Int: 1 │ ├╴Instance@.iJhc.Order.==.Foreign.C.Types.CChar: 1 │ ├╴Instance@.iJhc.Order.==.Jhc.Basics.Integer: 2 │ ├╴Instance@.iJhc.Order.==.Jhc.Float.Double: 1 │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.Char: 1 │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.Int: 3 │ ├╴Instance@.iJhc.Order.>.Jhc.Float.Double: 1 │ ├╴Instance@.iJhc.Order.>.Jhc.Prim.Int: 1 │ ├╴Instance@.iPrelude.*.Jhc.Basics.Integer: 1 │ ├╴Instance@.iPrelude.*.Jhc.Prim.Int: 1 │ ├╴Instance@.iPrelude.+.Jhc.Basics.Integer: 2 │ ├╴Instance@.iPrelude.+.Jhc.Prim.Int: 1 │ ├╴Instance@.iPrelude.-.Jhc.Basics.Integer: 1 │ ├╴Instance@.iPrelude.-.Jhc.Prim.Int: 2 │ ├╴Instance@.iPrelude.Text.readsPrec.Jhc.Prim.Int: 1 │ ├╴Instance@.iPrelude.Text.show.Jhc.Basics.Integer: 1 │ ├╴Instance@.iPrelude.Text.showList.Jhc.Prim.Char: 1 │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 1 │ ├╴Instance@.iPrelude.decodeFloat.Jhc.Float.Double: 1 │ ├╴Instance@.iPrelude.floatDigits.Jhc.Float.Double: 1 │ ├╴Instance@.iPrelude.floatRadix.Jhc.Float.Double: 1 │ ├╴Instance@.iPrelude.floatRange.Jhc.Float.Double: 1 │ ├╴Instance@.iPrelude.fromInt.Jhc.Basics.Integer: 6 │ ├╴Instance@.iPrelude.fromInt.Jhc.Float.Double: 4 │ ├╴Instance@.iPrelude.fromInt.Jhc.Prim.Int: 9 │ ├╴Instance@.iPrelude.fromInteger.Jhc.Prim.Int: 3 │ ├╴Instance@.iPrelude.isInfinite.Jhc.Float.Double: 1 │ ├╴Instance@.iPrelude.isNaN.Jhc.Float.Double: 1 │ ├╴Instance@.iPrelude.isNegativeZero.Jhc.Float.Double: 1 │ ├╴Instance@.iPrelude.negate.Jhc.Basics.Integer: 2 │ ├╴Instance@.iPrelude.negate.Jhc.Float.Double: 2 │ ├╴Instance@.iPrelude.properFraction.Jhc.Float.Double: 1 │ ├╴Instance@.iPrelude.quot.Jhc.Basics.Integer: 1 │ ├╴Instance@.iPrelude.quot.Jhc.Prim.Int: 1 │ ├╴Instance@.iPrelude.quotRem.Jhc.Basics.Integer: 2 │ ├╴Instance@.iPrelude.rem.Jhc.Basics.Integer: 1 │ ├╴Instance@.iPrelude.rem.Jhc.Prim.Int: 1 │ ├╴Instance@.iPrelude.signum.Jhc.Basics.Integer: 2 │ ╰╴Instance@.iPrelude.toInt.Jhc.Basics.Integer: 1 ╰╴Specialize ├╴Spec@.Numeric.19.fNumeric.showIntAtBase: 2 ├╴Spec@.Numeric.56.fNumeric.readInt: 1 ╰╴Spec@.Prelude.204.fPrelude.even: 1 -- typeAnalyze-Main-AfterSimp -- Simplify-Main-Two -- Simplify-Main-Two -- Simplify-Main-Two -- Simplify-Main-Two -- Simplify-Main-Two Total: Main-Two ├╴E │ ├╴PrimOpt.(size_t): 1 │ ╰╴Simplify │ ├╴inline.Forced: 1 │ ╰╴known-case │ ├╴Int#: 1 │ ╰╴_: 2 ╰╴Rule.User.Rule.Instance@.iForeign.Storable.sizeOf.Foreign.C.Types.CInt: 1 -- Simplify-SuperSimplify no rules -- Simplify-SuperSimplify no rules -- Simplify-SuperSimplify no rules -- Simplify-SuperSimplify no rules -- Simplify-SuperSimplify no rules -- Simplify-SuperSimplify no rules Total: SuperSimplify no rules ├╴E │ ├╴PrimOpt │ │ ├╴(double): 1 │ │ ├╴(int)*(int,int).ec: 2 │ │ ├╴(int)==(int,int).ec: 3 │ │ ╰╴(intmax_t): 1 │ ╰╴Simplify │ ├╴application-push │ │ ├╴case: 2 │ │ ╰╴let: 1 │ ├╴case-atomic-unboxed: 2 │ ├╴case-default-case: 4 │ ├╴case-of-case: 81 │ ├╴case-of-case-join: 1 │ ├╴f-beta-reduce: 4 │ ├╴inline │ │ ├╴Many: 18 │ │ ├╴ManyBranch: 16 │ │ ├╴Once: 20 │ │ ├╴OnceInLam: 12 │ │ ╰╴atomic: 20 │ ├╴known-case │ │ ├╴(#2#): 3 │ │ ├╴0: 6 │ │ ├╴1: 6 │ │ ├╴Addr#: 7 │ │ ├╴CChar#: 2 │ │ ├╴CInt#: 6 │ │ ├╴Double#: 3 │ │ ├╴Foreign │ │ │ ╰╴C │ │ │ ╰╴Types │ │ │ ├╴CChar: 4 │ │ │ ╰╴CInt: 3 │ │ ├╴Int#: 9 │ │ ├╴Jhc │ │ │ ├╴Addr.Ptr: 2 │ │ │ ├╴Basics.Integer: 1 │ │ │ ├╴Float.Double: 1 │ │ │ ├╴Order.Bool#: 13 │ │ │ ╰╴Prim │ │ │ ├╴Int: 4 │ │ │ ╰╴[]: 2 │ │ ╰╴_: 19 │ ├╴let-coalesce: 9 │ ╰╴let-from-case: 7 ╰╴EtaExpand ╰╴min ╰╴def ├╴Prelude.Text.showsPrec: 1 ╰╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double: 1 -- BoxifyProgram -- Boxy WorkWrap -- Simplify-SuperSimplify after Boxy WorkWrap -- Simplify-SuperSimplify after Boxy WorkWrap -- Simplify-SuperSimplify after Boxy WorkWrap -- Simplify-SuperSimplify after Boxy WorkWrap -- Simplify-SuperSimplify after Boxy WorkWrap -- Simplify-SuperSimplify after Boxy WorkWrap -- Simplify-SuperSimplify after Boxy WorkWrap -- Simplify-SuperSimplify after Boxy WorkWrap Total: SuperSimplify after Boxy WorkWrap ╰╴E ╰╴Simplify ├╴case-default-case: 1 ├╴case-improve-default.[Jhc.Order.Bool#]: 2 ├╴case-of-bottom': 1 ├╴case-of-case: 154 ├╴case-of-case-join: 5 ├╴case-omittable: 2 ├╴case-trailing: 18 ├╴f-beta-reduce: 4 ├╴inline │ ├╴Many: 22 │ ├╴ManyBranch: 10 │ ├╴Once: 43 │ ├╴OnceInLam: 21 │ ╰╴atomic: 61 ├╴known-case │ ├╴(#2#): 11 │ ├╴Char#: 9 │ ├╴Double#: 5 │ ├╴Int#: 10 │ ├╴Integer#: 15 │ ├╴Jhc │ │ ├╴Basics.(,): 8 │ │ ╰╴Order.Bool#: 53 │ ╰╴_: 29 ├╴let-coalesce: 30 ├╴let-from-case: 30 ╰╴strictness.let-to-case: 7 -- LambdaLift Finding fixpoint for Liftees: [1272](1272)(14)(1) (3318::Unknown,"Not Lifted") (3394::Unknown,"Not Lifted") (3878::Unknown,"Not Lifted") (3880::Unknown,"Not Lifted") (3916::Unknown,"Not Lifted") (3992::Unknown,"Not Lifted") (R@.fJhc.Basics.112_rev::Unknown,"Not Lifted") (5660::Unknown,"Not Lifted") (R@.fPrelude.Text.lex::Unknown,"Not Lifted") (5852::Unknown,"Not Lifted") (6438::Unknown,"Not Lifted") (R@.fJhc.IO.putErrLn::Unknown,"Not Lifted") (Jhc.String.16_f::Unknown,"Not Lifted") (W@.f17290::Unknown,"Not Lifted") (W@.fForeign.C.String.5_loop::Unknown,"Not Lifted") (23154::Unknown,"Not Lifted") PostLifting ├╴E │ ╰╴Simplify │ ├╴f-beta-reduce │ │ ├╴x112: 1 │ │ ├╴x128: 1 │ │ ├╴x146: 1 │ │ ├╴x162: 1 │ │ ├╴x178: 1 │ │ ├╴x46: 1 │ │ ├╴x62: 1 │ │ ├╴x78: 1 │ │ ╰╴x96: 1 │ ├╴inline │ │ ├╴Forced │ │ │ ├╴x1790: 2 │ │ │ ├╴x3394: 9 │ │ │ ╰╴x4950: 3 │ │ ├╴Many.(epheremal): 6 │ │ ├╴ManyBranch.(epheremal): 15 │ │ ╰╴atomic │ │ ├╴x100: 1 │ │ ├╴x116: 1 │ │ ├╴x132: 1 │ │ ├╴x150: 1 │ │ ├╴x166: 1 │ │ ├╴x182: 1 │ │ ├╴x50: 1 │ │ ├╴x66: 1 │ │ ╰╴x82: 1 │ ├╴known-case │ │ ├╴0: 6 │ │ ├╴1: 3 │ │ ╰╴Jhc │ │ ├╴Basics.(,): 9 │ │ ╰╴Order.Bool#: 9 │ ├╴let-coalesce: 34 │ ├╴let-from-case: 12 │ ╰╴strictness │ ╰╴let-to-case │ ├╴x4130: 1 │ ├╴x4134: 1 │ ╰╴x5924: 1 ╰╴EtaExpand ╰╴min ╰╴def ├╴x1790: 1 ├╴x2308: 1 ├╴x3526: 1 ├╴x4236: 1 ├╴x4384: 1 ├╴x4440: 1 ├╴x4950: 15 ├╴x5142: 1 ├╴x5974: 1 ├╴x6058: 1 ├╴x6186: 1 ├╴x6256: 1 ╰╴x7068: 1 E ├╴case: 760 ├╴case-alt: 1058 ├╴error: 23 ├╴lambda: 405 ├╴let-binding: 595 ├╴lit: 2227 ├╴other: 876 ├╴prim: 402 ╰╴var-use: 2407 PassStats ├╴Barendregt: 8 ├╴BoxifyProgram: 1 ├╴Boxy WorkWrap │ ╰╴E │ ╰╴Workwrap │ ├╴CPR │ │ ├╴Jhc.Basics.(,): 2 │ │ ╰╴Jhc.Order.Bool#: 10 │ ╰╴arg │ ├╴Char#: 9 │ ├╴Double#: 4 │ ├╴Int#: 4 │ ├╴Integer#: 6 │ ├╴Jhc.Basics.(,) │ │ ├╴Double#: 1 │ │ ╰╴Int#: 1 │ ├╴Jhc.Order.Bool#: 1 │ ╰╴absent: 1 ├╴EtaExpansion-Main-AfterOne: 1 ├╴LambdaLift │ ╰╴E │ ╰╴LambdaLift │ ├╴doBigLift │ │ ├╴Case │ │ │ ├╴1: 63 │ │ │ ├╴2: 24 │ │ │ ├╴3: 2 │ │ │ ├╴5: 1 │ │ │ ╰╴6: 1 │ │ ╰╴Lambda │ │ ├╴1: 11 │ │ ├╴2: 5 │ │ ╰╴4: 1 │ ├╴doBigLiftR │ │ ╰╴Lambda │ │ ├╴1: 14 │ │ ├╴2: 2 │ │ ╰╴4: 1 │ ├╴doLift │ │ ├╴Lambda │ │ │ ├╴1: 13 │ │ │ ╰╴2: 2 │ │ ╰╴Other.0: 1 │ ╰╴doLiftR │ ╰╴Lambda │ ├╴1: 23 │ ├╴2: 5 │ ╰╴3: 2 ├╴PruneUnreachable: 3 ├╴Simplify-Main-One │ ├╴E │ │ ├╴PrimOpt │ │ │ ├╴(double): 4 │ │ │ ├╴(int)==(char,char).ec: 1 │ │ │ ├╴(int)==(int,int).ec: 2 │ │ │ ├╴(int)==(intmax_t,intmax_t).ec: 7 │ │ │ ├╴(intmax_t): 3 │ │ │ ╰╴(intmax_t)-(intmax_t).c: 3 │ │ ╰╴Simplify │ │ ├╴application-push │ │ │ ├╴case: 30 │ │ │ ╰╴let: 15 │ │ ├╴case-atomic-unboxed: 11 │ │ ├╴case-default-case: 8 │ │ ├╴case-improve-default.[(#2#)]: 1 │ │ ├╴case-lambda: 1 │ │ ├╴case-of-bottom: 5 │ │ ├╴case-of-case: 114 │ │ ├╴case-of-case-join: 10 │ │ ├╴f-beta-reduce │ │ │ ├╴_: 2 │ │ │ ├╴x10360: 1 │ │ │ ├╴x10362: 1 │ │ │ ├╴x10394: 1 │ │ │ ├╴x2414: 1 │ │ │ ├╴x2564: 1 │ │ │ ├╴x2928: 1 │ │ │ ├╴x2964: 1 │ │ │ ├╴x3618: 1 │ │ │ ├╴x3622: 1 │ │ │ ├╴x3784: 1 │ │ │ ├╴x3786: 1 │ │ │ ├╴x5264: 1 │ │ │ ├╴x5276: 1 │ │ │ ├╴x5280: 1 │ │ │ ├╴x5282: 1 │ │ │ ├╴x5288: 1 │ │ │ ├╴x5292: 1 │ │ │ ├╴x5296: 1 │ │ │ ├╴x5300: 1 │ │ │ ├╴x5304: 1 │ │ │ ├╴x5308: 1 │ │ │ ├╴x5312: 1 │ │ │ ├╴x5316: 1 │ │ │ ├╴x5342: 1 │ │ │ ├╴x5824: 1 │ │ │ ├╴x6072: 1 │ │ │ ├╴x6328: 1 │ │ │ ├╴x6418: 1 │ │ │ ├╴x9340: 1 │ │ │ ├╴x9448: 1 │ │ │ ├╴x9450: 1 │ │ │ ├╴x9458: 1 │ │ │ ├╴x9488: 1 │ │ │ ├╴x9494: 1 │ │ │ ├╴x9498: 1 │ │ │ ├╴x9502: 1 │ │ │ ╰╴x9736: 1 │ │ ├╴inline │ │ │ ├╴Forced │ │ │ │ ├╴Data.Char.digitToInt: 1 │ │ │ │ ├╴Instance@.iForeign.Storable.peek.Foreign.C.Types.CChar: 1 │ │ │ │ ├╴Instance@.iForeign.Storable.peek.Jhc.Addr.Ptr: 1 │ │ │ │ ├╴Instance@.iForeign.Storable.peekElemOff.default: 1 │ │ │ │ ├╴Instance@.iForeign.Storable.sizeOf.Foreign.C.Types.CChar: 1 │ │ │ │ ├╴Instance@.iForeign.Storable.sizeOf.Foreign.C.Types.CInt: 1 │ │ │ │ ├╴Instance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr: 1 │ │ │ │ ├╴Instance@.iJhc.Order.<.Jhc.Float.Double: 2 │ │ │ │ ├╴Instance@.iJhc.Order.<=.Jhc.Prim.Int: 1 │ │ │ │ ├╴Instance@.iJhc.Order.==.Foreign.C.Types.CChar: 2 │ │ │ │ ├╴Instance@.iJhc.Order.==.Foreign.C.Types.CInt: 1 │ │ │ │ ├╴Instance@.iJhc.Order.==.Jhc.Basics.Integer: 2 │ │ │ │ ├╴Instance@.iJhc.Order.==.Jhc.Float.Double: 2 │ │ │ │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.Char: 2 │ │ │ │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.Int: 3 │ │ │ │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.[]: 1 │ │ │ │ ├╴Instance@.iJhc.Order.>.Jhc.Float.Double: 1 │ │ │ │ ├╴Instance@.iJhc.Order.>.Jhc.Prim.Int: 1 │ │ │ │ ├╴Instance@.iPrelude.*.Jhc.Basics.Integer: 1 │ │ │ │ ├╴Instance@.iPrelude.*.Jhc.Prim.Int: 2 │ │ │ │ ├╴Instance@.iPrelude.+.Jhc.Basics.Integer: 1 │ │ │ │ ├╴Instance@.iPrelude.+.Jhc.Prim.Int: 1 │ │ │ │ ├╴Instance@.iPrelude.-.Jhc.Basics.Integer: 1 │ │ │ │ ├╴Instance@.iPrelude.-.Jhc.Prim.Int: 2 │ │ │ │ ├╴Instance@.iPrelude.Text.readsPrec.Jhc.Prim.Int: 1 │ │ │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Float.Double: 1 │ │ │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 2 │ │ │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.[]: 1 │ │ │ │ ├╴Instance@.iPrelude.floatDigits.Jhc.Float.Double: 1 │ │ │ │ ├╴Instance@.iPrelude.floatRadix.Jhc.Float.Double: 1 │ │ │ │ ├╴Instance@.iPrelude.floatRange.Jhc.Float.Double: 1 │ │ │ │ ├╴Instance@.iPrelude.fromInt.Jhc.Basics.Integer: 4 │ │ │ │ ├╴Instance@.iPrelude.fromInt.Jhc.Float.Double: 5 │ │ │ │ ├╴Instance@.iPrelude.fromInt.Jhc.Prim.Int: 8 │ │ │ │ ├╴Instance@.iPrelude.fromInteger.Jhc.Prim.Int: 3 │ │ │ │ ├╴Instance@.iPrelude.isInfinite.Jhc.Float.Double: 1 │ │ │ │ ├╴Instance@.iPrelude.isNaN.Jhc.Float.Double: 1 │ │ │ │ ├╴Instance@.iPrelude.isNegativeZero.Jhc.Float.Double: 1 │ │ │ │ ├╴Instance@.iPrelude.negate.Jhc.Basics.Integer: 2 │ │ │ │ ├╴Instance@.iPrelude.negate.Jhc.Float.Double: 2 │ │ │ │ ├╴Instance@.iPrelude.properFraction.Jhc.Float.Double: 1 │ │ │ │ ├╴Instance@.iPrelude.quot.Jhc.Basics.Integer: 1 │ │ │ │ ├╴Instance@.iPrelude.quot.Jhc.Prim.Int: 1 │ │ │ │ ├╴Instance@.iPrelude.quotRem.default: 1 │ │ │ │ ├╴Instance@.iPrelude.rem.Jhc.Basics.Integer: 1 │ │ │ │ ├╴Instance@.iPrelude.signum.Jhc.Basics.Integer: 2 │ │ │ │ ├╴Jhc.Basics.$: 1 │ │ │ │ ├╴Jhc.IO.exitFailure: 1 │ │ │ │ ├╴Jhc.IO.runMain: 1 │ │ │ │ ├╴Prelude.IO.putChar: 1 │ │ │ │ ├╴Spec@.Numeric.19.fNumeric.showIntAtBase: 1 │ │ │ │ ├╴Spec@.Prelude.204.fPrelude.even: 1 │ │ │ │ ├╴x10242: 1 │ │ │ │ ╰╴x9388: 1 │ │ │ ├╴Many │ │ │ │ ├╴(epheremal): 11 │ │ │ │ ├╴Instance@.iJhc.Monad.>>.Jhc.Prim.IO: 1 │ │ │ │ ├╴Instance@.iJhc.Monad.>>=.Jhc.Prim.IO: 2 │ │ │ │ ├╴Instance@.iJhc.Monad.return.Jhc.Prim.IO: 4 │ │ │ │ ├╴Jhc.IO.catch: 1 │ │ │ │ ├╴Jhc.IO.ioError: 3 │ │ │ │ ├╴Jhc.IO.showError: 3 │ │ │ │ ├╴Jhc.IO.showIOError: 1 │ │ │ │ ├╴Jhc.IO.thenIO_: 2 │ │ │ │ ├╴Prelude.64_patrhs@4: 3 │ │ │ │ ├╴Prelude.foldl1: 1 │ │ │ │ ├╴W@.fInstance@.iForeign.Storable.peek.Jhc.Addr.Ptr: 1 │ │ │ │ ├╴W@.fInstance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.quotRem.default: 2 │ │ │ │ ├╴W@.fJhc.IO.exitFailure: 1 │ │ │ │ ├╴W@.fPrelude.IO.putChar: 1 │ │ │ │ ╰╴W@.fSpec@.Prelude.204.fPrelude.even: 1 │ │ │ ├╴ManyBranch.(epheremal): 9 │ │ │ ├╴Once │ │ │ │ ├╴(epheremal): 39 │ │ │ │ ├╴Numeric.showInt: 1 │ │ │ │ ├╴Prelude.137_patrhs@7: 1 │ │ │ │ ├╴Prelude.139_r: 1 │ │ │ │ ├╴Prelude.66_q: 1 │ │ │ │ ╰╴Prelude.67_r: 1 │ │ │ ├╴OnceInLam │ │ │ │ ├╴(epheremal): 11 │ │ │ │ ├╴Foreign.Marshal.Alloc.failWhenNULL: 1 │ │ │ │ ├╴Instance@.iPrelude.Text.showList.Jhc.Prim.Char: 1 │ │ │ │ ├╴Jhc.Basics.foldl: 1 │ │ │ │ ├╴Jhc.IO.errorContinuation: 1 │ │ │ │ ├╴Jhc.IO.unsafePerformIO: 1 │ │ │ │ ├╴Jhc.Monad.mapM: 1 │ │ │ │ ├╴Jhc.Monad.mapM_: 1 │ │ │ │ ├╴Main.main: 1 │ │ │ │ ├╴Numeric.36_read': 1 │ │ │ │ ├╴Numeric.formatRealFloat: 1 │ │ │ │ ├╴Numeric.readSigned: 1 │ │ │ │ ├╴Numeric.showFloat: 1 │ │ │ │ ├╴Numeric.showGFloat: 1 │ │ │ │ ├╴Prelude.IO.readIO: 1 │ │ │ │ ├╴Prelude.Text.reads: 1 │ │ │ │ ├╴Prelude.Text.shows: 1 │ │ │ │ ├╴Spec@.Numeric.56.fNumeric.readInt: 1 │ │ │ │ ├╴System.getArgs: 1 │ │ │ │ ├╴W@.fForeign.Marshal.Alloc.allocaBytes: 1 │ │ │ │ ├╴W@.fForeign.Marshal.Alloc.mallocBytes: 1 │ │ │ │ ├╴W@.fForeign.Marshal.Array.lengthArray0: 1 │ │ │ │ ├╴W@.fInstance@.iJhc.Enum.enumFromTo.Jhc.Prim.Int: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.Text.readsPrec.Jhc.Basics.Integer: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.Text.readsPrec.Jhc.Prim.Int: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.floatDigits.Jhc.Float.Double: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.floatRadix.Jhc.Float.Double: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.floatRange.Jhc.Float.Double: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.isInfinite.Jhc.Float.Double: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.isNaN.Jhc.Float.Double: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.isNegativeZero.Jhc.Float.Double: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.properFraction.Jhc.Float.Double: 1 │ │ │ │ ├╴W@.fInstance@.iPrelude.quotRem.default: 1 │ │ │ │ ├╴W@.fJhc.List.!!: 1 │ │ │ │ ├╴W@.fPrelude.Text.readParen: 1 │ │ │ │ ╰╴W@.fSpec@.Numeric.10.fNumeric.showSigned: 1 │ │ │ ╰╴atomic │ │ │ ├╴Prelude.137_patrhs@7: 1 │ │ │ ├╴Prelude.237_n: 2 │ │ │ ├╴Prelude.67_r: 1 │ │ │ ├╴x10002: 1 │ │ │ ├╴x10544: 1 │ │ │ ├╴x1138: 1 │ │ │ ├╴x11594: 1 │ │ │ ├╴x11600: 1 │ │ │ ├╴x11608: 1 │ │ │ ├╴x11644: 1 │ │ │ ├╴x13854: 1 │ │ │ ├╴x13894: 1 │ │ │ ├╴x13910: 1 │ │ │ ├╴x14: 1 │ │ │ ├╴x1644: 1 │ │ │ ├╴x17840: 1 │ │ │ ├╴x18414: 1 │ │ │ ├╴x18630: 1 │ │ │ ├╴x19074: 1 │ │ │ ├╴x19076: 1 │ │ │ ├╴x2108: 1 │ │ │ ├╴x3156: 1 │ │ │ ├╴x3428: 1 │ │ │ ├╴x3480: 1 │ │ │ ├╴x3488: 1 │ │ │ ├╴x3766: 1 │ │ │ ├╴x3808: 1 │ │ │ ├╴x5186: 1 │ │ │ ├╴x5202: 1 │ │ │ ├╴x5222: 1 │ │ │ ├╴x5254: 3 │ │ │ ├╴x56: 1 │ │ │ ├╴x5680: 1 │ │ │ ├╴x6096: 1 │ │ │ ├╴x6102: 1 │ │ │ ├╴x6424: 1 │ │ │ ├╴x6456: 1 │ │ │ ├╴x7074: 1 │ │ │ ├╴x7180: 1 │ │ │ ├╴x7182: 1 │ │ │ ├╴x778: 2 │ │ │ ├╴x8280: 1 │ │ │ ├╴x8362: 1 │ │ │ ├╴x8366: 1 │ │ │ ├╴x8372: 1 │ │ │ ├╴x8378: 1 │ │ │ ├╴x8382: 1 │ │ │ ├╴x9716: 1 │ │ │ ├╴x9938: 1 │ │ │ ╰╴x9992: 1 │ │ ├╴known-case │ │ │ ├╴(#2#): 11 │ │ │ ├╴-1: 1 │ │ │ ├╴0: 6 │ │ │ ├╴1: 5 │ │ │ ├╴Addr#: 3 │ │ │ ├╴CChar#: 1 │ │ │ ├╴Double#: 7 │ │ │ ├╴Foreign.C.Types.CChar: 1 │ │ │ ├╴Int#: 29 │ │ │ ├╴Integer#: 25 │ │ │ ├╴Jhc │ │ │ │ ├╴Basics │ │ │ │ │ ├╴(,): 4 │ │ │ │ │ ╰╴Integer: 4 │ │ │ │ ├╴Float.Double: 8 │ │ │ │ ├╴Options.Target#: 5 │ │ │ │ ├╴Order.Bool#: 13 │ │ │ │ ╰╴Prim │ │ │ │ ├╴Char: 1 │ │ │ │ ├╴IO: 3 │ │ │ │ ╰╴Int: 3 │ │ │ ├╴Numeric.FFFormat#: 3 │ │ │ ├╴Prelude.Nothing: 4 │ │ │ ╰╴_: 53 │ │ ├╴let-coalesce: 43 │ │ ├╴let-from-case: 31 │ │ ╰╴strictness │ │ ╰╴cheap-eagerness │ │ ╰╴def │ │ ├╴x11050: 1 │ │ ├╴x18566: 1 │ │ ├╴x3236: 1 │ │ ╰╴x5076: 1 │ ├╴EtaExpand │ │ ├╴def │ │ │ ├╴Foreign.Storable.peek: 2 │ │ │ ├╴Foreign.Storable.sizeOf: 1 │ │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer: 3 │ │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 1 │ │ │ ├╴Jhc.Monad.af@17471: 1 │ │ │ ├╴Jhc.Monad.af@17647: 1 │ │ │ ├╴Jhc.Order.<: 2 │ │ │ ├╴Jhc.Order.==: 2 │ │ │ ├╴Jhc.Order.>: 2 │ │ │ ├╴Numeric.readDec: 1 │ │ │ ├╴Prelude.*: 2 │ │ │ ├╴Prelude.+: 2 │ │ │ ├╴Prelude.-: 2 │ │ │ ├╴Prelude.Text.showsPrec: 2 │ │ │ ├╴Prelude.fromInt: 1 │ │ │ ├╴Prelude.negate: 1 │ │ │ ├╴Prelude.quot: 2 │ │ │ ├╴Prelude.rem: 2 │ │ │ ├╴W@.fInstance@.iPrelude.Text.readsPrec.Jhc.Basics.Integer: 1 │ │ │ ├╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 1 │ │ │ ├╴x10330: 1 │ │ │ ├╴x334: 1 │ │ │ ├╴x3428: 1 │ │ │ ╰╴x5706: 1 │ │ ├╴min │ │ │ ╰╴def │ │ │ ├╴Jhc.IO.catch: 1 │ │ │ ├╴Jhc.Monad.mapM: 1 │ │ │ ├╴Prelude.IO.putStr: 1 │ │ │ ├╴Prelude.IO.readIO: 1 │ │ │ ├╴W@.fData.Char.showLitChar: 1 │ │ │ ├╴x10350: 1 │ │ │ ╰╴x5726: 1 │ │ ╰╴use │ │ ├╴Data.Char.fl@2$38484: 1 │ │ ├╴Foreign.Storable.peek: 1 │ │ ├╴Instance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr: 1 │ │ ├╴Instance@.iJhc.Monad.>>=.Jhc.Prim.IO: 3 │ │ ├╴Instance@.iJhc.Monad.return.Jhc.Prim.IO: 2 │ │ ├╴Instance@.iPrelude.Text.show.default: 1 │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer: 2 │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.[]: 1 │ │ ├╴Jhc.IO.catch: 1 │ │ ├╴Prelude.IO.putChar: 1 │ │ ├╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 1 │ │ ╰╴x9388: 1 │ ╰╴Rule │ ╰╴User │ ├╴Rule │ │ ├╴Instance@.iForeign.Storable.peekElemOff.Foreign.C.Types.CChar: 1 │ │ ├╴Instance@.iJhc.Monad.>>.Jhc.Prim.IO: 1 │ │ ├╴Instance@.iJhc.Monad.>>=.Jhc.Prim.IO: 2 │ │ ├╴Instance@.iJhc.Monad.return.Jhc.Prim.IO: 3 │ │ ├╴Instance@.iJhc.Order.<.Jhc.Basics.Integer: 1 │ │ ├╴Instance@.iJhc.Order.<.Jhc.Float.Double: 2 │ │ ├╴Instance@.iJhc.Order.<=.Jhc.Prim.Int: 1 │ │ ├╴Instance@.iJhc.Order.==.Foreign.C.Types.CChar: 1 │ │ ├╴Instance@.iJhc.Order.==.Jhc.Basics.Integer: 2 │ │ ├╴Instance@.iJhc.Order.==.Jhc.Float.Double: 1 │ │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.Char: 1 │ │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.Int: 3 │ │ ├╴Instance@.iJhc.Order.>.Jhc.Float.Double: 1 │ │ ├╴Instance@.iJhc.Order.>.Jhc.Prim.Int: 1 │ │ ├╴Instance@.iPrelude.*.Jhc.Basics.Integer: 1 │ │ ├╴Instance@.iPrelude.*.Jhc.Prim.Int: 1 │ │ ├╴Instance@.iPrelude.+.Jhc.Basics.Integer: 2 │ │ ├╴Instance@.iPrelude.+.Jhc.Prim.Int: 1 │ │ ├╴Instance@.iPrelude.-.Jhc.Basics.Integer: 1 │ │ ├╴Instance@.iPrelude.-.Jhc.Prim.Int: 2 │ │ ├╴Instance@.iPrelude.Text.readsPrec.Jhc.Prim.Int: 1 │ │ ├╴Instance@.iPrelude.Text.show.Jhc.Basics.Integer: 1 │ │ ├╴Instance@.iPrelude.Text.showList.Jhc.Prim.Char: 1 │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 1 │ │ ├╴Instance@.iPrelude.decodeFloat.Jhc.Float.Double: 1 │ │ ├╴Instance@.iPrelude.floatDigits.Jhc.Float.Double: 1 │ │ ├╴Instance@.iPrelude.floatRadix.Jhc.Float.Double: 1 │ │ ├╴Instance@.iPrelude.floatRange.Jhc.Float.Double: 1 │ │ ├╴Instance@.iPrelude.fromInt.Jhc.Basics.Integer: 6 │ │ ├╴Instance@.iPrelude.fromInt.Jhc.Float.Double: 4 │ │ ├╴Instance@.iPrelude.fromInt.Jhc.Prim.Int: 9 │ │ ├╴Instance@.iPrelude.fromInteger.Jhc.Prim.Int: 3 │ │ ├╴Instance@.iPrelude.isInfinite.Jhc.Float.Double: 1 │ │ ├╴Instance@.iPrelude.isNaN.Jhc.Float.Double: 1 │ │ ├╴Instance@.iPrelude.isNegativeZero.Jhc.Float.Double: 1 │ │ ├╴Instance@.iPrelude.negate.Jhc.Basics.Integer: 2 │ │ ├╴Instance@.iPrelude.negate.Jhc.Float.Double: 2 │ │ ├╴Instance@.iPrelude.properFraction.Jhc.Float.Double: 1 │ │ ├╴Instance@.iPrelude.quot.Jhc.Basics.Integer: 1 │ │ ├╴Instance@.iPrelude.quot.Jhc.Prim.Int: 1 │ │ ├╴Instance@.iPrelude.quotRem.Jhc.Basics.Integer: 2 │ │ ├╴Instance@.iPrelude.rem.Jhc.Basics.Integer: 1 │ │ ├╴Instance@.iPrelude.rem.Jhc.Prim.Int: 1 │ │ ├╴Instance@.iPrelude.signum.Jhc.Basics.Integer: 2 │ │ ╰╴Instance@.iPrelude.toInt.Jhc.Basics.Integer: 1 │ ╰╴Specialize │ ├╴Spec@.Numeric.19.fNumeric.showIntAtBase: 2 │ ├╴Spec@.Numeric.56.fNumeric.readInt: 1 │ ╰╴Spec@.Prelude.204.fPrelude.even: 1 ├╴Simplify-Main-Two │ ├╴E │ │ ├╴PrimOpt.(size_t): 1 │ │ ╰╴Simplify │ │ ├╴inline.Forced.Instance@.iForeign.Storable.sizeOf.Foreign.C.Types.CInt: 1 │ │ ╰╴known-case │ │ ├╴Int#: 1 │ │ ╰╴_: 2 │ ╰╴Rule.User.Rule.Instance@.iForeign.Storable.sizeOf.Foreign.C.Types.CInt: 1 ├╴Simplify-SuperSimplify after Boxy WorkWrap │ ╰╴E │ ╰╴Simplify │ ├╴case-default-case: 1 │ ├╴case-improve-default.[Jhc.Order.Bool#]: 2 │ ├╴case-of-bottom': 1 │ ├╴case-of-case: 154 │ ├╴case-of-case-join: 5 │ ├╴case-omittable: 2 │ ├╴case-trailing │ │ ├╴x3576: 1 │ │ ├╴x3578: 1 │ │ ├╴x3600: 1 │ │ ├╴x3602: 1 │ │ ├╴x3628: 1 │ │ ├╴x3630: 1 │ │ ├╴x3652: 1 │ │ ├╴x3654: 1 │ │ ├╴x3676: 1 │ │ ├╴x3678: 1 │ │ ├╴x3700: 1 │ │ ├╴x3702: 1 │ │ ├╴x3724: 1 │ │ ├╴x3728: 1 │ │ ├╴x3748: 1 │ │ ├╴x3754: 1 │ │ ├╴x3974: 1 │ │ ╰╴x3996: 1 │ ├╴f-beta-reduce │ │ ├╴X@.f2936@1: 1 │ │ ├╴X@.fX@.f1398@1@1: 1 │ │ ├╴X@.fX@.f1398@2@1: 1 │ │ ╰╴_: 1 │ ├╴inline │ │ ├╴Many │ │ │ ├╴(epheremal): 16 │ │ │ ├╴Prelude.235_g: 2 │ │ │ ├╴Prelude.Float.70_x: 1 │ │ │ ├╴Prelude.Text.135_c: 1 │ │ │ ╰╴R@.fPrelude.230_f: 2 │ │ ├╴ManyBranch.(epheremal): 10 │ │ ├╴Once │ │ │ ├╴(epheremal): 39 │ │ │ ├╴Prelude.237_n: 1 │ │ │ ├╴W@.f1790: 1 │ │ │ ├╴W@.f3454: 1 │ │ │ ╰╴W@.f3548: 1 │ │ ├╴OnceInLam │ │ │ ├╴W@.f3706: 1 │ │ │ ├╴W@.f5566: 1 │ │ │ ├╴W@.f5596: 1 │ │ │ ├╴W@.f5624: 1 │ │ │ ├╴W@.f5654: 1 │ │ │ ├╴W@.f5714: 1 │ │ │ ├╴W@.f5756: 1 │ │ │ ├╴W@.f5816: 1 │ │ │ ├╴W@.f6376: 1 │ │ │ ├╴W@.f6392: 1 │ │ │ ├╴W@.fData.Char.fl@2$38484: 1 │ │ │ ├╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer: 1 │ │ │ ├╴W@.fInstance@.iPrelude.ceiling.default: 1 │ │ │ ├╴W@.fInstance@.iPrelude.decodeFloat.Jhc.Float.Double: 1 │ │ │ ├╴W@.fInstance@.iPrelude.divMod.default: 1 │ │ │ ├╴W@.fNumeric.expt: 1 │ │ │ ├╴W@.fPrelude.Text.129_isSym: 1 │ │ │ ├╴W@.fPrelude.Text.130_isIdChar: 1 │ │ │ ├╴W@.fPrelude.^: 1 │ │ │ ├╴W@.fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double: 1 │ │ │ ╰╴W@.fW@.fNumeric.floatToDigits: 1 │ │ ╰╴atomic │ │ ├╴x13852: 1 │ │ ├╴x1832: 1 │ │ ├╴x2102: 1 │ │ ├╴x2104: 1 │ │ ├╴x2106: 1 │ │ ├╴x2108: 1 │ │ ├╴x2116: 1 │ │ ├╴x2138: 1 │ │ ├╴x2144: 1 │ │ ├╴x2148: 1 │ │ ├╴x2152: 1 │ │ ├╴x2156: 1 │ │ ├╴x2180: 1 │ │ ├╴x2184: 1 │ │ ├╴x2186: 1 │ │ ├╴x2190: 1 │ │ ├╴x2192: 1 │ │ ├╴x2214: 1 │ │ ├╴x2216: 1 │ │ ├╴x2218: 1 │ │ ├╴x2222: 1 │ │ ├╴x2226: 1 │ │ ├╴x2250: 1 │ │ ├╴x2284: 1 │ │ ├╴x2286: 1 │ │ ├╴x2296: 1 │ │ ├╴x2300: 1 │ │ ├╴x2330: 1 │ │ ├╴x2332: 1 │ │ ├╴x2336: 1 │ │ ├╴x2338: 1 │ │ ├╴x2340: 1 │ │ ├╴x2366: 1 │ │ ├╴x2368: 1 │ │ ├╴x2374: 1 │ │ ├╴x2376: 1 │ │ ├╴x2384: 1 │ │ ├╴x2410: 1 │ │ ├╴x2412: 1 │ │ ├╴x2416: 1 │ │ ├╴x2422: 1 │ │ ├╴x2426: 1 │ │ ├╴x2716: 1 │ │ ├╴x2752: 1 │ │ ├╴x2760: 1 │ │ ├╴x3374: 1 │ │ ├╴x3390: 1 │ │ ├╴x3514: 1 │ │ ├╴x3568: 1 │ │ ├╴x3570: 1 │ │ ├╴x3594: 1 │ │ ├╴x3596: 1 │ │ ├╴x3782: 1 │ │ ├╴x3830: 1 │ │ ├╴x4246: 1 │ │ ├╴x4340: 1 │ │ ├╴x6402: 1 │ │ ├╴x6404: 1 │ │ ├╴x7126: 1 │ │ ├╴x9932: 1 │ │ ╰╴x9986: 1 │ ├╴known-case │ │ ├╴(#2#): 11 │ │ ├╴Char#: 9 │ │ ├╴Double#: 5 │ │ ├╴Int#: 10 │ │ ├╴Integer#: 15 │ │ ├╴Jhc │ │ │ ├╴Basics.(,): 8 │ │ │ ╰╴Order.Bool#: 53 │ │ ╰╴_: 29 │ ├╴let-coalesce: 30 │ ├╴let-from-case: 30 │ ╰╴strictness │ ╰╴let-to-case │ ├╴Prelude.138_n: 1 │ ├╴x18710: 1 │ ├╴x18744: 1 │ ├╴x18926: 1 │ ├╴x2970: 1 │ ├╴x3378: 1 │ ╰╴x8354: 1 ├╴Simplify-SuperSimplify no rules │ ├╴E │ │ ├╴PrimOpt │ │ │ ├╴(double): 1 │ │ │ ├╴(int)*(int,int).ec: 2 │ │ │ ├╴(int)==(int,int).ec: 3 │ │ │ ╰╴(intmax_t): 1 │ │ ╰╴Simplify │ │ ├╴application-push │ │ │ ├╴case: 2 │ │ │ ╰╴let: 1 │ │ ├╴case-atomic-unboxed: 2 │ │ ├╴case-default-case: 4 │ │ ├╴case-of-case: 81 │ │ ├╴case-of-case-join: 1 │ │ ├╴f-beta-reduce │ │ │ ├╴x3860: 1 │ │ │ ├╴x3870: 1 │ │ │ ├╴x3872: 1 │ │ │ ╰╴x974: 1 │ │ ├╴inline │ │ │ ├╴Many │ │ │ │ ├╴Instance@.iPrelude.Text.show.default: 7 │ │ │ │ ├╴W@.fInstance@.iForeign.Storable.peekElemOff.default: 3 │ │ │ │ ├╴W@.fInstance@.iJhc.Order./=.default: 4 │ │ │ │ ╰╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.Int: 4 │ │ │ ├╴ManyBranch.(epheremal): 16 │ │ │ ├╴Once.(epheremal): 20 │ │ │ ├╴OnceInLam │ │ │ │ ├╴Foreign.Storable.peek: 1 │ │ │ │ ├╴Foreign.Storable.sizeOf: 1 │ │ │ │ ├╴Jhc.Order.==: 1 │ │ │ │ ├╴Prelude.IO.putStr: 1 │ │ │ │ ├╴Prelude.Text.showsPrec: 1 │ │ │ │ ├╴Prelude.fromInt: 1 │ │ │ │ ├╴Prelude.head: 1 │ │ │ │ ├╴W@.f7870: 1 │ │ │ │ ├╴W@.fData.Char.isDigit: 1 │ │ │ │ ├╴W@.fData.Char.isHexDigit: 1 │ │ │ │ ├╴W@.fData.Char.isOctDigit: 1 │ │ │ │ ╰╴W@.fInstance@.iForeign.Storable.peek.Jhc.Addr.Ptr: 1 │ │ │ ╰╴atomic │ │ │ ├╴x17786: 1 │ │ │ ├╴x3320: 1 │ │ │ ├╴x3348: 1 │ │ │ ├╴x3438: 1 │ │ │ ├╴x4018: 1 │ │ │ ├╴x4026: 1 │ │ │ ├╴x4040: 1 │ │ │ ├╴x4054: 1 │ │ │ ├╴x4068: 1 │ │ │ ├╴x4134: 1 │ │ │ ├╴x4192: 1 │ │ │ ├╴x4562: 1 │ │ │ ├╴x4786: 1 │ │ │ ├╴x4806: 1 │ │ │ ├╴x4908: 1 │ │ │ ├╴x5678: 1 │ │ │ ├╴x690: 3 │ │ │ ╰╴x9710: 1 │ │ ├╴known-case │ │ │ ├╴(#2#): 3 │ │ │ ├╴0: 6 │ │ │ ├╴1: 6 │ │ │ ├╴Addr#: 7 │ │ │ ├╴CChar#: 2 │ │ │ ├╴CInt#: 6 │ │ │ ├╴Double#: 3 │ │ │ ├╴Foreign │ │ │ │ ╰╴C │ │ │ │ ╰╴Types │ │ │ │ ├╴CChar: 4 │ │ │ │ ╰╴CInt: 3 │ │ │ ├╴Int#: 9 │ │ │ ├╴Jhc │ │ │ │ ├╴Addr.Ptr: 2 │ │ │ │ ├╴Basics.Integer: 1 │ │ │ │ ├╴Float.Double: 1 │ │ │ │ ├╴Order.Bool#: 13 │ │ │ │ ╰╴Prim │ │ │ │ ├╴Int: 4 │ │ │ │ ╰╴[]: 2 │ │ │ ╰╴_: 19 │ │ ├╴let-coalesce: 9 │ │ ╰╴let-from-case: 7 │ ╰╴EtaExpand │ ╰╴min │ ╰╴def │ ├╴Prelude.Text.showsPrec: 1 │ ╰╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double: 1 ├╴typeAnalyze-Main-AfterMethod │ ╰╴Specialize │ ├╴body │ │ ├╴Foreign.Storable.peekElemOff.x4502.Foreign.C.Types.CChar: 1 │ │ ├╴Instance@.iForeign.Storable.peek.Jhc.Addr.Ptr.x12250.Foreign.C.Types.CChar: 1 │ │ ├╴Instance@.iForeign.Storable.peekElemOff.default.x11730.Foreign.C.Types.CChar: 1 │ │ ├╴Instance@.iJhc.Monad.>>.Jhc.Prim.IO │ │ │ ├╴x9616.(): 1 │ │ │ ╰╴x9618.(): 1 │ │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.[].x9890.Char: 1 │ │ ├╴Instance@.iJhc.Order.max.default.x9948.Int: 1 │ │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.[].x12846.Char: 1 │ │ ├╴Instance@.iPrelude.ceiling.default │ │ │ ├╴x13838.Jhc.Float.Double: 1 │ │ │ ╰╴x13840.Int: 1 │ │ ├╴Instance@.iPrelude.divMod.default.x13876.Integer: 1 │ │ ├╴Instance@.iPrelude.properFraction.Jhc.Float.Double.x12446.Int: 1 │ │ ├╴Instance@.iPrelude.quotRem.default.x13866.Integer: 1 │ │ ├╴Jhc.Basics.concatMap.x3016.Int: 1 │ │ ├╴Jhc.Basics.foldl │ │ │ ├╴x2942.Integer: 1 │ │ │ ╰╴x2944.Integer: 1 │ │ ├╴Jhc.Basics.reverse.x2966.Integer: 1 │ │ ├╴Jhc.IO.catch.x3342.(): 1 │ │ ├╴Jhc.IO.error.x3360.String: 1 │ │ ├╴Jhc.IO.errorContinuation.x4348.Jhc.Basics.(,) Integer Int: 1 │ │ ├╴Jhc.IO.exitFailure.x4434.(): 1 │ │ ├╴Jhc.IO.runMain.x4378.(): 1 │ │ ├╴Jhc.IO.thenIO_.x4442.(): 1 │ │ ├╴Jhc.IO.unsafePerformIO.x4332.Jhc.Basics.(,) Integer Int: 1 │ │ ├╴Jhc.Monad.>> │ │ │ ├╴x3394.Jhc.Prim.IO: 1 │ │ │ ├╴x3396.(): 1 │ │ │ ╰╴x3398.(): 1 │ │ ├╴Jhc.Monad.>>=.x3388.Jhc.Prim.IO: 1 │ │ ├╴Jhc.Monad.mapM │ │ │ ├╴x3404.Jhc.Prim.IO: 1 │ │ │ ├╴x3406.Int: 1 │ │ │ ╰╴x3408.String: 1 │ │ ├╴Jhc.Monad.mapM_ │ │ │ ├╴x3440.Jhc.Prim.IO: 1 │ │ │ ├╴x3442.Char: 1 │ │ │ ╰╴x3444.(): 1 │ │ ├╴Jhc.Monad.return.x3400.Jhc.Prim.IO: 1 │ │ ├╴Jhc.Order.<=.x3472.Int: 1 │ │ ├╴Numeric.formatRealFloat.x6068.Jhc.Float.Double: 1 │ │ ├╴Numeric.readDec.x6036.Integer: 1 │ │ ├╴Numeric.readInt.x5976.Integer: 1 │ │ ├╴Numeric.readSigned.x5852.Integer: 1 │ │ ├╴Numeric.showFloat.x6064.Jhc.Float.Double: 1 │ │ ├╴Numeric.showGFloat.x6054.Jhc.Float.Double: 1 │ │ ├╴Numeric.showInt.x5836.Integer: 1 │ │ ├╴Numeric.showIntAtBase.x5842.Integer: 1 │ │ ├╴Prelude.IO.readIO.x4074.Int: 1 │ │ ├╴Prelude.Text.reads.x3496.Int: 1 │ │ ├╴Prelude.Text.readsPrec.x3486.Int: 1 │ │ ├╴Prelude.Text.show.x3492.Integer: 1 │ │ ├╴Prelude.Text.showList.x3494.Char: 1 │ │ ├╴Prelude.Text.shows.x3500.Int: 1 │ │ ├╴Prelude.^.x3172.Int: 1 │ │ ├╴Prelude.decodeFloat.x3092.Jhc.Float.Double: 1 │ │ ├╴Prelude.drop.x3308.Char: 1 │ │ ├╴Prelude.even.x3104.Int: 1 │ │ ├╴Prelude.floatDigits.x3088.Jhc.Float.Double: 1 │ │ ├╴Prelude.floatRadix.x3086.Jhc.Float.Double: 1 │ │ ├╴Prelude.floatRange.x3090.Jhc.Float.Double: 1 │ │ ├╴Prelude.foldl1.x3270.Integer: 1 │ │ ├╴Prelude.fromInteger.x3064.Int: 1 │ │ ├╴Prelude.head.x3238.String: 1 │ │ ├╴Prelude.init.x3246.Int: 1 │ │ ├╴Prelude.isInfinite.x3100.Jhc.Float.Double: 1 │ │ ├╴Prelude.isNaN.x3098.Jhc.Float.Double: 1 │ │ ├╴Prelude.isNegativeZero.x3102.Jhc.Float.Double: 1 │ │ ├╴Prelude.properFraction │ │ │ ├╴x3082.Jhc.Float.Double: 1 │ │ │ ╰╴x3084.Int: 1 │ │ ├╴Prelude.quotRem.x3072.Integer: 1 │ │ ├╴Prelude.signum.x3062.Integer: 1 │ │ ├╴Prelude.take.x3282.Char: 1 │ │ ├╴Prelude.toInt.x3076.Integer: 1 │ │ ├╴W@.fForeign.Marshal.Array.lengthArray0.x17734.Foreign.C.Types.CChar: 1 │ │ ├╴W@.fInstance@.iForeign.Storable.peek.Jhc.Addr.Ptr.x17388.Foreign.C.Types.CChar: 1 │ │ ├╴W@.fInstance@.iJhc.Order.==.Jhc.Prim.[].x11628.Char: 1 │ │ ├╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[].x19196.Char: 1 │ │ ├╴W@.fInstance@.iPrelude.properFraction.Jhc.Float.Double.x18324.Int: 1 │ │ ├╴W@.fInstance@.iPrelude.quotRem.default.x18012.Integer: 1 │ │ ├╴W@.fJhc.IO.exitFailure.x9710.(): 1 │ │ ├╴W@.fJhc.List.!!.x9660.String: 1 │ │ ├╴W@.fNumeric.floatToDigits.x18368.Jhc.Float.Double: 1 │ │ ├╴W@.fPrelude.Text.readParen.x19464.Integer: 1 │ │ ├╴W@.fPrelude.replicate.x17998.Int: 1 │ │ ├╴W@.fPrelude.span.x17918.Char: 1 │ │ ╰╴W@.fPrelude.splitAt.x17966.Char: 1 │ ╰╴use │ ├╴Foreign.Storable.peekElemOff: 1 │ ├╴Instance@.iForeign.Storable.peek.Jhc.Addr.Ptr: 2 │ ├╴Instance@.iForeign.Storable.peekElemOff.default: 2 │ ├╴Instance@.iJhc.Monad.>>.Jhc.Prim.IO: 2 │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.[]: 2 │ ├╴Instance@.iJhc.Order.max.default: 4 │ ├╴Instance@.iPrelude.Text.showsPrec.Jhc.Prim.[]: 2 │ ├╴Instance@.iPrelude.ceiling.default: 2 │ ├╴Instance@.iPrelude.divMod.default: 1 │ ├╴Instance@.iPrelude.properFraction.Jhc.Float.Double: 2 │ ├╴Instance@.iPrelude.quotRem.default: 2 │ ├╴Jhc.Basics.concatMap: 5 │ ├╴Jhc.Basics.foldl: 1 │ ├╴Jhc.Basics.reverse: 2 │ ├╴Jhc.IO.catch: 1 │ ├╴Jhc.IO.error: 2 │ ├╴Jhc.IO.errorContinuation: 1 │ ├╴Jhc.IO.exitFailure: 1 │ ├╴Jhc.IO.runMain: 1 │ ├╴Jhc.IO.thenIO_: 2 │ ├╴Jhc.IO.unsafePerformIO: 1 │ ├╴Jhc.Monad.>>: 3 │ ├╴Jhc.Monad.>>=: 2 │ ├╴Jhc.Monad.mapM: 2 │ ├╴Jhc.Monad.mapM_: 3 │ ├╴Jhc.Monad.return: 5 │ ├╴Jhc.Order.<=: 1 │ ├╴Numeric.formatRealFloat: 1 │ ├╴Numeric.readDec: 1 │ ├╴Numeric.readInt: 1 │ ├╴Numeric.readSigned: 1 │ ├╴Numeric.showFloat: 1 │ ├╴Numeric.showGFloat: 1 │ ├╴Numeric.showInt: 1 │ ├╴Numeric.showIntAtBase: 2 │ ├╴Prelude.IO.readIO: 1 │ ├╴Prelude.Text.reads: 1 │ ├╴Prelude.Text.readsPrec: 1 │ ├╴Prelude.Text.show: 1 │ ├╴Prelude.Text.showList: 1 │ ├╴Prelude.Text.shows: 1 │ ├╴Prelude.^: 10 │ ├╴Prelude.decodeFloat: 1 │ ├╴Prelude.drop: 2 │ ├╴Prelude.even: 1 │ ├╴Prelude.floatDigits: 1 │ ├╴Prelude.floatRadix: 1 │ ├╴Prelude.floatRange: 1 │ ├╴Prelude.foldl1: 2 │ ├╴Prelude.fromInteger: 3 │ ├╴Prelude.head: 2 │ ├╴Prelude.init: 2 │ ├╴Prelude.isInfinite: 1 │ ├╴Prelude.isNaN: 1 │ ├╴Prelude.isNegativeZero: 1 │ ├╴Prelude.properFraction: 1 │ ├╴Prelude.quotRem: 2 │ ├╴Prelude.signum: 2 │ ├╴Prelude.take: 5 │ ├╴Prelude.toInt: 1 │ ├╴W@.fForeign.Marshal.Array.lengthArray0: 1 │ ├╴W@.fInstance@.iForeign.Storable.peek.Jhc.Addr.Ptr: 1 │ ├╴W@.fInstance@.iJhc.Order.==.Jhc.Prim.[]: 2 │ ├╴W@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[]: 1 │ ├╴W@.fInstance@.iPrelude.properFraction.Jhc.Float.Double: 1 │ ├╴W@.fInstance@.iPrelude.quotRem.default: 3 │ ├╴W@.fJhc.IO.exitFailure: 1 │ ├╴W@.fJhc.List.!!: 1 │ ├╴W@.fNumeric.floatToDigits: 3 │ ├╴W@.fPrelude.Text.readParen: 1 │ ├╴W@.fPrelude.replicate: 1 │ ├╴W@.fPrelude.span: 18 │ ╰╴W@.fPrelude.splitAt: 2 ╰╴typeAnalyze-Main-AfterSimp ╰╴Specialize ├╴body │ ├╴Foreign.Marshal.Alloc.alloca │ │ ├╴x1730.Foreign.C.Types.CInt: 1 │ │ ╰╴x1732.Jhc.Basics.(,) Integer Int: 1 │ ├╴Instance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr.x3428.Foreign.C.Types.CChar: 1 │ ╰╴W@.fInstance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr._.Foreign.C.Types.CChar: 1 ├╴delete │ ├╴Instance@.iJhc.Order.==.Foreign.C.Types.CChar: 1 │ ├╴Instance@.iJhc.Order.==.Jhc.Basics.Integer: 1 │ ├╴Instance@.iJhc.Order.==.Jhc.Float.Double: 1 │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.Char: 1 │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.Int: 1 │ ╰╴Instance@.iPrelude.fromInt.Jhc.Float.Double: 1 ╰╴use ├╴Foreign.Marshal.Alloc.alloca: 1 ├╴Instance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr: 1 ╰╴W@.fInstance@.iForeign.Storable.sizeOf.Jhc.Addr.Ptr: 1 Converting to Grin... Found 0 CAFs to convert to constants, 0 of which are recursive. Recursive Constant CAFS Foreign.Marshal.Alloc.alloca$2 v-15391 (FForeign.Marshal.Alloc.alloca$2) EP FOR theMain::EPi (_::ELit (Jhc.Prim.World__::ESort #)) (ELit (Jhc.Prim.World__::ESort #)) Grin ╰╴Grin ╰╴FromE ├╴lazy-app-bap: 14 ├╴strict-evaled: 8 ╰╴strict-unlifted: 2 Finding fixpoint for Dead Code: [1](1)(2)(52)(99)(112)(199)(138)(146)(107)(120)(99)(159)(232)(146)(77)(113)(57)(36)(27)(31)(17)(10)(11)(4)(12)(15)(34)(35)(142)(91)(80)(136)(205)(92)(90)(44)(34)(21)(18)(10)(3)(1) usedArgs ((fW@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,0),True) ((fW@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,1),True) ((fW@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,2),True) ((fW@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,3),True) ((fW@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase$2,0),True) ((fW@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase$2,1),True) ((ftheMain$25,0),True) ((ftheMain$26,0),True) ((ftheMain$26,1),True) ((ftheMain$23,0),True) ((ftheMain$24,0),True) ((ftheMain$24,1),True) ((ftheMain$22,0),True) ((ftheMain$21,0),True) ((ftheMain$19,0),True) ((ftheMain$20,0),True) ((ftheMain$18,0),True) ((ftheMain$13,0),True) ((ftheMain$15,0),True) ((ftheMain$15,1),True) ((ftheMain$17,0),True) ((ftheMain$14,0),True) ((ftheMain$14,1),True) ((ftheMain$16,0),True) ((ftheMain$16,1),True) ((ftheMain$16,2),True) ((ftheMain$12,0),True) ((ftheMain$7,0),True) ((ftheMain$9,0),True) ((ftheMain$11,0),True) ((ftheMain$8,0),True) ((ftheMain$8,1),True) ((ftheMain$10,0),True) ((ftheMain$5,0),True) ((ftheMain$6,0),True) ((ftheMain$4,0),True) ((ftheMain$4,1),True) ((ftheMain$4,2),True) ((ftheMain$3,0),True) ((ftheMain$3,1),True) ((ftheMain$2,0),True) ((ftheMain$2,1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[],0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[],1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[]$2,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[]$2,1),True) ((fW@.fData.Char.showLitChar$6,0),True) ((fW@.fData.Char.showLitChar$6,1),True) ((fW@.fData.Char.showLitChar$5,0),True) ((fW@.fData.Char.showLitChar$3,0),True) ((fW@.fData.Char.showLitChar$3,1),True) ((fW@.fData.Char.showLitChar$4,0),True) ((fW@.fData.Char.showLitChar,0),True) ((fW@.fData.Char.showLitChar,1),True) ((fW@.fData.Char.showLitChar$2,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$23,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$2,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$2,1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$21,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$21,1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$22,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$22,1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$22,2),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$19,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$19,1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$20,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$17,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$18,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$15,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$16,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$3,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$3,1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$3,2),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$14,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$12,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$13,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$10,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$10,1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$11,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$11,1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$11,2),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$8,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$8,1),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$9,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$6,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$7,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$4,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$5,0),True) ((fW@.fNumeric.floatToDigits$24,0),True) ((fW@.fNumeric.floatToDigits$24,1),True) ((fW@.fNumeric.floatToDigits$24,2),True) ((fW@.fNumeric.floatToDigits$24,3),True) ((fW@.fNumeric.floatToDigits$24,4),True) ((fW@.fNumeric.floatToDigits$24,5),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double,0),True) ((fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double,1),True) ((fW@.fNumeric.floatToDigits$30,0),True) ((fW@.fNumeric.floatToDigits$31,0),True) ((fW@.fNumeric.floatToDigits$25,0),True) ((fW@.fNumeric.floatToDigits$25,1),True) ((fW@.fNumeric.floatToDigits$25,2),True) ((fW@.fNumeric.floatToDigits$25,3),True) ((fW@.fNumeric.floatToDigits$25,4),True) ((fW@.fNumeric.floatToDigits$25,5),True) ((fW@.fNumeric.floatToDigits$26,0),True) ((fW@.fNumeric.floatToDigits$26,1),True) ((fW@.fNumeric.floatToDigits$26,2),True) ((fW@.fNumeric.floatToDigits$26,3),True) ((fW@.fNumeric.floatToDigits$26,4),True) ((fW@.fNumeric.floatToDigits$26,5),True) ((fW@.fNumeric.floatToDigits$28,0),True) ((fW@.fNumeric.floatToDigits$29,0),True) ((fW@.fNumeric.floatToDigits$23,0),True) ((fW@.fNumeric.floatToDigits$23,1),True) ((fW@.fNumeric.floatToDigits$23,2),True) ((fW@.fNumeric.floatToDigits$23,3),True) ((fW@.fNumeric.floatToDigits$23,4),True) ((fW@.fNumeric.floatToDigits$27,0),True) ((fW@.fNumeric.floatToDigits$27,1),True) ((fW@.fNumeric.floatToDigits$21,0),True) ((fW@.fNumeric.floatToDigits$21,1),True) ((fW@.fNumeric.floatToDigits$22,0),True) ((fW@.fNumeric.floatToDigits$22,1),True) ((fW@.fNumeric.floatToDigits$22,2),True) ((fW@.fNumeric.floatToDigits$22,3),True) ((fW@.fNumeric.floatToDigits$22,4),True) ((fW@.fNumeric.floatToDigits$19,0),True) ((fW@.fNumeric.floatToDigits$20,0),True) ((fW@.fNumeric.floatToDigits$8,0),True) ((fW@.fNumeric.floatToDigits$8,1),True) ((fW@.fNumeric.floatToDigits$18,0),True) ((fW@.fNumeric.floatToDigits$16,0),True) ((fW@.fNumeric.floatToDigits$17,0),True) ((fW@.fNumeric.floatToDigits$14,0),True) ((fW@.fNumeric.floatToDigits$15,0),True) ((fW@.fNumeric.floatToDigits$12,0),True) ((fW@.fNumeric.floatToDigits$13,0),True) ((fW@.fNumeric.floatToDigits$10,0),True) ((fW@.fNumeric.floatToDigits$10,1),True) ((fW@.fNumeric.floatToDigits$11,0),True) ((fW@.fNumeric.floatToDigits$11,1),True) ((fW@.fNumeric.floatToDigits$7,0),True) ((fW@.fNumeric.floatToDigits$9,0),True) ((fW@.fNumeric.floatToDigits$3,0),True) ((fW@.fNumeric.floatToDigits$3,1),True) ((fW@.fNumeric.floatToDigits$6,0),True) ((fW@.fNumeric.floatToDigits$4,0),True) ((fW@.fNumeric.floatToDigits$5,0),True) ((fW@.fNumeric.floatToDigits$5,1),True) ((fW@.fNumeric.floatToDigits,0),True) ((fW@.fNumeric.floatToDigits,1),True) ((fW@.fNumeric.floatToDigits$2,0),True) ((fInstance@.iPrelude.decodeFloat.Jhc.Float.Double$2,0),True) ((fInstance@.iPrelude.ceiling.default,0),True) ((fInstance@.iPrelude.decodeFloat.Jhc.Float.Double$4,0),True) ((fInstance@.iPrelude.decodeFloat.Jhc.Float.Double$3,0),True) ((fInstance@.iPrelude.decodeFloat.Jhc.Float.Double$3,1),True) ((fInstance@.iPrelude.decodeFloat.Jhc.Float.Double,0),True) ((fPrelude.Text.lex$34,0),True) ((fForeign.Marshal.Alloc.alloca,0),True) ((fPrelude.Text.lex$33,0),True) ((fPrelude.Text.lex$19,0),True) ((fPrelude.Text.lex$19,1),True) ((fPrelude.Text.lex$32,0),True) ((fPrelude.Text.lex$32,1),True) ((fPrelude.Text.lex$31,0),True) ((fPrelude.Text.lex$31,1),True) ((fPrelude.Text.lex$29,0),True) ((fPrelude.Text.lex$29,1),True) ((fPrelude.Text.lex$29,2),True) ((fPrelude.Text.lex$28,0),True) ((fPrelude.Text.lex$28,1),True) ((fPrelude.Text.lex$28,2),True) ((fPrelude.Text.lex$28,3),True) ((fPrelude.Text.lex$28,4),True) ((fPrelude.Text.lex$27,0),True) ((fPrelude.Text.lex$30,0),True) ((fPrelude.Text.lex$30,1),True) ((fPrelude.Text.lex$30,2),True) ((fPrelude.Text.lex$25,0),True) ((fPrelude.Text.lex$25,1),True) ((fPrelude.Text.lex$24,0),True) ((fPrelude.Text.lex$24,1),True) ((fPrelude.Text.lex$20,0),True) ((fPrelude.Text.lex$20,1),True) ((fPrelude.Text.lex$26,0),True) ((fPrelude.Text.lex$26,1),True) ((fPrelude.Text.lex$23,0),True) ((fPrelude.Text.lex$23,1),True) ((fPrelude.Text.lex$23,2),True) ((fPrelude.Text.lex$22,0),True) ((fPrelude.Text.lex$22,1),True) ((fPrelude.Text.lex$22,2),True) ((fPrelude.Text.lex$17,0),True) ((fPrelude.Text.lex$17,1),True) ((fPrelude.Text.lex$21,0),True) ((fPrelude.Text.lex$21,1),True) ((fPrelude.Text.lex$21,2),True) ((fPrelude.Text.lex$16,0),True) ((fPrelude.Text.lex$18,0),True) ((fPrelude.Text.lex$18,1),True) ((fPrelude.Text.lex$14,0),True) ((fPrelude.Text.lex$14,1),True) ((fPrelude.Text.130_isIdChar,0),True) ((fPrelude.Text.lex$13,0),True) ((fPrelude.Text.lex$15,0),True) ((fPrelude.Text.lex$15,1),True) ((fPrelude.Text.lex$12,0),True) ((fPrelude.Text.129_isSym,0),True) ((fPrelude.Text.lex$10,0),True) ((fPrelude.Text.lex$11,0),True) ((fPrelude.Text.lex$11,1),True) ((fPrelude.Text.100_lexString,0),True) ((fPrelude.Text.lex$9,0),True) ((fPrelude.Text.lex$8,0),True) ((fPrelude.Text.lex$5,0),True) ((fPrelude.Text.lex$6,0),True) ((fPrelude.Text.lex$7,0),True) ((fPrelude.Text.lex$7,1),True) ((fPrelude.Text.lex$2,0),True) ((fPrelude.Text.lex$2,1),True) ((fPrelude.Text.lex$4,0),True) ((fPrelude.Text.lex,0),True) ((fPrelude.Text.lex$3,0),True) ((fPrelude.Text.lex$3,1),True) ((fNumeric.readDec$8,0),True) ((fNumeric.lexDigits,0),True) ((fNumeric.readDec$5,0),True) ((fNumeric.readDec$2,0),True) ((fNumeric.readDec$6,0),True) ((fNumeric.readDec$6,1),True) ((fNumeric.readDec$7,0),True) ((fNumeric.readDec$7,1),True) ((fNumeric.readDec$3,0),True) ((fNumeric.readDec$4,0),True) ((fNumeric.nonnull$4,0),True) ((fNumeric.readDec,0),True) ((fNumeric.nonnull$2,0),True) ((fNumeric.nonnull$2,1),True) ((fNumeric.nonnull$3,0),True) ((fNumeric.nonnull$3,1),True) ((fJhc.Basics.concatMap$2,0),True) ((fJhc.Basics.concatMap$2,1),True) ((fNumeric.nonnull,0),True) ((fNumeric.nonnull,1),True) ((fR@.fJhc.Basics.++,0),True) ((fR@.fJhc.Basics.++,1),True) ((fJhc.Basics.concatMap,0),False) ((fJhc.Basics.concatMap,1),True) ((fJhc.Basics.concatMap,2),True) ((fJhc.Basics.reverse,0),True) ((fJhc.Basics.++,0),False) ((fJhc.Basics.++,1),True) ((fJhc.Basics.++,2),True) ((fPrelude.*,0),True) ((fPrelude.*,1),True) ((fPrelude.*,2),True) ((fPrelude.^,0),True) ((fPrelude.^,1),True) ((fPrelude.^,2),True) ((fPrelude.take,0),True) ((fPrelude.take,1),True) ((fPrelude.take$2,0),True) ((fPrelude.take$2,1),True) ((fJhc.IO.error$2,0),True) ((fPrelude.drop,0),True) ((fPrelude.drop,1),True) ((fPrelude.IO.putStrLn,0),True) ((fJhc.IO.error,0),True) ((fData.Char.lexLitChar$25,0),True) ((fJhc.IO.putErrLn,0),True) ((fData.Char.lexLitChar$23,0),True) ((fData.Char.lexLitChar$24,0),True) ((fData.Char.lexLitChar$21,0),True) ((fData.Char.lexLitChar$22,0),True) ((fData.Char.lexLitChar$19,0),True) ((fData.Char.lexLitChar$20,0),True) ((fData.Char.lexLitChar$17,0),True) ((fData.Char.lexLitChar$18,0),True) ((fData.Char.lexLitChar$15,0),True) ((fData.Char.lexLitChar$16,0),True) ((fData.Char.lexLitChar$13,0),True) ((fData.Char.lexLitChar$14,0),True) ((fData.Char.lexLitChar$11,0),True) ((fData.Char.lexLitChar$12,0),True) ((fData.Char.lexLitChar$9,0),True) ((fData.Char.lexLitChar$10,0),True) ((fData.Char.lexLitChar$7,0),True) ((fData.Char.lexLitChar$8,0),True) ((fData.Char.lexLitChar$5,0),True) ((fData.Char.lexLitChar$6,0),True) ((fData.Char.lexLitChar$3,0),True) ((fData.Char.lexLitChar$4,0),True) ((fData.Char.lexLitChar,0),True) ((fData.Char.lexLitChar$2,0),True) ((fData.Char.isOctDigit,0),True) ((fData.Char.isDigit,0),True) ((fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer$3,0),True) ((fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer$3,1),True) ((fData.Char.isHexDigit,0),True) ((fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer,0),True) ((fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer,1),True) ((fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer,2),True) ((fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer$2,0),True) ((fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer$2,1),True) ((fJhc.String.eqUnpackedString,0),True) ((fJhc.String.eqUnpackedString,1),True) ((fData.Char.intToDigit,0),True) ((fInstance@.iPrelude.divMod.default$4,0),True) ((fW@.fInstance@.iJhc.Order.==.Jhc.Prim.[],0),True) ((fW@.fInstance@.iJhc.Order.==.Jhc.Prim.[],1),True) ((fInstance@.iPrelude.divMod.default$2,0),True) ((fInstance@.iPrelude.divMod.default$2,1),True) ((fInstance@.iPrelude.divMod.default$3,0),True) ((fInstance@.iPrelude.divMod.default$3,1),True) ((fW@.fData.Char.isSpace,0),True) ((fInstance@.iPrelude.divMod.default,0),True) ((fInstance@.iPrelude.divMod.default,1),True) ((fW@.fForeign.C.String.peekCAString,0),True) ((fW@.fSpec@.Prelude.490.fPrelude.elem,0),True) ((fW@.fSpec@.Prelude.490.fPrelude.elem,1),True) ((fW@.fPrelude.span$5,0),True) ((fW@.fPrelude.span$2,0),True) ((fW@.fPrelude.span$2,1),True) ((fW@.fPrelude.span$3,0),True) ((fW@.fPrelude.span$3,1),True) ((fW@.fPrelude.span$4,0),True) ((fW@.fData.Char.intToDigit,0),True) ((fW@.fPrelude.span,0),True) ((fW@.fPrelude.span,1),True) ((fW@.fData.Char.digitToInt,0),True) ((fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,0),True) ((fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,1),True) ((fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,2),True) ((fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,3),True) ((fW@.fData.Char.isAlpha,0),True) ((fW@.fData.Char.isAlphaNum,0),True) ((bap_1_W@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase_101198,0),True) ((bap_1_W@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase_101198,1),True) ((f6256,0),True) ((bap_1_theMain$16_101122,0),True) ((bap_1_theMain$16_101122,1),True) ((bap_1_theMain$4_101058,0),True) ((bap_1_theMain$4_101058,1),True) ((f5974,0),True) ((f6438,0),True) ((f6438,1),True) ((f6438,2),True) ((f5852,0),True) ((bap_1_theMain$2_101050,0),True) ((bap_1_theMain$2_101050,1),True) ((f5142,0),True) ((f3992,0),True) ((f4384,0),True) ((bap_1_Prelude.Text.lex$31_100628,0),True) ((bap_1_Prelude.Text.lex$31_100628,1),True) ((bap_1_Prelude.Text.lex$29_100606,0),True) ((bap_1_Prelude.Text.lex$29_100606,1),True) ((bap_1_Prelude.Text.lex$28_100620,0),True) ((bap_1_Prelude.Text.lex$28_100620,1),True) ((bap_1_Prelude.Text.lex$25_100582,0),True) ((bap_1_Prelude.Text.lex$25_100582,1),True) ((f4440,0),True) ((bap_1_Prelude.Text.lex$22_100558,0),True) ((bap_1_Prelude.Text.lex$22_100558,1),True) ((bap_1_Prelude.Text.lex$17_100542,0),True) ((bap_1_Prelude.Text.lex$17_100542,1),True) ((bap_1_Prelude.Text.lex$21_100550,0),True) ((bap_1_Prelude.Text.lex$21_100550,1),True) ((bap_1_Prelude.Text.lex$14_100530,0),True) ((bap_1_Prelude.Text.lex$14_100530,1),True) ((bap_1_Prelude.Text.lex$2_100442,0),True) ((bap_1_Prelude.Text.lex$2_100442,1),True) ((f23154,0),True) ((fR@.fPrelude.Text.lex,0),True) ((bap_1_Jhc.Basics.concatMap$2_100366,0),True) ((bap_1_Jhc.Basics.concatMap$2_100366,1),True) ((fR@.fJhc.Basics.112_rev,0),True) ((fR@.fJhc.Basics.112_rev,1),True) ((f3916,0),True) ((f3916,1),True) ((f3880,0),True) ((f3880,1),True) ((f3880,2),True) ((f3318,0),True) ((f3318,1),True) ((f3878,0),True) ((fR@.fJhc.IO.putErrLn,0),True) ((fJhc.String.16_f,0),True) ((fJhc.String.16_f,1),True) ((fW@.fForeign.C.String.5_loop,0),True) ((fW@.fForeign.C.String.5_loop,1),True) ((f5660,0),True) ((fW@.f17290,0),True) ((fW@.f17290,1),True) ((f3394,0),False) ((f7068,0),False) ((f2308,0),False) ((f4236,0),False) ((f4950,0),False) ((f4950,1),False) ((f4950,2),False) ((f4950,3),False) ((f4950,4),False) ((f6058,0),False) ((f6186,0),False) ((f3526,0),False) usedCafs (v-15391,True) usedFuncs (fForeign.Marshal.Alloc.alloca$2,True) (@main,True) (fW@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,True) (fW@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase$2,True) (ftheMain$25,True) (ftheMain$26,True) (ftheMain$23,True) (ftheMain$24,True) (ftheMain$22,True) (ftheMain$21,True) (ftheMain$19,True) (ftheMain$20,True) (ftheMain$18,True) (ftheMain$13,True) (ftheMain$15,True) (ftheMain$17,True) (ftheMain$14,True) (ftheMain$16,True) (ftheMain$12,True) (ftheMain$7,True) (ftheMain$9,True) (ftheMain$11,True) (ftheMain$8,True) (ftheMain$10,True) (ftheMain$5,True) (ftheMain$6,True) (ftheMain$4,True) (ftheMain$3,True) (ftheMain,True) (ftheMain$2,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[],True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[]$2,True) (fW@.fData.Char.showLitChar$6,True) (fW@.fData.Char.showLitChar$5,True) (fW@.fData.Char.showLitChar$3,True) (fW@.fData.Char.showLitChar$4,True) (fW@.fData.Char.showLitChar,True) (fW@.fData.Char.showLitChar$2,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$23,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$2,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$21,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$22,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$19,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$20,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$17,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$18,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$15,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$16,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$3,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$14,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$12,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$13,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$10,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$11,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$8,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$9,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$6,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$7,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$4,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$5,True) (fW@.fNumeric.floatToDigits$24,True) (fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double,True) (fW@.fNumeric.floatToDigits$30,True) (fW@.fNumeric.floatToDigits$31,True) (fW@.fNumeric.floatToDigits$25,True) (fW@.fNumeric.floatToDigits$26,True) (fW@.fNumeric.floatToDigits$28,True) (fW@.fNumeric.floatToDigits$29,True) (fW@.fNumeric.floatToDigits$23,True) (fW@.fNumeric.floatToDigits$27,True) (fW@.fNumeric.floatToDigits$21,True) (fW@.fNumeric.floatToDigits$22,True) (fW@.fNumeric.floatToDigits$19,True) (fW@.fNumeric.floatToDigits$20,True) (fW@.fNumeric.floatToDigits$8,True) (fW@.fNumeric.floatToDigits$18,True) (fW@.fNumeric.floatToDigits$16,True) (fW@.fNumeric.floatToDigits$17,True) (fW@.fNumeric.floatToDigits$14,True) (fW@.fNumeric.floatToDigits$15,True) (fW@.fNumeric.floatToDigits$12,True) (fW@.fNumeric.floatToDigits$13,True) (fW@.fNumeric.floatToDigits$10,True) (fW@.fNumeric.floatToDigits$11,True) (fW@.fNumeric.floatToDigits$7,True) (fW@.fNumeric.floatToDigits$9,True) (fW@.fNumeric.floatToDigits$3,True) (fW@.fNumeric.floatToDigits$6,True) (fW@.fNumeric.floatToDigits$4,True) (fW@.fNumeric.floatToDigits$5,True) (fW@.fNumeric.floatToDigits,True) (fW@.fNumeric.floatToDigits$2,True) (fInstance@.iPrelude.decodeFloat.Jhc.Float.Double$2,True) (fInstance@.iPrelude.ceiling.default,True) (fInstance@.iPrelude.decodeFloat.Jhc.Float.Double$4,True) (fInstance@.iPrelude.decodeFloat.Jhc.Float.Double$3,True) (fInstance@.iPrelude.decodeFloat.Jhc.Float.Double,True) (fPrelude.Text.lex$34,True) (fForeign.Marshal.Alloc.alloca,True) (fPrelude.Text.lex$33,True) (fPrelude.Text.lex$19,True) (fPrelude.Text.lex$32,True) (fPrelude.Text.lex$31,True) (fPrelude.Text.lex$29,True) (fPrelude.Text.lex$28,True) (fPrelude.Text.lex$27,True) (fPrelude.Text.lex$30,True) (fPrelude.Text.lex$25,True) (fPrelude.Text.lex$24,True) (fPrelude.Text.lex$20,True) (fPrelude.Text.lex$26,True) (fPrelude.Text.lex$23,True) (fPrelude.Text.lex$22,True) (fPrelude.Text.lex$17,True) (fPrelude.Text.lex$21,True) (fPrelude.Text.lex$16,True) (fPrelude.Text.lex$18,True) (fPrelude.Text.lex$14,True) (fPrelude.Text.130_isIdChar,True) (fPrelude.Text.lex$13,True) (fPrelude.Text.lex$15,True) (fPrelude.Text.lex$12,True) (fPrelude.Text.129_isSym,True) (fPrelude.Text.lex$10,True) (fPrelude.Text.lex$11,True) (fPrelude.Text.100_lexString,True) (fPrelude.Text.lex$9,True) (fPrelude.Text.lex$8,True) (fPrelude.Text.lex$5,True) (fPrelude.Text.lex$6,True) (fPrelude.Text.lex$7,True) (fPrelude.Text.lex$2,True) (fPrelude.Text.lex$4,True) (fPrelude.Text.lex,True) (fPrelude.Text.lex$3,True) (fNumeric.readDec$8,True) (fNumeric.lexDigits,True) (fNumeric.readDec$5,True) (fNumeric.readDec$2,True) (fNumeric.readDec$6,True) (fNumeric.readDec$7,True) (fNumeric.readDec$3,True) (fNumeric.readDec$4,True) (fNumeric.nonnull$4,True) (fNumeric.readDec,True) (fNumeric.nonnull$2,True) (fNumeric.nonnull$3,True) (fJhc.Basics.concatMap$2,True) (fNumeric.nonnull,True) (fR@.fJhc.Basics.++,True) (fJhc.Basics.concatMap,True) (fJhc.Basics.reverse,True) (fJhc.Basics.++,True) (fPrelude.*,True) (fPrelude.^,True) (fPrelude.take,True) (fPrelude.take$2,True) (fJhc.IO.error$2,True) (fPrelude.drop,True) (fPrelude.IO.putStrLn,True) (fJhc.IO.error,True) (fData.Char.lexLitChar$25,True) (fJhc.IO.putErrLn,True) (fData.Char.lexLitChar$23,True) (fData.Char.lexLitChar$24,True) (fData.Char.lexLitChar$21,True) (fData.Char.lexLitChar$22,True) (fData.Char.lexLitChar$19,True) (fData.Char.lexLitChar$20,True) (fData.Char.lexLitChar$17,True) (fData.Char.lexLitChar$18,True) (fData.Char.lexLitChar$15,True) (fData.Char.lexLitChar$16,True) (fData.Char.lexLitChar$13,True) (fData.Char.lexLitChar$14,True) (fData.Char.lexLitChar$11,True) (fData.Char.lexLitChar$12,True) (fData.Char.lexLitChar$9,True) (fData.Char.lexLitChar$10,True) (fData.Char.lexLitChar$7,True) (fData.Char.lexLitChar$8,True) (fData.Char.lexLitChar$5,True) (fData.Char.lexLitChar$6,True) (fData.Char.lexLitChar$3,True) (fData.Char.lexLitChar$4,True) (fData.Char.lexLitChar,True) (fData.Char.lexLitChar$2,True) (fData.Char.isOctDigit,True) (fData.Char.isDigit,True) (fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer$3,True) (fData.Char.isHexDigit,True) (fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer,True) (fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer$2,True) (fJhc.String.eqUnpackedString,True) (fData.Char.intToDigit,True) (fInstance@.iPrelude.divMod.default$4,True) (fW@.fInstance@.iJhc.Order.==.Jhc.Prim.[],True) (fInstance@.iPrelude.divMod.default$2,True) (fInstance@.iPrelude.divMod.default$3,True) (fW@.fData.Char.isSpace,True) (fInstance@.iPrelude.divMod.default,True) (fW@.fForeign.C.String.peekCAString,True) (fW@.fSpec@.Prelude.490.fPrelude.elem,True) (fW@.fPrelude.span$5,True) (fW@.fPrelude.span$2,True) (fW@.fPrelude.span$3,True) (fW@.fPrelude.span$4,True) (fW@.fData.Char.intToDigit,True) (fW@.fPrelude.span,True) (fW@.fData.Char.digitToInt,True) (fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase,True) (fW@.fData.Char.isAlpha,True) (fW@.fData.Char.isAlphaNum,True) (@initcafs,True) (bap_1_W@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase_101198,True) (f6256,True) (bap_1_theMain$16_101122,True) (bap_1_theMain$4_101058,True) (f5974,True) (f6438,True) (f5852,True) (bap_1_theMain$2_101050,True) (f5142,True) (f3992,True) (f4384,True) (bap_1_Prelude.Text.lex$31_100628,True) (bap_1_Prelude.Text.lex$29_100606,True) (bap_1_Prelude.Text.lex$28_100620,True) (bap_1_Prelude.Text.lex$25_100582,True) (f4440,True) (bap_1_Prelude.Text.lex$22_100558,True) (bap_1_Prelude.Text.lex$17_100542,True) (bap_1_Prelude.Text.lex$21_100550,True) (bap_1_Prelude.Text.lex$14_100530,True) (bap_1_Prelude.Text.lex$2_100442,True) (f23154,True) (fR@.fPrelude.Text.lex,True) (bap_1_Jhc.Basics.concatMap$2_100366,True) (fR@.fJhc.Basics.112_rev,True) (f3916,True) (f3880,True) (f3318,True) (f3878,True) (fR@.fJhc.IO.putErrLn,True) (fJhc.String.16_f,True) (fW@.fForeign.C.String.5_loop,True) (f5660,True) (fW@.f17290,True) (f3394,False) (f7068,False) (f2308,False) (f1790,False) (f4236,False) (f4950,False) (f6058,False) (f6186,False) (f3526,False) pappFuncs fromList [ftheMain$25,ftheMain$24,ftheMain$15,ftheMain$3,ftheMain$2,fW@.fNumeric.floatToDigits$26,fW@.fNumeric.floatToDigits$22,fInstance@.iPrelude.decodeFloat.Jhc.Float.Double$3,fPrelude.Text.lex$19,fPrelude.Text.lex$31,fPrelude.Text.lex$29,fPrelude.Text.lex$25,fPrelude.Text.lex$20,fPrelude.Text.lex$22,fPrelude.Text.lex$17,fPrelude.Text.lex$14,fPrelude.Text.130_isIdChar,fPrelude.Text.129_isSym,fPrelude.Text.lex$2,fJhc.Basics.concatMap$2,fData.Char.lexLitChar$24,fData.Char.lexLitChar$21,fData.Char.lexLitChar$17,fData.Char.lexLitChar$14,fData.Char.lexLitChar$12,fData.Char.lexLitChar$9,fData.Char.lexLitChar$7,fData.Char.lexLitChar$4,fData.Char.isOctDigit,fData.Char.isDigit,fData.Char.isHexDigit,fData.Char.intToDigit,fW@.fPrelude.span$2] suspFuncs fromList [fForeign.Marshal.Alloc.alloca$2,fW@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase$2,ftheMain$23,ftheMain$22,ftheMain$21,ftheMain$18,ftheMain$13,ftheMain$17,ftheMain$12,ftheMain$7,ftheMain$9,ftheMain$11,ftheMain$10,ftheMain$5,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Prim.[]$2,fW@.fData.Char.showLitChar$5,fW@.fData.Char.showLitChar$3,fW@.fData.Char.showLitChar$4,fW@.fData.Char.showLitChar$2,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$23,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$2,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$21,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$19,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$20,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$17,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$18,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$15,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$16,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$14,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$12,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$13,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$10,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$8,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$9,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$6,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$7,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$4,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double$5,fW@.fNumeric.floatToDigits$24,fW@.fInstance@.iPrelude.Text.showsPrec.Jhc.Float.Double,fW@.fNumeric.floatToDigits$30,fW@.fNumeric.floatToDigits$31,fW@.fNumeric.floatToDigits$28,fW@.fNumeric.floatToDigits$29,fW@.fNumeric.floatToDigits$23,fW@.fNumeric.floatToDigits$27,fW@.fNumeric.floatToDigits$19,fW@.fNumeric.floatToDigits$20,fW@.fNumeric.floatToDigits$8,fW@.fNumeric.floatToDigits$18,fW@.fNumeric.floatToDigits$16,fW@.fNumeric.floatToDigits$17,fW@.fNumeric.floatToDigits$14,fW@.fNumeric.floatToDigits$15,fW@.fNumeric.floatToDigits$12,fW@.fNumeric.floatToDigits$13,fW@.fNumeric.floatToDigits$10,fW@.fNumeric.floatToDigits$11,fW@.fNumeric.floatToDigits$7,fW@.fNumeric.floatToDigits$9,fW@.fNumeric.floatToDigits$3,fW@.fNumeric.floatToDigits$6,fW@.fNumeric.floatToDigits$4,fW@.fNumeric.floatToDigits$5,fW@.fNumeric.floatToDigits$2,fInstance@.iPrelude.decodeFloat.Jhc.Float.Double$4,fInstance@.iPrelude.decodeFloat.Jhc.Float.Double,fPrelude.Text.lex$34,fPrelude.Text.lex$33,fPrelude.Text.lex$32,fPrelude.Text.lex$30,fPrelude.Text.lex$24,fPrelude.Text.lex$26,fPrelude.Text.lex$23,fPrelude.Text.lex$16,fPrelude.Text.lex$18,fPrelude.Text.lex$13,fPrelude.Text.lex$15,fPrelude.Text.lex$12,fPrelude.Text.lex$10,fPrelude.Text.lex$9,fPrelude.Text.lex$8,fPrelude.Text.lex$6,fPrelude.Text.lex$4,fPrelude.Text.lex$3,fNumeric.readDec$8,fNumeric.readDec$5,fNumeric.readDec$2,fNumeric.readDec$6,fNumeric.readDec$3,fNumeric.readDec$4,fNumeric.nonnull$4,fNumeric.nonnull$2,fR@.fJhc.Basics.++,fJhc.Basics.++,fPrelude.*,fPrelude.^,fPrelude.take,fPrelude.take$2,fJhc.IO.error$2,fData.Char.lexLitChar$25,fData.Char.lexLitChar$23,fData.Char.lexLitChar$22,fData.Char.lexLitChar$19,fData.Char.lexLitChar$20,fData.Char.lexLitChar$18,fData.Char.lexLitChar$15,fData.Char.lexLitChar$16,fData.Char.lexLitChar$13,fData.Char.lexLitChar$11,fData.Char.lexLitChar$10,fData.Char.lexLitChar$8,fData.Char.lexLitChar$5,fData.Char.lexLitChar$6,fData.Char.lexLitChar$3,fData.Char.lexLitChar$2,fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer$3,fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer,fInstance@.iPrelude.Text.showsPrec.Jhc.Basics.Integer$2,fInstance@.iPrelude.divMod.default$4,fInstance@.iPrelude.divMod.default$2,fInstance@.iPrelude.divMod.default$3,fW@.fPrelude.span$5,fW@.fPrelude.span$3,fW@.fPrelude.span$4,bap_1_W@.fW@.fSpec@.Numeric.19.fNumeric.showIntAtBase_101198,bap_1_theMain$16_101122,bap_1_theMain$4_101058,bap_1_theMain$2_101050,bap_1_Prelude.Text.lex$31_100628,bap_1_Prelude.Text.lex$29_100606,bap_1_Prelude.Text.lex$28_100620,bap_1_Prelude.Text.lex$25_100582,bap_1_Prelude.Text.lex$22_100558,bap_1_Prelude.Text.lex$17_100542,bap_1_Prelude.Text.lex$21_100550,bap_1_Prelude.Text.lex$14_100530,bap_1_Prelude.Text.lex$2_100442,bap_1_Jhc.Basics.concatMap$2_100366] varBind: (pn1297,n1294)