8.91/3.81 YES 10.72/4.32 proof of /export/starexec/sandbox/benchmark/theBenchmark.hs 10.72/4.32 # AProVE Commit ID: 48fb2092695e11cc9f56e44b17a92a5f88ffb256 marcel 20180622 unpublished dirty 10.72/4.32 10.72/4.32 10.72/4.32 H-Termination with start terms of the given HASKELL could be proven: 10.72/4.32 10.72/4.32 (0) HASKELL 10.72/4.32 (1) BR [EQUIVALENT, 0 ms] 10.72/4.32 (2) HASKELL 10.72/4.32 (3) COR [EQUIVALENT, 0 ms] 10.72/4.32 (4) HASKELL 10.72/4.32 (5) NumRed [SOUND, 0 ms] 10.72/4.32 (6) HASKELL 10.72/4.32 (7) Narrow [EQUIVALENT, 171 ms] 10.72/4.32 (8) YES 10.72/4.32 10.72/4.32 10.72/4.32 ---------------------------------------- 10.72/4.32 10.72/4.32 (0) 10.72/4.32 Obligation: 10.72/4.32 mainModule Main 10.72/4.32 module Main where { 10.72/4.32 import qualified Prelude; 10.72/4.32 } 10.72/4.32 10.72/4.32 ---------------------------------------- 10.72/4.32 10.72/4.32 (1) BR (EQUIVALENT) 10.72/4.32 Replaced joker patterns by fresh variables and removed binding patterns. 10.72/4.32 ---------------------------------------- 10.72/4.32 10.72/4.32 (2) 10.72/4.32 Obligation: 10.72/4.32 mainModule Main 10.72/4.32 module Main where { 10.72/4.32 import qualified Prelude; 10.72/4.32 } 10.72/4.32 10.72/4.32 ---------------------------------------- 10.72/4.32 10.72/4.32 (3) COR (EQUIVALENT) 10.72/4.32 Cond Reductions: 10.72/4.32 The following Function with conditions 10.72/4.32 "toEnum 0 = LT; 10.72/4.32 toEnum 1 = EQ; 10.72/4.32 toEnum 2 = GT; 10.72/4.32 " 10.72/4.32 is transformed to 10.72/4.32 "toEnum wy = toEnum5 wy; 10.72/4.32 toEnum wu = toEnum3 wu; 10.72/4.32 toEnum vz = toEnum1 vz; 10.72/4.32 " 10.72/4.32 "toEnum0 True vz = GT; 10.72/4.32 " 10.72/4.32 "toEnum1 vz = toEnum0 (vz == 2) vz; 10.72/4.32 " 10.72/4.32 "toEnum2 True wu = EQ; 10.72/4.32 toEnum2 wv ww = toEnum1 ww; 10.72/4.32 " 10.72/4.32 "toEnum3 wu = toEnum2 (wu == 1) wu; 10.72/4.32 toEnum3 wx = toEnum1 wx; 10.72/4.32 " 10.72/4.32 "toEnum4 True wy = LT; 10.72/4.32 toEnum4 wz xu = toEnum3 xu; 10.72/4.32 " 10.72/4.32 "toEnum5 wy = toEnum4 (wy == 0) wy; 10.72/4.32 toEnum5 xv = toEnum3 xv; 10.72/4.32 " 10.72/4.32 The following Function with conditions 10.72/4.32 "takeWhile p [] = []; 10.72/4.32 takeWhile p (x : xs)|p xx : takeWhile p xs|otherwise[]; 10.72/4.32 " 10.72/4.32 is transformed to 10.72/4.32 "takeWhile p [] = takeWhile3 p []; 10.72/4.32 takeWhile p (x : xs) = takeWhile2 p (x : xs); 10.72/4.32 " 10.72/4.32 "takeWhile1 p x xs True = x : takeWhile p xs; 10.72/4.32 takeWhile1 p x xs False = takeWhile0 p x xs otherwise; 10.72/4.32 " 10.72/4.32 "takeWhile0 p x xs True = []; 10.72/4.32 " 10.72/4.32 "takeWhile2 p (x : xs) = takeWhile1 p x xs (p x); 10.72/4.32 " 10.72/4.32 "takeWhile3 p [] = []; 10.72/4.32 takeWhile3 xy xz = takeWhile2 xy xz; 10.72/4.32 " 10.72/4.32 The following Function with conditions 10.72/4.32 "undefined |Falseundefined; 10.72/4.32 " 10.72/4.32 is transformed to 10.72/4.32 "undefined = undefined1; 10.72/4.32 " 10.72/4.32 "undefined0 True = undefined; 10.72/4.32 " 10.72/4.32 "undefined1 = undefined0 False; 10.72/4.32 " 10.72/4.32 10.72/4.32 ---------------------------------------- 10.72/4.32 10.72/4.32 (4) 10.72/4.32 Obligation: 10.72/4.32 mainModule Main 10.72/4.32 module Main where { 10.72/4.32 import qualified Prelude; 10.72/4.32 } 10.72/4.32 10.72/4.32 ---------------------------------------- 10.72/4.32 10.72/4.32 (5) NumRed (SOUND) 10.72/4.32 Num Reduction:All numbers are transformed to their corresponding representation with Succ, Pred and Zero. 10.72/4.32 ---------------------------------------- 10.72/4.32 10.72/4.32 (6) 10.72/4.32 Obligation: 10.72/4.32 mainModule Main 10.72/4.32 module Main where { 10.72/4.32 import qualified Prelude; 10.72/4.32 } 10.72/4.32 10.72/4.32 ---------------------------------------- 10.72/4.32 10.72/4.32 (7) Narrow (EQUIVALENT) 10.72/4.32 Haskell To QDPs 10.72/4.32 10.72/4.32 digraph dp_graph { 10.72/4.32 node [outthreshold=100, inthreshold=100];1[label="enumFrom",fontsize=16,color="grey",shape="box"];1 -> 3[label="",style="dashed", color="grey", weight=3]; 10.72/4.32 3[label="enumFrom yu3",fontsize=16,color="black",shape="triangle"];3 -> 4[label="",style="solid", color="black", weight=3]; 10.72/4.32 4[label="enumFromTo yu3 GT",fontsize=16,color="black",shape="box"];4 -> 5[label="",style="solid", color="black", weight=3]; 10.72/4.32 5[label="map toEnum (enumFromTo (fromEnum yu3) (fromEnum GT))",fontsize=16,color="black",shape="box"];5 -> 6[label="",style="solid", color="black", weight=3]; 10.72/4.32 6[label="map toEnum (numericEnumFromTo (fromEnum yu3) (fromEnum GT))",fontsize=16,color="black",shape="box"];6 -> 7[label="",style="solid", color="black", weight=3]; 10.72/4.32 7[label="map toEnum (takeWhile (flip (<=) (fromEnum GT)) (numericEnumFrom (fromEnum yu3)))",fontsize=16,color="black",shape="box"];7 -> 8[label="",style="solid", color="black", weight=3]; 10.72/4.32 8[label="map toEnum (takeWhile (flip (<=) (fromEnum GT)) (fromEnum yu3 : (numericEnumFrom $! fromEnum yu3 + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];8 -> 9[label="",style="solid", color="black", weight=3]; 10.72/4.32 9[label="map toEnum (takeWhile2 (flip (<=) (fromEnum GT)) (fromEnum yu3 : (numericEnumFrom $! fromEnum yu3 + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];9 -> 10[label="",style="solid", color="black", weight=3]; 10.72/4.32 10[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (fromEnum yu3) (numericEnumFrom $! fromEnum yu3 + fromInt (Pos (Succ Zero))) (flip (<=) (fromEnum GT) (fromEnum yu3)))",fontsize=16,color="black",shape="box"];10 -> 11[label="",style="solid", color="black", weight=3]; 10.72/4.32 11[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (fromEnum yu3) (numericEnumFrom $! fromEnum yu3 + fromInt (Pos (Succ Zero))) ((<=) fromEnum yu3 fromEnum GT))",fontsize=16,color="black",shape="box"];11 -> 12[label="",style="solid", color="black", weight=3]; 10.72/4.32 12[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (fromEnum yu3) (numericEnumFrom $! fromEnum yu3 + fromInt (Pos (Succ Zero))) (compare (fromEnum yu3) (fromEnum GT) /= GT))",fontsize=16,color="black",shape="box"];12 -> 13[label="",style="solid", color="black", weight=3]; 10.72/4.32 13[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (fromEnum yu3) (numericEnumFrom $! fromEnum yu3 + fromInt (Pos (Succ Zero))) (not (compare (fromEnum yu3) (fromEnum GT) == GT)))",fontsize=16,color="black",shape="box"];13 -> 14[label="",style="solid", color="black", weight=3]; 10.72/4.32 14[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (fromEnum yu3) (numericEnumFrom $! fromEnum yu3 + fromInt (Pos (Succ Zero))) (not (primCmpInt (fromEnum yu3) (fromEnum GT) == GT)))",fontsize=16,color="burlywood",shape="box"];139[label="yu3/LT",fontsize=10,color="white",style="solid",shape="box"];14 -> 139[label="",style="solid", color="burlywood", weight=9]; 10.72/4.32 139 -> 15[label="",style="solid", color="burlywood", weight=3]; 10.72/4.32 140[label="yu3/EQ",fontsize=10,color="white",style="solid",shape="box"];14 -> 140[label="",style="solid", color="burlywood", weight=9]; 10.72/4.32 140 -> 16[label="",style="solid", color="burlywood", weight=3]; 10.72/4.32 141[label="yu3/GT",fontsize=10,color="white",style="solid",shape="box"];14 -> 141[label="",style="solid", color="burlywood", weight=9]; 10.72/4.32 141 -> 17[label="",style="solid", color="burlywood", weight=3]; 10.72/4.32 15[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (fromEnum LT) (numericEnumFrom $! fromEnum LT + fromInt (Pos (Succ Zero))) (not (primCmpInt (fromEnum LT) (fromEnum GT) == GT)))",fontsize=16,color="black",shape="box"];15 -> 18[label="",style="solid", color="black", weight=3]; 10.72/4.32 16[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (fromEnum EQ) (numericEnumFrom $! fromEnum EQ + fromInt (Pos (Succ Zero))) (not (primCmpInt (fromEnum EQ) (fromEnum GT) == GT)))",fontsize=16,color="black",shape="box"];16 -> 19[label="",style="solid", color="black", weight=3]; 10.72/4.32 17[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (fromEnum GT) (numericEnumFrom $! fromEnum GT + fromInt (Pos (Succ Zero))) (not (primCmpInt (fromEnum GT) (fromEnum GT) == GT)))",fontsize=16,color="black",shape="box"];17 -> 20[label="",style="solid", color="black", weight=3]; 10.72/4.32 18[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (Pos Zero) (numericEnumFrom $! Pos Zero + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos Zero) (fromEnum GT) == GT)))",fontsize=16,color="black",shape="box"];18 -> 21[label="",style="solid", color="black", weight=3]; 10.72/4.32 19[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (Pos (Succ Zero)) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (Succ Zero)) (fromEnum GT) == GT)))",fontsize=16,color="black",shape="box"];19 -> 22[label="",style="solid", color="black", weight=3]; 10.72/4.32 20[label="map toEnum (takeWhile1 (flip (<=) (fromEnum GT)) (Pos (Succ (Succ Zero))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (Succ (Succ Zero))) (fromEnum GT) == GT)))",fontsize=16,color="black",shape="box"];20 -> 23[label="",style="solid", color="black", weight=3]; 10.72/4.32 21[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos Zero) (numericEnumFrom $! Pos Zero + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos Zero) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];21 -> 24[label="",style="solid", color="black", weight=3]; 10.72/4.32 22[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ Zero)) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (Succ Zero)) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="triangle"];22 -> 25[label="",style="solid", color="black", weight=3]; 10.72/4.32 23[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (Succ (Succ Zero))) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];23 -> 26[label="",style="solid", color="black", weight=3]; 10.72/4.32 24[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos Zero) (numericEnumFrom $! Pos Zero + fromInt (Pos (Succ Zero))) (not (primCmpNat Zero (Succ (Succ Zero)) == GT)))",fontsize=16,color="black",shape="box"];24 -> 27[label="",style="solid", color="black", weight=3]; 10.72/4.32 25[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ Zero)) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))) (not (primCmpNat (Succ Zero) (Succ (Succ Zero)) == GT)))",fontsize=16,color="black",shape="box"];25 -> 28[label="",style="solid", color="black", weight=3]; 10.72/4.32 26[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (primCmpNat (Succ (Succ Zero)) (Succ (Succ Zero)) == GT)))",fontsize=16,color="black",shape="box"];26 -> 29[label="",style="solid", color="black", weight=3]; 10.72/4.32 27[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos Zero) (numericEnumFrom $! Pos Zero + fromInt (Pos (Succ Zero))) (not (LT == GT)))",fontsize=16,color="black",shape="box"];27 -> 30[label="",style="solid", color="black", weight=3]; 10.72/4.32 28[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ Zero)) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))) (not (primCmpNat Zero (Succ Zero) == GT)))",fontsize=16,color="black",shape="box"];28 -> 31[label="",style="solid", color="black", weight=3]; 10.72/4.32 29[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (primCmpNat (Succ Zero) (Succ Zero) == GT)))",fontsize=16,color="black",shape="box"];29 -> 32[label="",style="solid", color="black", weight=3]; 10.72/4.32 30[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos Zero) (numericEnumFrom $! Pos Zero + fromInt (Pos (Succ Zero))) (not False))",fontsize=16,color="black",shape="box"];30 -> 33[label="",style="solid", color="black", weight=3]; 10.72/4.32 31[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ Zero)) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))) (not (LT == GT)))",fontsize=16,color="black",shape="box"];31 -> 34[label="",style="solid", color="black", weight=3]; 10.72/4.32 32[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (primCmpNat Zero Zero == GT)))",fontsize=16,color="black",shape="triangle"];32 -> 35[label="",style="solid", color="black", weight=3]; 10.72/4.32 33[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos Zero) (numericEnumFrom $! Pos Zero + fromInt (Pos (Succ Zero))) True)",fontsize=16,color="black",shape="box"];33 -> 36[label="",style="solid", color="black", weight=3]; 10.72/4.32 34[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ Zero)) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))) (not False))",fontsize=16,color="black",shape="box"];34 -> 37[label="",style="solid", color="black", weight=3]; 10.72/4.32 35[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (EQ == GT)))",fontsize=16,color="black",shape="box"];35 -> 38[label="",style="solid", color="black", weight=3]; 10.72/4.32 36[label="map toEnum (Pos Zero : takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom $! Pos Zero + fromInt (Pos (Succ Zero))))",fontsize=16,color="black",shape="box"];36 -> 39[label="",style="solid", color="black", weight=3]; 10.72/4.32 37[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ Zero)) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))) True)",fontsize=16,color="black",shape="box"];37 -> 40[label="",style="solid", color="black", weight=3]; 10.72/4.32 38[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))) (not False))",fontsize=16,color="black",shape="box"];38 -> 41[label="",style="solid", color="black", weight=3]; 10.72/4.32 39[label="toEnum (Pos Zero) : map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom $! Pos Zero + fromInt (Pos (Succ Zero))))",fontsize=16,color="green",shape="box"];39 -> 42[label="",style="dashed", color="green", weight=3]; 10.72/4.32 39 -> 43[label="",style="dashed", color="green", weight=3]; 10.72/4.32 40[label="map toEnum (Pos (Succ Zero) : takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))))",fontsize=16,color="black",shape="box"];40 -> 44[label="",style="solid", color="black", weight=3]; 10.72/4.32 41[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))) True)",fontsize=16,color="black",shape="box"];41 -> 45[label="",style="solid", color="black", weight=3]; 10.72/4.32 42[label="toEnum (Pos Zero)",fontsize=16,color="black",shape="box"];42 -> 46[label="",style="solid", color="black", weight=3]; 10.72/4.32 43[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom $! Pos Zero + fromInt (Pos (Succ Zero))))",fontsize=16,color="black",shape="box"];43 -> 47[label="",style="solid", color="black", weight=3]; 10.72/4.32 44[label="toEnum (Pos (Succ Zero)) : map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))))",fontsize=16,color="green",shape="box"];44 -> 48[label="",style="dashed", color="green", weight=3]; 10.72/4.32 44 -> 49[label="",style="dashed", color="green", weight=3]; 10.72/4.32 45[label="map toEnum (Pos (Succ (Succ Zero)) : takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))))",fontsize=16,color="black",shape="box"];45 -> 50[label="",style="solid", color="black", weight=3]; 10.72/4.32 46[label="toEnum5 (Pos Zero)",fontsize=16,color="black",shape="box"];46 -> 51[label="",style="solid", color="black", weight=3]; 10.72/4.32 47[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (Pos Zero + fromInt (Pos (Succ Zero)) `seq` numericEnumFrom (Pos Zero + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];47 -> 52[label="",style="solid", color="black", weight=3]; 10.72/4.32 48[label="toEnum (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];48 -> 53[label="",style="solid", color="black", weight=3]; 10.72/4.32 49[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))))",fontsize=16,color="black",shape="box"];49 -> 54[label="",style="solid", color="black", weight=3]; 10.72/4.32 50[label="toEnum (Pos (Succ (Succ Zero))) : map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))))",fontsize=16,color="green",shape="box"];50 -> 55[label="",style="dashed", color="green", weight=3]; 10.72/4.32 50 -> 56[label="",style="dashed", color="green", weight=3]; 10.72/4.32 51[label="toEnum4 (Pos Zero == Pos Zero) (Pos Zero)",fontsize=16,color="black",shape="box"];51 -> 57[label="",style="solid", color="black", weight=3]; 10.72/4.32 52[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (Pos Zero + fromInt (Pos (Succ Zero)))) (numericEnumFrom (Pos Zero + fromInt (Pos (Succ Zero))))))",fontsize=16,color="black",shape="box"];52 -> 58[label="",style="solid", color="black", weight=3]; 10.72/4.32 53[label="toEnum5 (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];53 -> 59[label="",style="solid", color="black", weight=3]; 10.72/4.32 54[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ Zero) + fromInt (Pos (Succ Zero)) `seq` numericEnumFrom (Pos (Succ Zero) + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];54 -> 60[label="",style="solid", color="black", weight=3]; 10.72/4.32 55[label="toEnum (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];55 -> 61[label="",style="solid", color="black", weight=3]; 10.72/4.32 56[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))))",fontsize=16,color="black",shape="box"];56 -> 62[label="",style="solid", color="black", weight=3]; 10.72/4.32 57[label="toEnum4 (primEqInt (Pos Zero) (Pos Zero)) (Pos Zero)",fontsize=16,color="black",shape="box"];57 -> 63[label="",style="solid", color="black", weight=3]; 10.72/4.32 58[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (primPlusInt (Pos Zero) (fromInt (Pos (Succ Zero))))) (numericEnumFrom (primPlusInt (Pos Zero) (fromInt (Pos (Succ Zero)))))))",fontsize=16,color="black",shape="box"];58 -> 64[label="",style="solid", color="black", weight=3]; 10.72/4.32 59[label="toEnum4 (Pos (Succ Zero) == Pos Zero) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];59 -> 65[label="",style="solid", color="black", weight=3]; 10.72/4.32 60[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (Pos (Succ Zero) + fromInt (Pos (Succ Zero)))) (numericEnumFrom (Pos (Succ Zero) + fromInt (Pos (Succ Zero))))))",fontsize=16,color="black",shape="box"];60 -> 66[label="",style="solid", color="black", weight=3]; 10.72/4.32 61[label="toEnum5 (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];61 -> 67[label="",style="solid", color="black", weight=3]; 10.72/4.32 62[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero)) `seq` numericEnumFrom (Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];62 -> 68[label="",style="solid", color="black", weight=3]; 10.72/4.32 63[label="toEnum4 True (Pos Zero)",fontsize=16,color="black",shape="box"];63 -> 69[label="",style="solid", color="black", weight=3]; 10.72/4.32 64[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (primPlusInt (Pos Zero) (Pos (Succ Zero)))) (numericEnumFrom (primPlusInt (Pos Zero) (Pos (Succ Zero))))))",fontsize=16,color="black",shape="box"];64 -> 70[label="",style="solid", color="black", weight=3]; 10.72/4.32 65[label="toEnum4 (primEqInt (Pos (Succ Zero)) (Pos Zero)) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];65 -> 71[label="",style="solid", color="black", weight=3]; 10.72/4.32 66[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (primPlusInt (Pos (Succ Zero)) (fromInt (Pos (Succ Zero))))) (numericEnumFrom (primPlusInt (Pos (Succ Zero)) (fromInt (Pos (Succ Zero)))))))",fontsize=16,color="black",shape="box"];66 -> 72[label="",style="solid", color="black", weight=3]; 10.72/4.32 67[label="toEnum4 (Pos (Succ (Succ Zero)) == Pos Zero) (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];67 -> 73[label="",style="solid", color="black", weight=3]; 10.72/4.32 68[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero)))) (numericEnumFrom (Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))))))",fontsize=16,color="black",shape="box"];68 -> 74[label="",style="solid", color="black", weight=3]; 10.72/4.32 69[label="LT",fontsize=16,color="green",shape="box"];70[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (Pos (primPlusNat Zero (Succ Zero)))) (numericEnumFrom (Pos (primPlusNat Zero (Succ Zero))))))",fontsize=16,color="black",shape="box"];70 -> 75[label="",style="solid", color="black", weight=3]; 10.72/4.32 71[label="toEnum4 False (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];71 -> 76[label="",style="solid", color="black", weight=3]; 10.72/4.32 72[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (primPlusInt (Pos (Succ Zero)) (Pos (Succ Zero)))) (numericEnumFrom (primPlusInt (Pos (Succ Zero)) (Pos (Succ Zero))))))",fontsize=16,color="black",shape="box"];72 -> 77[label="",style="solid", color="black", weight=3]; 10.72/4.32 73[label="toEnum4 (primEqInt (Pos (Succ (Succ Zero))) (Pos Zero)) (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];73 -> 78[label="",style="solid", color="black", weight=3]; 10.72/4.32 74[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (primPlusInt (Pos (Succ (Succ Zero))) (fromInt (Pos (Succ Zero))))) (numericEnumFrom (primPlusInt (Pos (Succ (Succ Zero))) (fromInt (Pos (Succ Zero)))))))",fontsize=16,color="black",shape="box"];74 -> 79[label="",style="solid", color="black", weight=3]; 10.72/4.32 75[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom (Pos (primPlusNat Zero (Succ Zero)))))",fontsize=16,color="black",shape="box"];75 -> 80[label="",style="solid", color="black", weight=3]; 10.72/4.32 76[label="toEnum3 (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];76 -> 81[label="",style="solid", color="black", weight=3]; 10.72/4.32 77[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (Pos (primPlusNat (Succ Zero) (Succ Zero)))) (numericEnumFrom (Pos (primPlusNat (Succ Zero) (Succ Zero))))))",fontsize=16,color="black",shape="box"];77 -> 82[label="",style="solid", color="black", weight=3]; 10.72/4.32 78[label="toEnum4 False (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];78 -> 83[label="",style="solid", color="black", weight=3]; 10.72/4.32 79[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (primPlusInt (Pos (Succ (Succ Zero))) (Pos (Succ Zero)))) (numericEnumFrom (primPlusInt (Pos (Succ (Succ Zero))) (Pos (Succ Zero))))))",fontsize=16,color="black",shape="box"];79 -> 84[label="",style="solid", color="black", weight=3]; 10.72/4.32 80[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat Zero (Succ Zero)) : (numericEnumFrom $! Pos (primPlusNat Zero (Succ Zero)) + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];80 -> 85[label="",style="solid", color="black", weight=3]; 10.72/4.32 81[label="toEnum2 (Pos (Succ Zero) == Pos (Succ Zero)) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];81 -> 86[label="",style="solid", color="black", weight=3]; 10.72/4.32 82[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom (Pos (primPlusNat (Succ Zero) (Succ Zero)))))",fontsize=16,color="black",shape="box"];82 -> 87[label="",style="solid", color="black", weight=3]; 10.72/4.32 83[label="toEnum3 (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];83 -> 88[label="",style="solid", color="black", weight=3]; 10.72/4.32 84[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (enforceWHNF (WHNF (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)))) (numericEnumFrom (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero))))))",fontsize=16,color="black",shape="box"];84 -> 89[label="",style="solid", color="black", weight=3]; 10.72/4.32 85[label="map toEnum (takeWhile2 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat Zero (Succ Zero)) : (numericEnumFrom $! Pos (primPlusNat Zero (Succ Zero)) + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];85 -> 90[label="",style="solid", color="black", weight=3]; 10.72/4.32 86[label="toEnum2 (primEqInt (Pos (Succ Zero)) (Pos (Succ Zero))) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];86 -> 91[label="",style="solid", color="black", weight=3]; 10.72/4.32 87[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ Zero) (Succ Zero)) : (numericEnumFrom $! Pos (primPlusNat (Succ Zero) (Succ Zero)) + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];87 -> 92[label="",style="solid", color="black", weight=3]; 10.72/4.32 88[label="toEnum2 (Pos (Succ (Succ Zero)) == Pos (Succ Zero)) (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];88 -> 93[label="",style="solid", color="black", weight=3]; 10.72/4.32 89[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (numericEnumFrom (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)))))",fontsize=16,color="black",shape="box"];89 -> 94[label="",style="solid", color="black", weight=3]; 10.72/4.32 90[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat Zero (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat Zero (Succ Zero)) + fromInt (Pos (Succ Zero))) (flip (<=) (Pos (Succ (Succ Zero))) (Pos (primPlusNat Zero (Succ Zero)))))",fontsize=16,color="black",shape="box"];90 -> 95[label="",style="solid", color="black", weight=3]; 10.72/4.32 91[label="toEnum2 (primEqNat Zero Zero) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];91 -> 96[label="",style="solid", color="black", weight=3]; 10.72/4.32 92[label="map toEnum (takeWhile2 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ Zero) (Succ Zero)) : (numericEnumFrom $! Pos (primPlusNat (Succ Zero) (Succ Zero)) + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];92 -> 97[label="",style="solid", color="black", weight=3]; 10.72/4.32 93[label="toEnum2 (primEqInt (Pos (Succ (Succ Zero))) (Pos (Succ Zero))) (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];93 -> 98[label="",style="solid", color="black", weight=3]; 10.72/4.32 94[label="map toEnum (takeWhile (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) : (numericEnumFrom $! Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];94 -> 99[label="",style="solid", color="black", weight=3]; 10.72/4.32 95[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat Zero (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat Zero (Succ Zero)) + fromInt (Pos (Succ Zero))) ((<=) Pos (primPlusNat Zero (Succ Zero)) Pos (Succ (Succ Zero))))",fontsize=16,color="black",shape="box"];95 -> 100[label="",style="solid", color="black", weight=3]; 10.72/4.32 96[label="toEnum2 True (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];96 -> 101[label="",style="solid", color="black", weight=3]; 10.72/4.32 97[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ Zero) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ Zero) (Succ Zero)) + fromInt (Pos (Succ Zero))) (flip (<=) (Pos (Succ (Succ Zero))) (Pos (primPlusNat (Succ Zero) (Succ Zero)))))",fontsize=16,color="black",shape="box"];97 -> 102[label="",style="solid", color="black", weight=3]; 10.72/4.32 98[label="toEnum2 (primEqNat (Succ Zero) Zero) (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];98 -> 103[label="",style="solid", color="black", weight=3]; 10.72/4.32 99[label="map toEnum (takeWhile2 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) : (numericEnumFrom $! Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) + fromInt (Pos (Succ Zero)))))",fontsize=16,color="black",shape="box"];99 -> 104[label="",style="solid", color="black", weight=3]; 10.72/4.32 100[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat Zero (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat Zero (Succ Zero)) + fromInt (Pos (Succ Zero))) (compare (Pos (primPlusNat Zero (Succ Zero))) (Pos (Succ (Succ Zero))) /= GT))",fontsize=16,color="black",shape="box"];100 -> 105[label="",style="solid", color="black", weight=3]; 10.72/4.32 101[label="EQ",fontsize=16,color="green",shape="box"];102[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ Zero) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ Zero) (Succ Zero)) + fromInt (Pos (Succ Zero))) ((<=) Pos (primPlusNat (Succ Zero) (Succ Zero)) Pos (Succ (Succ Zero))))",fontsize=16,color="black",shape="box"];102 -> 106[label="",style="solid", color="black", weight=3]; 10.72/4.32 103[label="toEnum2 False (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];103 -> 107[label="",style="solid", color="black", weight=3]; 10.72/4.32 104[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) + fromInt (Pos (Succ Zero))) (flip (<=) (Pos (Succ (Succ Zero))) (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)))))",fontsize=16,color="black",shape="box"];104 -> 108[label="",style="solid", color="black", weight=3]; 10.72/4.32 105[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat Zero (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat Zero (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (compare (Pos (primPlusNat Zero (Succ Zero))) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];105 -> 109[label="",style="solid", color="black", weight=3]; 10.72/4.32 106[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ Zero) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ Zero) (Succ Zero)) + fromInt (Pos (Succ Zero))) (compare (Pos (primPlusNat (Succ Zero) (Succ Zero))) (Pos (Succ (Succ Zero))) /= GT))",fontsize=16,color="black",shape="box"];106 -> 110[label="",style="solid", color="black", weight=3]; 10.72/4.32 107[label="toEnum1 (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];107 -> 111[label="",style="solid", color="black", weight=3]; 10.72/4.32 108[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) + fromInt (Pos (Succ Zero))) ((<=) Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) Pos (Succ (Succ Zero))))",fontsize=16,color="black",shape="box"];108 -> 112[label="",style="solid", color="black", weight=3]; 10.72/4.32 109[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat Zero (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat Zero (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (primPlusNat Zero (Succ Zero))) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];109 -> 113[label="",style="solid", color="black", weight=3]; 10.72/4.32 110[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ Zero) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ Zero) (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (compare (Pos (primPlusNat (Succ Zero) (Succ Zero))) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];110 -> 114[label="",style="solid", color="black", weight=3]; 10.72/4.32 111[label="toEnum0 (Pos (Succ (Succ Zero)) == Pos (Succ (Succ Zero))) (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];111 -> 115[label="",style="solid", color="black", weight=3]; 10.72/4.32 112[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) + fromInt (Pos (Succ Zero))) (compare (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero))) (Pos (Succ (Succ Zero))) /= GT))",fontsize=16,color="black",shape="box"];112 -> 116[label="",style="solid", color="black", weight=3]; 10.72/4.32 113 -> 22[label="",style="dashed", color="red", weight=0]; 10.72/4.32 113[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ Zero)) (numericEnumFrom $! Pos (Succ Zero) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (Succ Zero)) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="magenta"];114[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ Zero) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ Zero) (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (primPlusNat (Succ Zero) (Succ Zero))) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];114 -> 117[label="",style="solid", color="black", weight=3]; 10.72/4.32 115[label="toEnum0 (primEqInt (Pos (Succ (Succ Zero))) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];115 -> 118[label="",style="solid", color="black", weight=3]; 10.72/4.32 116[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (compare (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero))) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];116 -> 119[label="",style="solid", color="black", weight=3]; 10.72/4.32 117[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (primPlusNat Zero Zero)))) (numericEnumFrom $! Pos (Succ (Succ (primPlusNat Zero Zero))) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (Succ (Succ (primPlusNat Zero Zero)))) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];117 -> 120[label="",style="solid", color="black", weight=3]; 10.72/4.32 118[label="toEnum0 (primEqNat (Succ Zero) (Succ Zero)) (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];118 -> 121[label="",style="solid", color="black", weight=3]; 10.72/4.32 119[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero))) (numericEnumFrom $! Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (primPlusNat (Succ (Succ Zero)) (Succ Zero))) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];119 -> 122[label="",style="solid", color="black", weight=3]; 10.72/4.32 120[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (primPlusNat Zero Zero)))) (numericEnumFrom $! Pos (Succ (Succ (primPlusNat Zero Zero))) + fromInt (Pos (Succ Zero))) (not (primCmpNat (Succ (Succ (primPlusNat Zero Zero))) (Succ (Succ Zero)) == GT)))",fontsize=16,color="black",shape="box"];120 -> 123[label="",style="solid", color="black", weight=3]; 10.72/4.32 121[label="toEnum0 (primEqNat Zero Zero) (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];121 -> 124[label="",style="solid", color="black", weight=3]; 10.72/4.32 122[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (primPlusNat (Succ Zero) Zero)))) (numericEnumFrom $! Pos (Succ (Succ (primPlusNat (Succ Zero) Zero))) + fromInt (Pos (Succ Zero))) (not (primCmpInt (Pos (Succ (Succ (primPlusNat (Succ Zero) Zero)))) (Pos (Succ (Succ Zero))) == GT)))",fontsize=16,color="black",shape="box"];122 -> 125[label="",style="solid", color="black", weight=3]; 10.72/4.32 123[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (primPlusNat Zero Zero)))) (numericEnumFrom $! Pos (Succ (Succ (primPlusNat Zero Zero))) + fromInt (Pos (Succ Zero))) (not (primCmpNat (Succ (primPlusNat Zero Zero)) (Succ Zero) == GT)))",fontsize=16,color="black",shape="box"];123 -> 126[label="",style="solid", color="black", weight=3]; 10.72/4.32 124[label="toEnum0 True (Pos (Succ (Succ Zero)))",fontsize=16,color="black",shape="box"];124 -> 127[label="",style="solid", color="black", weight=3]; 10.72/4.32 125[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (primPlusNat (Succ Zero) Zero)))) (numericEnumFrom $! Pos (Succ (Succ (primPlusNat (Succ Zero) Zero))) + fromInt (Pos (Succ Zero))) (not (primCmpNat (Succ (Succ (primPlusNat (Succ Zero) Zero))) (Succ (Succ Zero)) == GT)))",fontsize=16,color="black",shape="box"];125 -> 128[label="",style="solid", color="black", weight=3]; 10.72/4.32 126[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (primPlusNat Zero Zero)))) (numericEnumFrom $! Pos (Succ (Succ (primPlusNat Zero Zero))) + fromInt (Pos (Succ Zero))) (not (primCmpNat (primPlusNat Zero Zero) Zero == GT)))",fontsize=16,color="black",shape="box"];126 -> 129[label="",style="solid", color="black", weight=3]; 10.72/4.32 127[label="GT",fontsize=16,color="green",shape="box"];128[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (primPlusNat (Succ Zero) Zero)))) (numericEnumFrom $! Pos (Succ (Succ (primPlusNat (Succ Zero) Zero))) + fromInt (Pos (Succ Zero))) (not (primCmpNat (Succ (primPlusNat (Succ Zero) Zero)) (Succ Zero) == GT)))",fontsize=16,color="black",shape="box"];128 -> 130[label="",style="solid", color="black", weight=3]; 10.72/4.32 129 -> 32[label="",style="dashed", color="red", weight=0]; 10.72/4.32 129[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ Zero))) (numericEnumFrom $! Pos (Succ (Succ Zero)) + fromInt (Pos (Succ Zero))) (not (primCmpNat Zero Zero == GT)))",fontsize=16,color="magenta"];130[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (primPlusNat (Succ Zero) Zero)))) (numericEnumFrom $! Pos (Succ (Succ (primPlusNat (Succ Zero) Zero))) + fromInt (Pos (Succ Zero))) (not (primCmpNat (primPlusNat (Succ Zero) Zero) Zero == GT)))",fontsize=16,color="black",shape="box"];130 -> 131[label="",style="solid", color="black", weight=3]; 10.72/4.32 131[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ (Succ (Succ Zero))) + fromInt (Pos (Succ Zero))) (not (primCmpNat (Succ Zero) Zero == GT)))",fontsize=16,color="black",shape="box"];131 -> 132[label="",style="solid", color="black", weight=3]; 10.72/4.32 132[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ (Succ (Succ Zero))) + fromInt (Pos (Succ Zero))) (not (GT == GT)))",fontsize=16,color="black",shape="box"];132 -> 133[label="",style="solid", color="black", weight=3]; 10.72/4.32 133[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ (Succ (Succ Zero))) + fromInt (Pos (Succ Zero))) (not True))",fontsize=16,color="black",shape="box"];133 -> 134[label="",style="solid", color="black", weight=3]; 10.72/4.32 134[label="map toEnum (takeWhile1 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ (Succ (Succ Zero))) + fromInt (Pos (Succ Zero))) False)",fontsize=16,color="black",shape="box"];134 -> 135[label="",style="solid", color="black", weight=3]; 10.72/4.32 135[label="map toEnum (takeWhile0 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ (Succ (Succ Zero))) + fromInt (Pos (Succ Zero))) otherwise)",fontsize=16,color="black",shape="box"];135 -> 136[label="",style="solid", color="black", weight=3]; 10.72/4.32 136[label="map toEnum (takeWhile0 (flip (<=) (Pos (Succ (Succ Zero)))) (Pos (Succ (Succ (Succ Zero)))) (numericEnumFrom $! Pos (Succ (Succ (Succ Zero))) + fromInt (Pos (Succ Zero))) True)",fontsize=16,color="black",shape="box"];136 -> 137[label="",style="solid", color="black", weight=3]; 10.72/4.32 137[label="map toEnum []",fontsize=16,color="black",shape="box"];137 -> 138[label="",style="solid", color="black", weight=3]; 10.72/4.32 138[label="[]",fontsize=16,color="green",shape="box"];} 10.72/4.32 10.72/4.32 ---------------------------------------- 10.72/4.32 10.72/4.32 (8) 10.72/4.32 YES 10.75/4.37 EOF