jhc -v -mfgrin --optc=-march=opteron -o clausify clausify.hs
jhc 0.1 20070303 (nioteadd+12)
Compiling [Right "clausify.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: clausify.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.map \(())({Jhc.Basics.(,)[(0,()),(1,())]})
Jhc.Basics.++ \({Jhc.Basics.(,)[(0,()),(1,())],Jhc.Prim.Char,Jhc.Prim.Int})
Jhc.Basics.foldl \({Jhc.Basics.Integer})({Jhc.Basics.Integer})
Jhc.Basics.concat \({Jhc.Prim.Char})
Jhc.Basics.concatMap \({Jhc.Basics.(,)[(0,()),(1,{Jhc.Prim.[][(0,{Jhc.Prim.Char})]})]})({Jhc.Prim.Char,Jhc.Prim.Int})
Prelude.+ \(())
Prelude.- \(())
Prelude.* \(())
Prelude.negate \(())
Prelude.abs \(())
Prelude.signum \(())
Prelude.fromInteger \(())
Prelude.fromInt \(())
Prelude.quot \(())
Prelude.rem \(())
Prelude./ \(())
Prelude.sqrt \(())
Prelude.exponent \(())
Prelude.scaleFloat \(())
Prelude.even \({Jhc.Prim.Int})
Prelude.gcd \(())
Prelude.^ \(())({Jhc.Prim.Int})
Prelude.foldl1 \({Jhc.Basics.Integer})
Prelude.take \({Jhc.Prim.[][(0,{Jhc.Prim.Char})]})
Jhc.IO.ioError \({Jhc.Basics.(),Jhc.Addr.Ptr[(0,())]})
Jhc.IO.catch \({Jhc.Basics.()})
Jhc.Enum.toEnum \({Time.Day,Time.Month})
Jhc.Enum.fromEnum \({Time.Day,Time.Month})
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.Order.compare \(())
Jhc.Order.< \(())
Jhc.Order.<= \(())
Jhc.Order.> \({Jhc.Basics.(,)[(0,{Jhc.Prim.[][(0,{Jhc.Prim.Char})]}),(1,{Jhc.Prim.[][(0,{Jhc.Prim.Char})]})],Jhc.Prim.Char,Jhc.Prim.Int})
Prelude.Text.readsPrec \({Jhc.Prim.Int})
Prelude.Text.reads \({Jhc.Prim.Int})
Prelude.Text.read \({Jhc.Prim.Int})
Data.Ix.range \(())
Data.Ix.index \(())
Data.Array.indices \(())(())
Data.Array.assocs \(())(())
Jhc.List.mapIterate \(())({Jhc.Basics.(,)[(0,()),(1,())]})
Jhc.List.mapFilter \(())({Jhc.Basics.(,)[(0,()),(1,())]})
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.Basics.(),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.readSigned \({Jhc.Basics.Integer})
Numeric.readInt \({Jhc.Basics.Integer})
Numeric.readDec \({Jhc.Basics.Integer})
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@.iPrelude.signum.Prelude.Ratio.Ratio \(())
Instance@.iPrelude.fromInteger.Prelude.Ratio.Ratio \(())
Instance@.iPrelude.negate.Prelude.Ratio.Ratio \(())
Instance@.iPrelude.abs.Prelude.Ratio.Ratio \(())
Instance@.iPrelude.+.Prelude.Ratio.Ratio \(())
Instance@.iPrelude.*.Prelude.Ratio.Ratio \(())
Instance@.iJhc.Order.<=.Prelude.Ratio.Ratio \(())
Instance@.iJhc.Order.<.Prelude.Ratio.Ratio \(())
W@.fInstance@.iPrelude.abs.Prelude.Ratio.Ratio \(())
W@.fInstance@.iPrelude.negate.Prelude.Ratio.Ratio \(())
W@.fInstance@.iPrelude.fromInteger.Prelude.Ratio.Ratio \(())
W@.fInstance@.iPrelude.signum.Prelude.Ratio.Ratio \(())
W@.fPrelude.Ratio.reduce \(())
W@.fInstance@.iPrelude.*.Prelude.Ratio.Ratio \(())
W@.fInstance@.iPrelude.+.Prelude.Ratio.Ratio \(())
W@.fInstance@.iJhc.Order.<=.Prelude.Ratio.Ratio \(())
W@.fInstance@.iJhc.Order.<.Prelude.Ratio.Ratio \(())
Instance@.iJhc.Order.==.Data.IORef.IORef \(())
W@.fInstance@.iJhc.Order.==.Data.IORef.IORef \(())
Instance@.iJhc.Order.==.Data.Complex.Complex \(())
Instance@.iPrelude.sqrt.Data.Complex.Complex \(())
Instance@.iPrelude./.Data.Complex.Complex \(())
Instance@.iPrelude.fromInteger.Data.Complex.Complex \(())
Instance@.iPrelude.fromInt.Data.Complex.Complex \(())
Instance@.iPrelude.abs.Data.Complex.Complex \(())
Instance@.iPrelude.signum.Data.Complex.Complex \(())
Instance@.iPrelude.*.Data.Complex.Complex \(())
Instance@.iPrelude.negate.Data.Complex.Complex \(())
Instance@.iPrelude.+.Data.Complex.Complex \(())
Instance@.iPrelude.-.Data.Complex.Complex \(())
W@.fInstance@.iPrelude.-.Data.Complex.Complex \(())
W@.fInstance@.iPrelude.+.Data.Complex.Complex \(())
W@.fInstance@.iPrelude.negate.Data.Complex.Complex \(())
W@.fInstance@.iPrelude.*.Data.Complex.Complex \(())
W@.fInstance@.iPrelude.fromInt.Data.Complex.Complex \(())
W@.fInstance@.iPrelude.fromInteger.Data.Complex.Complex \(())
W@.fInstance@.iPrelude./.Data.Complex.Complex \(())
W@.fInstance@.iJhc.Order.==.Data.Complex.Complex \(())
W@.fInstance@.iPrelude.abs.Data.Complex.Complex \(())
W@.fInstance@.iPrelude.sqrt.Data.Complex.Complex \(())
W@.fData.Complex.magnitude \(())
W@.fInstance@.iPrelude.signum.Data.Complex.Complex \(())
Instance@.iJhc.Order.<=.Data.Array.Array \(())(())
Instance@.iJhc.Order.==.Data.Array.Array \(())(())
W@.fData.Array.! \(())(())
W@.fInstance@.iJhc.Order.<=.Data.Array.Array \(())(())
W@.fInstance@.iJhc.Order.==.Data.Array.Array \(())(())
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.IO.exitFailure \({Jhc.Basics.()})
Instance@.iJhc.Enum.enumFromTo.default \({Time.Day,Time.Month})
Instance@.iJhc.Order.compare.Jhc.Prim.[] \(())
Instance@.iJhc.Order.==.Jhc.Prim.[] \(())
Instance@.iJhc.Order.max.default \({Jhc.Prim.Int})
Instance@.iJhc.Order.>.default \({Jhc.Basics.(,)[(0,()),(1,())]})
Instance@.iJhc.Order.<=.default \({Jhc.Basics.(,)[(0,()),(1,())],Jhc.Prim.[][(0,())],Prelude.Maybe[(0,())],Prelude.Either[(0,()),(1,())],System.ExitCode,System.IO.BufferMode,Time.CalendarTime,Time.TimeDiff,System.Locale.TimeLocale,Time.ClockTime})
Instance@.iJhc.Order.<.default \({Jhc.Basics.(,)[(0,()),(1,())],Jhc.Prim.[][(0,())],Prelude.Maybe[(0,())],Data.Array.Array[(0,()),(1,())],Prelude.Either[(0,()),(1,())],System.ExitCode,System.IO.BufferMode,Time.CalendarTime,Time.TimeDiff,System.Locale.TimeLocale,Time.ClockTime})
Instance@.iJhc.Order.compare.default \({Jhc.Prim.Char,Jhc.Prim.Int,Foreign.C.Types.CInt,Data.Array.Array[(0,()),(1,())],Data.Ratio.Ratio[(0,())],Jhc.Basics.Integer,Jhc.Float.Double,Jhc.Float.Float,Jhc.Handle.IOMode,Jhc.Order.Bool,Jhc.Order.Ordering,Prelude.Ratio.Ratio[(0,())],System.IO.SeekMode,Time.Day,Time.Month,Data.Int.Int16,Data.Int.Int32,Data.Int.Int64,Data.Int.Int8,Data.Int.IntMax,Data.Int.IntPtr,Data.Word.Word,Data.Word.Word16,Data.Word.Word32,Data.Word.Word64,Data.Word.Word8,Data.Word.WordMax,Data.Word.WordPtr,Foreign.C.Types.CChar,Foreign.C.Types.CShort,Foreign.C.Types.CSize,Foreign.C.Types.CTime,Foreign.C.Types.CUInt,Foreign.C.Types.CWchar,Foreign.C.Types.CWint,Jhc.Addr.Addr,Jhc.Addr.FunAddr})
W@.fInstance@.iJhc.Order.==.Jhc.Prim.[] \(())
W@.fInstance@.iJhc.Order./=.default \({Jhc.Prim.[][(0,{Jhc.Prim.Char})],Foreign.C.Types.CInt,Jhc.Basics.Integer,Jhc.Order.Ordering})
W@.fInstance@.iJhc.Order.<=.default \({Jhc.Basics.(,)[(0,()),(1,())],Jhc.Prim.[][(0,())],Prelude.Maybe[(0,())],Prelude.Either[(0,()),(1,())],System.ExitCode,System.IO.BufferMode,Time.CalendarTime,Time.TimeDiff,System.Locale.TimeLocale,Time.ClockTime})
W@.fInstance@.iJhc.Order.compare.default \({Jhc.Prim.Char,Jhc.Prim.Int,Foreign.C.Types.CInt,Data.Array.Array[(0,()),(1,())],Data.Ratio.Ratio[(0,())],Jhc.Basics.Integer,Jhc.Float.Double,Jhc.Float.Float,Jhc.Handle.IOMode,Jhc.Order.Bool,Jhc.Order.Ordering,Prelude.Ratio.Ratio[(0,())],System.IO.SeekMode,Time.Day,Time.Month,Data.Int.Int16,Data.Int.Int32,Data.Int.Int64,Data.Int.Int8,Data.Int.IntMax,Data.Int.IntPtr,Data.Word.Word,Data.Word.Word16,Data.Word.Word32,Data.Word.Word64,Data.Word.Word8,Data.Word.WordMax,Data.Word.WordPtr,Foreign.C.Types.CChar,Foreign.C.Types.CShort,Foreign.C.Types.CSize,Foreign.C.Types.CTime,Foreign.C.Types.CUInt,Foreign.C.Types.CWchar,Foreign.C.Types.CWint,Jhc.Addr.Addr,Jhc.Addr.FunAddr})
W@.fInstance@.iJhc.Order.compare.Jhc.Prim.[] \(())
W@.fInstance@.iJhc.Order.>.default \({Jhc.Basics.(,)[(0,()),(1,())]})
W@.fInstance@.iJhc.Order.<.default \({Jhc.Basics.(,)[(0,()),(1,())],Jhc.Prim.[][(0,())],Prelude.Maybe[(0,())],Data.Array.Array[(0,()),(1,())],Prelude.Either[(0,()),(1,())],System.ExitCode,System.IO.BufferMode,Time.CalendarTime,Time.TimeDiff,System.Locale.TimeLocale,Time.ClockTime})
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@.iJhc.Order.<.Jhc.Addr.Ptr \(())
Instance@.iJhc.Order.compare.Jhc.Addr.Ptr \(())
Instance@.iJhc.Order.<=.Jhc.Addr.Ptr \(())
Instance@.iJhc.Order.==.Jhc.Addr.Ptr \(())
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@.iJhc.Order.==.Jhc.Basics.(,,,,,,) \(())(())(())(())(())(())(())
Instance@.iJhc.Order.==.Jhc.Basics.(,,,,,) \(())(())(())(())(())(())
Instance@.iJhc.Order.==.Jhc.Basics.(,,,,) \(())(())(())(())(())
Instance@.iJhc.Order.==.Jhc.Basics.(,,,) \(())(())(())(())
Instance@.iJhc.Order.==.Jhc.Basics.(,,) \(())(())(())
Instance@.iJhc.Order.==.Jhc.Basics.(,) \(())(())
Instance@.iJhc.Order.compare.Jhc.Basics.(,) \(())(())
Instance@.iPrelude./.Data.Ratio.Ratio \(())
Instance@.iPrelude.fromInteger.Data.Ratio.Ratio \(())
Instance@.iPrelude.abs.Data.Ratio.Ratio \(())
Instance@.iPrelude.signum.Data.Ratio.Ratio \(())
Instance@.iPrelude.*.Data.Ratio.Ratio \(())
Instance@.iPrelude.negate.Data.Ratio.Ratio \(())
Instance@.iJhc.Order.<.Data.Ratio.Ratio \(())
Instance@.iPrelude.+.Data.Ratio.Ratio \(())
Instance@.iJhc.Order.==.Data.Ratio.Ratio \(())
Instance@.iJhc.Order.<=.Data.Ratio.Ratio \(())
Instance@.iJhc.Order.==.Prelude.Either \(())(())
Instance@.iJhc.Order.compare.Prelude.Either \(())(())
Instance@.iJhc.Order.==.Prelude.Maybe \(())
Instance@.iJhc.Order.compare.Prelude.Maybe \(())
Instance@.iPrelude.fromInt.default \({Data.Ratio.Ratio[(0,())],Prelude.Ratio.Ratio[(0,())]})
Instance@.iPrelude.-.default \({Data.Ratio.Ratio[(0,())],Prelude.Ratio.Ratio[(0,())]})
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@.fInstance@.iJhc.Order.==.Jhc.Addr.Ptr \(())
W@.fInstance@.iJhc.Order.==.Data.Ratio.Ratio \(())
W@.fInstance@.iJhc.Order.==.Jhc.Basics.(,) \(())(())
W@.fInstance@.iJhc.Order.==.Jhc.Basics.(,,) \(())(())(())
W@.fInstance@.iJhc.Order.==.Jhc.Basics.(,,,) \(())(())(())(())
W@.fInstance@.iJhc.Order.==.Jhc.Basics.(,,,,) \(())(())(())(())(())
W@.fInstance@.iJhc.Order.==.Jhc.Basics.(,,,,,) \(())(())(())(())(())(())
W@.fInstance@.iJhc.Order.==.Jhc.Basics.(,,,,,,) \(())(())(())(())(())(())(())
W@.fInstance@.iJhc.Order.<=.Jhc.Addr.Ptr \(())
W@.fInstance@.iJhc.Order.compare.Jhc.Addr.Ptr \(())
W@.fInstance@.iJhc.Order.compare.Jhc.Basics.(,) \(())(())
W@.fInstance@.iJhc.Order.<.Jhc.Addr.Ptr \(())
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@.fInstance@.iPrelude.fromInteger.Data.Ratio.Ratio \(())
W@.fInstance@.iPrelude.signum.Data.Ratio.Ratio \(())
W@.fInstance@.iPrelude.abs.Data.Ratio.Ratio \(())
W@.fData.Ratio.reduce \(())
W@.fInstance@.iPrelude.negate.Data.Ratio.Ratio \(())
W@.fInstance@.iPrelude.*.Data.Ratio.Ratio \(())
W@.fData.Ratio.% \(())
W@.fInstance@.iPrelude./.Data.Ratio.Ratio \(())
W@.fInstance@.iJhc.Order.<.Data.Ratio.Ratio \(())
W@.fInstance@.iJhc.Order.<=.Data.Ratio.Ratio \(())
W@.fInstance@.iPrelude.+.Data.Ratio.Ratio \(())
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
Total: Main-One
├╴E
│ ├╴PrimOpt
│ │ ├╴(int)==(char,char).ec: 1
│ │ ├╴(int)==(int,int).ec: 2
│ │ ╰╴(intmax_t): 1
│ ╰╴Simplify
│   ├╴application-push
│   │ ├╴case: 41
│   │ ╰╴let: 6
│   ├╴case-atomic-unboxed: 2
│   ├╴case-default-case: 4
│   ├╴case-lambda: 1
│   ├╴case-of-bottom: 16
│   ├╴case-of-case: 91
│   ├╴case-of-case-join: 2
│   ├╴error-application: 2
│   ├╴f-beta-reduce: 223
│   ├╴inline
│   │ ├╴Forced: 515
│   │ ├╴Many: 79
│   │ ├╴ManyBranch: 1
│   │ ├╴Once: 16
│   │ ├╴OnceInLam: 37
│   │ ╰╴atomic: 31
│   ├╴known-case
│   │ ├╴(#2#): 5
│   │ ├╴0: 5
│   │ ├╴1: 4
│   │ ├╴Addr#: 3
│   │ ├╴CChar#: 1
│   │ ├╴Foreign.C.Types.CChar: 1
│   │ ├╴Int#: 15
│   │ ├╴Integer#: 1
│   │ ├╴Jhc
│   │ │ ├╴Options.Target#: 5
│   │ │ ├╴Order.Bool#: 7
│   │ │ ╰╴Prim
│   │ │   ├╴IO: 3
│   │ │   ╰╴Int: 1
│   │ ╰╴_: 32
│   ├╴let-coalesce: 17
│   ├╴let-from-case: 25
│   ╰╴strictness.cheap-eagerness.def: 1
├╴EtaExpand
│ ├╴def
│ │ ├╴Data.Ix.index: 2
│ │ ├╴Data.Ix.range: 1
│ │ ├╴Foreign.Storable.peek: 2
│ │ ├╴Foreign.Storable.sizeOf: 1
│ │ ├╴Jhc.Enum.fromEnum: 1
│ │ ├╴Jhc.Monad.af@17471: 1
│ │ ├╴Jhc.Monad.af@17647: 1
│ │ ├╴Jhc.Order.<: 2
│ │ ├╴Jhc.Order.<=: 2
│ │ ├╴Jhc.Order.==: 2
│ │ ├╴Jhc.Order.>: 2
│ │ ├╴Jhc.Order.compare: 2
│ │ ├╴Numeric.readDec: 1
│ │ ├╴Prelude.*: 2
│ │ ├╴Prelude.+: 2
│ │ ├╴Prelude.-: 2
│ │ ├╴Prelude./: 2
│ │ ├╴Prelude.abs: 1
│ │ ├╴Prelude.exponent: 1
│ │ ├╴Prelude.fromInt: 1
│ │ ├╴Prelude.fromInteger: 1
│ │ ├╴Prelude.negate: 1
│ │ ├╴Prelude.quot: 2
│ │ ├╴Prelude.rem: 2
│ │ ├╴Prelude.scaleFloat: 2
│ │ ├╴Prelude.signum: 1
│ │ ├╴Prelude.sqrt: 1
│ │ ├╴W@.fInstance@.iPrelude.Text.readsPrec.Jhc.Basics.Integer: 1
│ │ ├╴x15784: 1
│ │ ├╴x23840: 1
│ │ ├╴x2780: 1
│ │ ╰╴x334: 1
│ ├╴min
│ │ ╰╴def
│ │   ├╴Jhc.Enum.toEnum: 1
│ │   ├╴Jhc.IO.catch: 1
│ │   ├╴Jhc.Monad.mapM: 1
│ │   ├╴Prelude.IO.putStr: 1
│ │   ├╴x15802: 1
│ │   ╰╴x23860: 1
│ ╰╴use
│   ├╴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@.iJhc.Order.<.Data.Ratio.Ratio: 2
│   ├╴Instance@.iJhc.Order.<.Jhc.Addr.Ptr: 2
│   ├╴Instance@.iJhc.Order.<.Prelude.Ratio.Ratio: 2
│   ├╴Instance@.iJhc.Order.<=.Data.Array.Array: 2
│   ├╴Instance@.iJhc.Order.<=.Data.Ratio.Ratio: 2
│   ├╴Instance@.iJhc.Order.<=.Jhc.Addr.Ptr: 2
│   ├╴Instance@.iJhc.Order.<=.Prelude.Ratio.Ratio: 2
│   ├╴Instance@.iJhc.Order.==.Data.Array.Array: 2
│   ├╴Instance@.iJhc.Order.==.Data.Complex.Complex: 2
│   ├╴Instance@.iJhc.Order.==.Data.IORef.IORef: 2
│   ├╴Instance@.iJhc.Order.==.Data.Ratio.Ratio: 2
│   ├╴Instance@.iJhc.Order.==.Jhc.Addr.Ptr: 2
│   ├╴Instance@.iJhc.Order.==.Jhc.Basics.(,): 2
│   ├╴Instance@.iJhc.Order.==.Jhc.Basics.(,,): 2
│   ├╴Instance@.iJhc.Order.==.Jhc.Basics.(,,,): 2
│   ├╴Instance@.iJhc.Order.==.Jhc.Basics.(,,,,): 2
│   ├╴Instance@.iJhc.Order.==.Jhc.Basics.(,,,,,): 2
│   ├╴Instance@.iJhc.Order.==.Jhc.Basics.(,,,,,,): 2
│   ├╴Instance@.iJhc.Order.==.Jhc.Prim.[]: 2
│   ├╴Instance@.iJhc.Order.==.Prelude.Either: 2
│   ├╴Instance@.iJhc.Order.==.Prelude.Maybe: 2
│   ├╴Instance@.iJhc.Order.compare.Jhc.Addr.Ptr: 2
│   ├╴Instance@.iJhc.Order.compare.Jhc.Basics.(,): 2
│   ├╴Instance@.iJhc.Order.compare.Jhc.Prim.[]: 2
│   ├╴Instance@.iJhc.Order.compare.Prelude.Either: 2
│   ├╴Instance@.iJhc.Order.compare.Prelude.Maybe: 2
│   ├╴Instance@.iPrelude.*.Data.Complex.Complex: 2
│   ├╴Instance@.iPrelude.*.Data.Ratio.Ratio: 2
│   ├╴Instance@.iPrelude.*.Prelude.Ratio.Ratio: 2
│   ├╴Instance@.iPrelude.+.Data.Complex.Complex: 2
│   ├╴Instance@.iPrelude.+.Data.Ratio.Ratio: 2
│   ├╴Instance@.iPrelude.+.Prelude.Ratio.Ratio: 2
│   ├╴Instance@.iPrelude.-.Data.Complex.Complex: 2
│   ├╴Instance@.iPrelude.-.default: 4
│   ├╴Instance@.iPrelude./.Data.Complex.Complex: 2
│   ├╴Instance@.iPrelude./.Data.Ratio.Ratio: 2
│   ├╴Instance@.iPrelude.abs.Data.Complex.Complex: 1
│   ├╴Instance@.iPrelude.abs.Data.Ratio.Ratio: 1
│   ├╴Instance@.iPrelude.abs.Prelude.Ratio.Ratio: 1
│   ├╴Instance@.iPrelude.fromInt.Data.Complex.Complex: 1
│   ├╴Instance@.iPrelude.fromInteger.Data.Complex.Complex: 1
│   ├╴Instance@.iPrelude.fromInteger.Data.Ratio.Ratio: 1
│   ├╴Instance@.iPrelude.fromInteger.Prelude.Ratio.Ratio: 1
│   ├╴Instance@.iPrelude.negate.Data.Complex.Complex: 1
│   ├╴Instance@.iPrelude.negate.Data.Ratio.Ratio: 1
│   ├╴Instance@.iPrelude.negate.Prelude.Ratio.Ratio: 1
│   ├╴Instance@.iPrelude.signum.Data.Complex.Complex: 1
│   ├╴Instance@.iPrelude.signum.Data.Ratio.Ratio: 1
│   ├╴Instance@.iPrelude.signum.Prelude.Ratio.Ratio: 1
│   ├╴Instance@.iPrelude.sqrt.Data.Complex.Complex: 1
│   ├╴Jhc.IO.catch: 1
│   ├╴Prelude.IO.putChar: 1
│   ╰╴x16314: 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.Prim.Int: 1
    │ ├╴Instance@.iJhc.Order.==.Foreign.C.Types.CChar: 1
    │ ├╴Instance@.iJhc.Order.==.Jhc.Prim.Int: 3
    │ ├╴Instance@.iJhc.Order.>.Jhc.Prim.Int: 1
    │ ├╴Instance@.iPrelude.*.Jhc.Basics.Integer: 1
    │ ├╴Instance@.iPrelude.+.Jhc.Basics.Integer: 1
    │ ├╴Instance@.iPrelude.-.Jhc.Prim.Int: 2
    │ ├╴Instance@.iPrelude.Text.readsPrec.Jhc.Prim.Int: 1
    │ ├╴Instance@.iPrelude.fromInt.Jhc.Basics.Integer: 2
    │ ├╴Instance@.iPrelude.fromInt.Jhc.Prim.Int: 8
    │ ├╴Instance@.iPrelude.fromInteger.Data.Ratio.Ratio: 1
    │ ├╴Instance@.iPrelude.fromInteger.Prelude.Ratio.Ratio: 1
    │ ├╴Instance@.iPrelude.negate.Jhc.Basics.Integer: 1
    │ ├╴Instance@.iPrelude.quot.Jhc.Prim.Int: 1
    │ ╰╴Instance@.iPrelude.rem.Jhc.Prim.Int: 1
    ╰╴Specialize
      ├╴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
jhc: interrupted