10.31/4.20	YES
12.57/4.86	proof of /export/starexec/sandbox/benchmark/theBenchmark.hs
12.57/4.86	# AProVE Commit ID: 48fb2092695e11cc9f56e44b17a92a5f88ffb256 marcel 20180622 unpublished dirty
12.57/4.86	
12.57/4.86	
12.57/4.86	H-Termination with start terms of the given HASKELL could be proven:
12.57/4.86	
12.57/4.86	(0) HASKELL
12.57/4.86	(1) BR [EQUIVALENT, 0 ms]
12.57/4.86	(2) HASKELL
12.57/4.86	(3) COR [EQUIVALENT, 0 ms]
12.57/4.86	(4) HASKELL
12.57/4.86	(5) Narrow [SOUND, 0 ms]
12.57/4.86	(6) AND
12.57/4.86	    (7) QDP
12.57/4.86	        (8) QDPSizeChangeProof [EQUIVALENT, 0 ms]
12.57/4.86	        (9) YES
12.57/4.86	    (10) QDP
12.57/4.86	        (11) QDPSizeChangeProof [EQUIVALENT, 0 ms]
12.57/4.86	        (12) YES
12.57/4.86	    (13) QDP
12.57/4.86	        (14) DependencyGraphProof [EQUIVALENT, 0 ms]
12.57/4.86	        (15) QDP
12.57/4.86	        (16) QDPSizeChangeProof [EQUIVALENT, 0 ms]
12.57/4.86	        (17) YES
12.57/4.86	
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(0)
12.57/4.86	Obligation:
12.57/4.86	mainModule Main 
12.57/4.86	module Main where {
12.57/4.86	import qualified Prelude;
12.57/4.86	data Double = Double MyInt MyInt ;
12.57/4.86	
12.57/4.86	data Float = Float MyInt MyInt ;
12.57/4.86	
12.57/4.86	data Integer = Integer MyInt ;
12.57/4.86	
12.57/4.86	data MyBool = MyTrue  | MyFalse ;
12.57/4.86	
12.57/4.86	data MyInt = Pos Main.Nat  | Neg Main.Nat ;
12.57/4.86	
12.57/4.86	data Main.Nat = Succ Main.Nat  | Zero ;
12.57/4.86	
12.57/4.86	data Ordering = LT  | EQ  | GT ;
12.57/4.86	
12.57/4.86	compareMyInt :: MyInt  ->  MyInt  ->  Ordering;
12.57/4.86	compareMyInt = primCmpInt;
12.57/4.86	
12.57/4.86	doubleToFloat :: Double  ->  Float;
12.57/4.86	doubleToFloat (Double x y) = Float x y;
12.57/4.86	
12.57/4.86	encodeFloatFloat :: Integer  ->  MyInt  ->  Float;
12.57/4.86	encodeFloatFloat = primFloatEncode;
12.57/4.86	
12.57/4.86	esEsMyInt :: MyInt  ->  MyInt  ->  MyBool;
12.57/4.86	esEsMyInt = primEqInt;
12.57/4.86	
12.57/4.86	esEsOrdering :: Ordering  ->  Ordering  ->  MyBool;
12.57/4.86	esEsOrdering LT LT = MyTrue;
12.57/4.86	esEsOrdering LT EQ = MyFalse;
12.57/4.86	esEsOrdering LT GT = MyFalse;
12.57/4.86	esEsOrdering EQ LT = MyFalse;
12.57/4.86	esEsOrdering EQ EQ = MyTrue;
12.57/4.86	esEsOrdering EQ GT = MyFalse;
12.57/4.86	esEsOrdering GT LT = MyFalse;
12.57/4.86	esEsOrdering GT EQ = MyFalse;
12.57/4.86	esEsOrdering GT GT = MyTrue;
12.57/4.86	
12.57/4.86	fromDoubleFloat :: Double  ->  Float;
12.57/4.86	fromDoubleFloat = doubleToFloat;
12.57/4.86	
12.57/4.86	fromIntFloat :: MyInt  ->  Float;
12.57/4.86	fromIntFloat = primIntToFloat;
12.57/4.86	
12.57/4.86	fromIntegerFloat :: Integer  ->  Float;
12.57/4.86	fromIntegerFloat = primIntegerToFloat;
12.57/4.86	
12.57/4.86	fsEsOrdering :: Ordering  ->  Ordering  ->  MyBool;
12.57/4.86	fsEsOrdering x y = not (esEsOrdering x y);
12.57/4.86	
12.57/4.86	fsFloat :: Float  ->  Float  ->  Float;
12.57/4.86	fsFloat = primDivFloat;
12.57/4.86	
12.57/4.86	gtEsMyInt :: MyInt  ->  MyInt  ->  MyBool;
12.57/4.86	gtEsMyInt x y = fsEsOrdering (compareMyInt x y) LT;
12.57/4.86	
12.57/4.86	msMyInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	msMyInt = primMinusInt;
12.57/4.86	
12.57/4.86	negateMyInt :: MyInt  ->  MyInt;
12.57/4.86	negateMyInt = primNegInt;
12.57/4.86	
12.57/4.86	not :: MyBool  ->  MyBool;
12.57/4.86	not MyTrue = MyFalse;
12.57/4.86	not MyFalse = MyTrue;
12.57/4.86	
12.57/4.86	primCmpInt :: MyInt  ->  MyInt  ->  Ordering;
12.57/4.86	primCmpInt (Main.Pos Main.Zero) (Main.Pos Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Pos Main.Zero) (Main.Neg Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Neg Main.Zero) (Main.Pos Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Neg Main.Zero) (Main.Neg Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Pos x) (Main.Pos y) = primCmpNat x y;
12.57/4.86	primCmpInt (Main.Pos x) (Main.Neg y) = GT;
12.57/4.86	primCmpInt (Main.Neg x) (Main.Pos y) = LT;
12.57/4.86	primCmpInt (Main.Neg x) (Main.Neg y) = primCmpNat y x;
12.57/4.86	
12.57/4.86	primCmpNat :: Main.Nat  ->  Main.Nat  ->  Ordering;
12.57/4.86	primCmpNat Main.Zero Main.Zero = EQ;
12.57/4.86	primCmpNat Main.Zero (Main.Succ y) = LT;
12.57/4.86	primCmpNat (Main.Succ x) Main.Zero = GT;
12.57/4.86	primCmpNat (Main.Succ x) (Main.Succ y) = primCmpNat x y;
12.57/4.86	
12.57/4.86	primDivFloat :: Float  ->  Float  ->  Float;
12.57/4.86	primDivFloat (Float x1 x2) (Float y1 y2) = Float (srMyInt x1 y2) (srMyInt x2 y1);
12.57/4.86	
12.57/4.86	primEqInt :: MyInt  ->  MyInt  ->  MyBool;
12.57/4.86	primEqInt (Main.Pos (Main.Succ x)) (Main.Pos (Main.Succ y)) = primEqNat x y;
12.57/4.86	primEqInt (Main.Neg (Main.Succ x)) (Main.Neg (Main.Succ y)) = primEqNat x y;
12.57/4.86	primEqInt (Main.Pos Main.Zero) (Main.Neg Main.Zero) = MyTrue;
12.57/4.86	primEqInt (Main.Neg Main.Zero) (Main.Pos Main.Zero) = MyTrue;
12.57/4.86	primEqInt (Main.Neg Main.Zero) (Main.Neg Main.Zero) = MyTrue;
12.57/4.86	primEqInt (Main.Pos Main.Zero) (Main.Pos Main.Zero) = MyTrue;
12.57/4.86	primEqInt vx vy = MyFalse;
12.57/4.86	
12.57/4.86	primEqNat :: Main.Nat  ->  Main.Nat  ->  MyBool;
12.57/4.86	primEqNat Main.Zero Main.Zero = MyTrue;
12.57/4.86	primEqNat Main.Zero (Main.Succ y) = MyFalse;
12.57/4.86	primEqNat (Main.Succ x) Main.Zero = MyFalse;
12.57/4.86	primEqNat (Main.Succ x) (Main.Succ y) = primEqNat x y;
12.57/4.86	
12.57/4.86	primFloatEncode :: Integer  ->  MyInt  ->  Float;
12.57/4.86	primFloatEncode x y = srFloat (fromIntegerFloat x) (primFloatEncodePower (Main.Pos (Main.Succ (Main.Succ Main.Zero))) y);
12.57/4.86	
12.57/4.86	primFloatEncodePower :: MyInt  ->  MyInt  ->  Float;
12.57/4.86	primFloatEncodePower vv wy = primFloatEncodePower4 vv wy;
12.57/4.86	primFloatEncodePower x vw = primFloatEncodePower2 x vw;
12.57/4.86	primFloatEncodePower x y = primFloatEncodePower0 x y;
12.57/4.86	
12.57/4.86	primFloatEncodePower0 x y = fsFloat (fromDoubleFloat (Double (Main.Pos (Main.Succ Main.Zero)) (Main.Pos (Main.Succ Main.Zero)))) (primFloatEncodePower x (negateMyInt y));
12.57/4.86	
12.57/4.86	primFloatEncodePower1 MyTrue x vw = srFloat (fromIntFloat x) (primFloatEncodePower x (msMyInt vw (Main.Pos (Main.Succ Main.Zero))));
12.57/4.86	primFloatEncodePower1 vz wu wv = primFloatEncodePower0 wu wv;
12.57/4.86	
12.57/4.86	primFloatEncodePower2 x vw = primFloatEncodePower1 (gtEsMyInt vw (Main.Pos (Main.Succ Main.Zero))) x vw;
12.57/4.86	primFloatEncodePower2 ww wx = primFloatEncodePower0 ww wx;
12.57/4.86	
12.57/4.86	primFloatEncodePower3 MyTrue vv wy = fromDoubleFloat (Double (Main.Pos (Main.Succ Main.Zero)) (Main.Pos (Main.Succ Main.Zero)));
12.57/4.86	primFloatEncodePower3 wz xu xv = primFloatEncodePower2 xu xv;
12.57/4.86	
12.57/4.86	primFloatEncodePower4 vv wy = primFloatEncodePower3 (esEsMyInt wy (Main.Pos Main.Zero)) vv wy;
12.57/4.86	primFloatEncodePower4 xw xx = primFloatEncodePower2 xw xx;
12.57/4.86	
12.57/4.86	primIntToFloat :: MyInt  ->  Float;
12.57/4.86	primIntToFloat x = Float x (Main.Pos (Main.Succ Main.Zero));
12.57/4.86	
12.57/4.86	primIntegerToFloat :: Integer  ->  Float;
12.57/4.86	primIntegerToFloat (Integer x) = primIntToFloat x;
12.57/4.86	
12.57/4.86	primMinusInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	primMinusInt (Main.Pos x) (Main.Neg y) = Main.Pos (primPlusNat x y);
12.57/4.86	primMinusInt (Main.Neg x) (Main.Pos y) = Main.Neg (primPlusNat x y);
12.57/4.86	primMinusInt (Main.Neg x) (Main.Neg y) = primMinusNat y x;
12.57/4.86	primMinusInt (Main.Pos x) (Main.Pos y) = primMinusNat x y;
12.57/4.86	
12.57/4.86	primMinusNat :: Main.Nat  ->  Main.Nat  ->  MyInt;
12.57/4.86	primMinusNat Main.Zero Main.Zero = Main.Pos Main.Zero;
12.57/4.86	primMinusNat Main.Zero (Main.Succ y) = Main.Neg (Main.Succ y);
12.57/4.86	primMinusNat (Main.Succ x) Main.Zero = Main.Pos (Main.Succ x);
12.57/4.86	primMinusNat (Main.Succ x) (Main.Succ y) = primMinusNat x y;
12.57/4.86	
12.57/4.86	primMulFloat :: Float  ->  Float  ->  Float;
12.57/4.86	primMulFloat (Float x1 x2) (Float y1 y2) = Float (srMyInt x1 y1) (srMyInt x2 y2);
12.57/4.86	
12.57/4.86	primMulInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	primMulInt (Main.Pos x) (Main.Pos y) = Main.Pos (primMulNat x y);
12.57/4.86	primMulInt (Main.Pos x) (Main.Neg y) = Main.Neg (primMulNat x y);
12.57/4.86	primMulInt (Main.Neg x) (Main.Pos y) = Main.Neg (primMulNat x y);
12.57/4.86	primMulInt (Main.Neg x) (Main.Neg y) = Main.Pos (primMulNat x y);
12.57/4.86	
12.57/4.86	primMulNat :: Main.Nat  ->  Main.Nat  ->  Main.Nat;
12.57/4.86	primMulNat Main.Zero Main.Zero = Main.Zero;
12.57/4.86	primMulNat Main.Zero (Main.Succ y) = Main.Zero;
12.57/4.86	primMulNat (Main.Succ x) Main.Zero = Main.Zero;
12.57/4.86	primMulNat (Main.Succ x) (Main.Succ y) = primPlusNat (primMulNat x (Main.Succ y)) (Main.Succ y);
12.57/4.86	
12.57/4.86	primNegInt :: MyInt  ->  MyInt;
12.57/4.86	primNegInt (Main.Pos x) = Main.Neg x;
12.57/4.86	primNegInt (Main.Neg x) = Main.Pos x;
12.57/4.86	
12.57/4.86	primPlusNat :: Main.Nat  ->  Main.Nat  ->  Main.Nat;
12.57/4.86	primPlusNat Main.Zero Main.Zero = Main.Zero;
12.57/4.86	primPlusNat Main.Zero (Main.Succ y) = Main.Succ y;
12.57/4.86	primPlusNat (Main.Succ x) Main.Zero = Main.Succ x;
12.57/4.86	primPlusNat (Main.Succ x) (Main.Succ y) = Main.Succ (Main.Succ (primPlusNat x y));
12.57/4.86	
12.57/4.86	srFloat :: Float  ->  Float  ->  Float;
12.57/4.86	srFloat = primMulFloat;
12.57/4.86	
12.57/4.86	srMyInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	srMyInt = primMulInt;
12.57/4.86	
12.57/4.86	}
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(1) BR (EQUIVALENT)
12.57/4.86	Replaced joker patterns by fresh variables and removed binding patterns.
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(2)
12.57/4.86	Obligation:
12.57/4.86	mainModule Main 
12.57/4.86	module Main where {
12.57/4.86	import qualified Prelude;
12.57/4.86	data Double = Double MyInt MyInt ;
12.57/4.86	
12.57/4.86	data Float = Float MyInt MyInt ;
12.57/4.86	
12.57/4.86	data Integer = Integer MyInt ;
12.57/4.86	
12.57/4.86	data MyBool = MyTrue  | MyFalse ;
12.57/4.86	
12.57/4.86	data MyInt = Pos Main.Nat  | Neg Main.Nat ;
12.57/4.86	
12.57/4.86	data Main.Nat = Succ Main.Nat  | Zero ;
12.57/4.86	
12.57/4.86	data Ordering = LT  | EQ  | GT ;
12.57/4.86	
12.57/4.86	compareMyInt :: MyInt  ->  MyInt  ->  Ordering;
12.57/4.86	compareMyInt = primCmpInt;
12.57/4.86	
12.57/4.86	doubleToFloat :: Double  ->  Float;
12.57/4.86	doubleToFloat (Double x y) = Float x y;
12.57/4.86	
12.57/4.86	encodeFloatFloat :: Integer  ->  MyInt  ->  Float;
12.57/4.86	encodeFloatFloat = primFloatEncode;
12.57/4.86	
12.57/4.86	esEsMyInt :: MyInt  ->  MyInt  ->  MyBool;
12.57/4.86	esEsMyInt = primEqInt;
12.57/4.86	
12.57/4.86	esEsOrdering :: Ordering  ->  Ordering  ->  MyBool;
12.57/4.86	esEsOrdering LT LT = MyTrue;
12.57/4.86	esEsOrdering LT EQ = MyFalse;
12.57/4.86	esEsOrdering LT GT = MyFalse;
12.57/4.86	esEsOrdering EQ LT = MyFalse;
12.57/4.86	esEsOrdering EQ EQ = MyTrue;
12.57/4.86	esEsOrdering EQ GT = MyFalse;
12.57/4.86	esEsOrdering GT LT = MyFalse;
12.57/4.86	esEsOrdering GT EQ = MyFalse;
12.57/4.86	esEsOrdering GT GT = MyTrue;
12.57/4.86	
12.57/4.86	fromDoubleFloat :: Double  ->  Float;
12.57/4.86	fromDoubleFloat = doubleToFloat;
12.57/4.86	
12.57/4.86	fromIntFloat :: MyInt  ->  Float;
12.57/4.86	fromIntFloat = primIntToFloat;
12.57/4.86	
12.57/4.86	fromIntegerFloat :: Integer  ->  Float;
12.57/4.86	fromIntegerFloat = primIntegerToFloat;
12.57/4.86	
12.57/4.86	fsEsOrdering :: Ordering  ->  Ordering  ->  MyBool;
12.57/4.86	fsEsOrdering x y = not (esEsOrdering x y);
12.57/4.86	
12.57/4.86	fsFloat :: Float  ->  Float  ->  Float;
12.57/4.86	fsFloat = primDivFloat;
12.57/4.86	
12.57/4.86	gtEsMyInt :: MyInt  ->  MyInt  ->  MyBool;
12.57/4.86	gtEsMyInt x y = fsEsOrdering (compareMyInt x y) LT;
12.57/4.86	
12.57/4.86	msMyInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	msMyInt = primMinusInt;
12.57/4.86	
12.57/4.86	negateMyInt :: MyInt  ->  MyInt;
12.57/4.86	negateMyInt = primNegInt;
12.57/4.86	
12.57/4.86	not :: MyBool  ->  MyBool;
12.57/4.86	not MyTrue = MyFalse;
12.57/4.86	not MyFalse = MyTrue;
12.57/4.86	
12.57/4.86	primCmpInt :: MyInt  ->  MyInt  ->  Ordering;
12.57/4.86	primCmpInt (Main.Pos Main.Zero) (Main.Pos Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Pos Main.Zero) (Main.Neg Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Neg Main.Zero) (Main.Pos Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Neg Main.Zero) (Main.Neg Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Pos x) (Main.Pos y) = primCmpNat x y;
12.57/4.86	primCmpInt (Main.Pos x) (Main.Neg y) = GT;
12.57/4.86	primCmpInt (Main.Neg x) (Main.Pos y) = LT;
12.57/4.86	primCmpInt (Main.Neg x) (Main.Neg y) = primCmpNat y x;
12.57/4.86	
12.57/4.86	primCmpNat :: Main.Nat  ->  Main.Nat  ->  Ordering;
12.57/4.86	primCmpNat Main.Zero Main.Zero = EQ;
12.57/4.86	primCmpNat Main.Zero (Main.Succ y) = LT;
12.57/4.86	primCmpNat (Main.Succ x) Main.Zero = GT;
12.57/4.86	primCmpNat (Main.Succ x) (Main.Succ y) = primCmpNat x y;
12.57/4.86	
12.57/4.86	primDivFloat :: Float  ->  Float  ->  Float;
12.57/4.86	primDivFloat (Float x1 x2) (Float y1 y2) = Float (srMyInt x1 y2) (srMyInt x2 y1);
12.57/4.86	
12.57/4.86	primEqInt :: MyInt  ->  MyInt  ->  MyBool;
12.57/4.86	primEqInt (Main.Pos (Main.Succ x)) (Main.Pos (Main.Succ y)) = primEqNat x y;
12.57/4.86	primEqInt (Main.Neg (Main.Succ x)) (Main.Neg (Main.Succ y)) = primEqNat x y;
12.57/4.86	primEqInt (Main.Pos Main.Zero) (Main.Neg Main.Zero) = MyTrue;
12.57/4.86	primEqInt (Main.Neg Main.Zero) (Main.Pos Main.Zero) = MyTrue;
12.57/4.86	primEqInt (Main.Neg Main.Zero) (Main.Neg Main.Zero) = MyTrue;
12.57/4.86	primEqInt (Main.Pos Main.Zero) (Main.Pos Main.Zero) = MyTrue;
12.57/4.86	primEqInt vx vy = MyFalse;
12.57/4.86	
12.57/4.86	primEqNat :: Main.Nat  ->  Main.Nat  ->  MyBool;
12.57/4.86	primEqNat Main.Zero Main.Zero = MyTrue;
12.57/4.86	primEqNat Main.Zero (Main.Succ y) = MyFalse;
12.57/4.86	primEqNat (Main.Succ x) Main.Zero = MyFalse;
12.57/4.86	primEqNat (Main.Succ x) (Main.Succ y) = primEqNat x y;
12.57/4.86	
12.57/4.86	primFloatEncode :: Integer  ->  MyInt  ->  Float;
12.57/4.86	primFloatEncode x y = srFloat (fromIntegerFloat x) (primFloatEncodePower (Main.Pos (Main.Succ (Main.Succ Main.Zero))) y);
12.57/4.86	
12.57/4.86	primFloatEncodePower :: MyInt  ->  MyInt  ->  Float;
12.57/4.86	primFloatEncodePower vv wy = primFloatEncodePower4 vv wy;
12.57/4.86	primFloatEncodePower x vw = primFloatEncodePower2 x vw;
12.57/4.86	primFloatEncodePower x y = primFloatEncodePower0 x y;
12.57/4.86	
12.57/4.86	primFloatEncodePower0 x y = fsFloat (fromDoubleFloat (Double (Main.Pos (Main.Succ Main.Zero)) (Main.Pos (Main.Succ Main.Zero)))) (primFloatEncodePower x (negateMyInt y));
12.57/4.86	
12.57/4.86	primFloatEncodePower1 MyTrue x vw = srFloat (fromIntFloat x) (primFloatEncodePower x (msMyInt vw (Main.Pos (Main.Succ Main.Zero))));
12.57/4.86	primFloatEncodePower1 vz wu wv = primFloatEncodePower0 wu wv;
12.57/4.86	
12.57/4.86	primFloatEncodePower2 x vw = primFloatEncodePower1 (gtEsMyInt vw (Main.Pos (Main.Succ Main.Zero))) x vw;
12.57/4.86	primFloatEncodePower2 ww wx = primFloatEncodePower0 ww wx;
12.57/4.86	
12.57/4.86	primFloatEncodePower3 MyTrue vv wy = fromDoubleFloat (Double (Main.Pos (Main.Succ Main.Zero)) (Main.Pos (Main.Succ Main.Zero)));
12.57/4.86	primFloatEncodePower3 wz xu xv = primFloatEncodePower2 xu xv;
12.57/4.86	
12.57/4.86	primFloatEncodePower4 vv wy = primFloatEncodePower3 (esEsMyInt wy (Main.Pos Main.Zero)) vv wy;
12.57/4.86	primFloatEncodePower4 xw xx = primFloatEncodePower2 xw xx;
12.57/4.86	
12.57/4.86	primIntToFloat :: MyInt  ->  Float;
12.57/4.86	primIntToFloat x = Float x (Main.Pos (Main.Succ Main.Zero));
12.57/4.86	
12.57/4.86	primIntegerToFloat :: Integer  ->  Float;
12.57/4.86	primIntegerToFloat (Integer x) = primIntToFloat x;
12.57/4.86	
12.57/4.86	primMinusInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	primMinusInt (Main.Pos x) (Main.Neg y) = Main.Pos (primPlusNat x y);
12.57/4.86	primMinusInt (Main.Neg x) (Main.Pos y) = Main.Neg (primPlusNat x y);
12.57/4.86	primMinusInt (Main.Neg x) (Main.Neg y) = primMinusNat y x;
12.57/4.86	primMinusInt (Main.Pos x) (Main.Pos y) = primMinusNat x y;
12.57/4.86	
12.57/4.86	primMinusNat :: Main.Nat  ->  Main.Nat  ->  MyInt;
12.57/4.86	primMinusNat Main.Zero Main.Zero = Main.Pos Main.Zero;
12.57/4.86	primMinusNat Main.Zero (Main.Succ y) = Main.Neg (Main.Succ y);
12.57/4.86	primMinusNat (Main.Succ x) Main.Zero = Main.Pos (Main.Succ x);
12.57/4.86	primMinusNat (Main.Succ x) (Main.Succ y) = primMinusNat x y;
12.57/4.86	
12.57/4.86	primMulFloat :: Float  ->  Float  ->  Float;
12.57/4.86	primMulFloat (Float x1 x2) (Float y1 y2) = Float (srMyInt x1 y1) (srMyInt x2 y2);
12.57/4.86	
12.57/4.86	primMulInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	primMulInt (Main.Pos x) (Main.Pos y) = Main.Pos (primMulNat x y);
12.57/4.86	primMulInt (Main.Pos x) (Main.Neg y) = Main.Neg (primMulNat x y);
12.57/4.86	primMulInt (Main.Neg x) (Main.Pos y) = Main.Neg (primMulNat x y);
12.57/4.86	primMulInt (Main.Neg x) (Main.Neg y) = Main.Pos (primMulNat x y);
12.57/4.86	
12.57/4.86	primMulNat :: Main.Nat  ->  Main.Nat  ->  Main.Nat;
12.57/4.86	primMulNat Main.Zero Main.Zero = Main.Zero;
12.57/4.86	primMulNat Main.Zero (Main.Succ y) = Main.Zero;
12.57/4.86	primMulNat (Main.Succ x) Main.Zero = Main.Zero;
12.57/4.86	primMulNat (Main.Succ x) (Main.Succ y) = primPlusNat (primMulNat x (Main.Succ y)) (Main.Succ y);
12.57/4.86	
12.57/4.86	primNegInt :: MyInt  ->  MyInt;
12.57/4.86	primNegInt (Main.Pos x) = Main.Neg x;
12.57/4.86	primNegInt (Main.Neg x) = Main.Pos x;
12.57/4.86	
12.57/4.86	primPlusNat :: Main.Nat  ->  Main.Nat  ->  Main.Nat;
12.57/4.86	primPlusNat Main.Zero Main.Zero = Main.Zero;
12.57/4.86	primPlusNat Main.Zero (Main.Succ y) = Main.Succ y;
12.57/4.86	primPlusNat (Main.Succ x) Main.Zero = Main.Succ x;
12.57/4.86	primPlusNat (Main.Succ x) (Main.Succ y) = Main.Succ (Main.Succ (primPlusNat x y));
12.57/4.86	
12.57/4.86	srFloat :: Float  ->  Float  ->  Float;
12.57/4.86	srFloat = primMulFloat;
12.57/4.86	
12.57/4.86	srMyInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	srMyInt = primMulInt;
12.57/4.86	
12.57/4.86	}
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(3) COR (EQUIVALENT)
12.57/4.86	Cond Reductions:
12.57/4.86	The following Function with conditions
12.57/4.86	"undefined |Falseundefined;
12.57/4.86	"
12.57/4.86	is transformed to
12.57/4.86	"undefined  = undefined1;
12.57/4.86	"
12.57/4.86	"undefined0 True = undefined;
12.57/4.86	"
12.57/4.86	"undefined1  = undefined0 False;
12.57/4.86	"
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(4)
12.57/4.86	Obligation:
12.57/4.86	mainModule Main 
12.57/4.86	module Main where {
12.57/4.86	import qualified Prelude;
12.57/4.86	data Double = Double MyInt MyInt ;
12.57/4.86	
12.57/4.86	data Float = Float MyInt MyInt ;
12.57/4.86	
12.57/4.86	data Integer = Integer MyInt ;
12.57/4.86	
12.57/4.86	data MyBool = MyTrue  | MyFalse ;
12.57/4.86	
12.57/4.86	data MyInt = Pos Main.Nat  | Neg Main.Nat ;
12.57/4.86	
12.57/4.86	data Main.Nat = Succ Main.Nat  | Zero ;
12.57/4.86	
12.57/4.86	data Ordering = LT  | EQ  | GT ;
12.57/4.86	
12.57/4.86	compareMyInt :: MyInt  ->  MyInt  ->  Ordering;
12.57/4.86	compareMyInt = primCmpInt;
12.57/4.86	
12.57/4.86	doubleToFloat :: Double  ->  Float;
12.57/4.86	doubleToFloat (Double x y) = Float x y;
12.57/4.86	
12.57/4.86	encodeFloatFloat :: Integer  ->  MyInt  ->  Float;
12.57/4.86	encodeFloatFloat = primFloatEncode;
12.57/4.86	
12.57/4.86	esEsMyInt :: MyInt  ->  MyInt  ->  MyBool;
12.57/4.86	esEsMyInt = primEqInt;
12.57/4.86	
12.57/4.86	esEsOrdering :: Ordering  ->  Ordering  ->  MyBool;
12.57/4.86	esEsOrdering LT LT = MyTrue;
12.57/4.86	esEsOrdering LT EQ = MyFalse;
12.57/4.86	esEsOrdering LT GT = MyFalse;
12.57/4.86	esEsOrdering EQ LT = MyFalse;
12.57/4.86	esEsOrdering EQ EQ = MyTrue;
12.57/4.86	esEsOrdering EQ GT = MyFalse;
12.57/4.86	esEsOrdering GT LT = MyFalse;
12.57/4.86	esEsOrdering GT EQ = MyFalse;
12.57/4.86	esEsOrdering GT GT = MyTrue;
12.57/4.86	
12.57/4.86	fromDoubleFloat :: Double  ->  Float;
12.57/4.86	fromDoubleFloat = doubleToFloat;
12.57/4.86	
12.57/4.86	fromIntFloat :: MyInt  ->  Float;
12.57/4.86	fromIntFloat = primIntToFloat;
12.57/4.86	
12.57/4.86	fromIntegerFloat :: Integer  ->  Float;
12.57/4.86	fromIntegerFloat = primIntegerToFloat;
12.57/4.86	
12.57/4.86	fsEsOrdering :: Ordering  ->  Ordering  ->  MyBool;
12.57/4.86	fsEsOrdering x y = not (esEsOrdering x y);
12.57/4.86	
12.57/4.86	fsFloat :: Float  ->  Float  ->  Float;
12.57/4.86	fsFloat = primDivFloat;
12.57/4.86	
12.57/4.86	gtEsMyInt :: MyInt  ->  MyInt  ->  MyBool;
12.57/4.86	gtEsMyInt x y = fsEsOrdering (compareMyInt x y) LT;
12.57/4.86	
12.57/4.86	msMyInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	msMyInt = primMinusInt;
12.57/4.86	
12.57/4.86	negateMyInt :: MyInt  ->  MyInt;
12.57/4.86	negateMyInt = primNegInt;
12.57/4.86	
12.57/4.86	not :: MyBool  ->  MyBool;
12.57/4.86	not MyTrue = MyFalse;
12.57/4.86	not MyFalse = MyTrue;
12.57/4.86	
12.57/4.86	primCmpInt :: MyInt  ->  MyInt  ->  Ordering;
12.57/4.86	primCmpInt (Main.Pos Main.Zero) (Main.Pos Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Pos Main.Zero) (Main.Neg Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Neg Main.Zero) (Main.Pos Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Neg Main.Zero) (Main.Neg Main.Zero) = EQ;
12.57/4.86	primCmpInt (Main.Pos x) (Main.Pos y) = primCmpNat x y;
12.57/4.86	primCmpInt (Main.Pos x) (Main.Neg y) = GT;
12.57/4.86	primCmpInt (Main.Neg x) (Main.Pos y) = LT;
12.57/4.86	primCmpInt (Main.Neg x) (Main.Neg y) = primCmpNat y x;
12.57/4.86	
12.57/4.86	primCmpNat :: Main.Nat  ->  Main.Nat  ->  Ordering;
12.57/4.86	primCmpNat Main.Zero Main.Zero = EQ;
12.57/4.86	primCmpNat Main.Zero (Main.Succ y) = LT;
12.57/4.86	primCmpNat (Main.Succ x) Main.Zero = GT;
12.57/4.86	primCmpNat (Main.Succ x) (Main.Succ y) = primCmpNat x y;
12.57/4.86	
12.57/4.86	primDivFloat :: Float  ->  Float  ->  Float;
12.57/4.86	primDivFloat (Float x1 x2) (Float y1 y2) = Float (srMyInt x1 y2) (srMyInt x2 y1);
12.57/4.86	
12.57/4.86	primEqInt :: MyInt  ->  MyInt  ->  MyBool;
12.57/4.86	primEqInt (Main.Pos (Main.Succ x)) (Main.Pos (Main.Succ y)) = primEqNat x y;
12.57/4.86	primEqInt (Main.Neg (Main.Succ x)) (Main.Neg (Main.Succ y)) = primEqNat x y;
12.57/4.86	primEqInt (Main.Pos Main.Zero) (Main.Neg Main.Zero) = MyTrue;
12.57/4.86	primEqInt (Main.Neg Main.Zero) (Main.Pos Main.Zero) = MyTrue;
12.57/4.86	primEqInt (Main.Neg Main.Zero) (Main.Neg Main.Zero) = MyTrue;
12.57/4.86	primEqInt (Main.Pos Main.Zero) (Main.Pos Main.Zero) = MyTrue;
12.57/4.86	primEqInt vx vy = MyFalse;
12.57/4.86	
12.57/4.86	primEqNat :: Main.Nat  ->  Main.Nat  ->  MyBool;
12.57/4.86	primEqNat Main.Zero Main.Zero = MyTrue;
12.57/4.86	primEqNat Main.Zero (Main.Succ y) = MyFalse;
12.57/4.86	primEqNat (Main.Succ x) Main.Zero = MyFalse;
12.57/4.86	primEqNat (Main.Succ x) (Main.Succ y) = primEqNat x y;
12.57/4.86	
12.57/4.86	primFloatEncode :: Integer  ->  MyInt  ->  Float;
12.57/4.86	primFloatEncode x y = srFloat (fromIntegerFloat x) (primFloatEncodePower (Main.Pos (Main.Succ (Main.Succ Main.Zero))) y);
12.57/4.86	
12.57/4.86	primFloatEncodePower :: MyInt  ->  MyInt  ->  Float;
12.57/4.86	primFloatEncodePower vv wy = primFloatEncodePower4 vv wy;
12.57/4.86	primFloatEncodePower x vw = primFloatEncodePower2 x vw;
12.57/4.86	primFloatEncodePower x y = primFloatEncodePower0 x y;
12.57/4.86	
12.57/4.86	primFloatEncodePower0 x y = fsFloat (fromDoubleFloat (Double (Main.Pos (Main.Succ Main.Zero)) (Main.Pos (Main.Succ Main.Zero)))) (primFloatEncodePower x (negateMyInt y));
12.57/4.86	
12.57/4.86	primFloatEncodePower1 MyTrue x vw = srFloat (fromIntFloat x) (primFloatEncodePower x (msMyInt vw (Main.Pos (Main.Succ Main.Zero))));
12.57/4.86	primFloatEncodePower1 vz wu wv = primFloatEncodePower0 wu wv;
12.57/4.86	
12.57/4.86	primFloatEncodePower2 x vw = primFloatEncodePower1 (gtEsMyInt vw (Main.Pos (Main.Succ Main.Zero))) x vw;
12.57/4.86	primFloatEncodePower2 ww wx = primFloatEncodePower0 ww wx;
12.57/4.86	
12.57/4.86	primFloatEncodePower3 MyTrue vv wy = fromDoubleFloat (Double (Main.Pos (Main.Succ Main.Zero)) (Main.Pos (Main.Succ Main.Zero)));
12.57/4.86	primFloatEncodePower3 wz xu xv = primFloatEncodePower2 xu xv;
12.57/4.86	
12.57/4.86	primFloatEncodePower4 vv wy = primFloatEncodePower3 (esEsMyInt wy (Main.Pos Main.Zero)) vv wy;
12.57/4.86	primFloatEncodePower4 xw xx = primFloatEncodePower2 xw xx;
12.57/4.86	
12.57/4.86	primIntToFloat :: MyInt  ->  Float;
12.57/4.86	primIntToFloat x = Float x (Main.Pos (Main.Succ Main.Zero));
12.57/4.86	
12.57/4.86	primIntegerToFloat :: Integer  ->  Float;
12.57/4.86	primIntegerToFloat (Integer x) = primIntToFloat x;
12.57/4.86	
12.57/4.86	primMinusInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	primMinusInt (Main.Pos x) (Main.Neg y) = Main.Pos (primPlusNat x y);
12.57/4.86	primMinusInt (Main.Neg x) (Main.Pos y) = Main.Neg (primPlusNat x y);
12.57/4.86	primMinusInt (Main.Neg x) (Main.Neg y) = primMinusNat y x;
12.57/4.86	primMinusInt (Main.Pos x) (Main.Pos y) = primMinusNat x y;
12.57/4.86	
12.57/4.86	primMinusNat :: Main.Nat  ->  Main.Nat  ->  MyInt;
12.57/4.86	primMinusNat Main.Zero Main.Zero = Main.Pos Main.Zero;
12.57/4.86	primMinusNat Main.Zero (Main.Succ y) = Main.Neg (Main.Succ y);
12.57/4.86	primMinusNat (Main.Succ x) Main.Zero = Main.Pos (Main.Succ x);
12.57/4.86	primMinusNat (Main.Succ x) (Main.Succ y) = primMinusNat x y;
12.57/4.86	
12.57/4.86	primMulFloat :: Float  ->  Float  ->  Float;
12.57/4.86	primMulFloat (Float x1 x2) (Float y1 y2) = Float (srMyInt x1 y1) (srMyInt x2 y2);
12.57/4.86	
12.57/4.86	primMulInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	primMulInt (Main.Pos x) (Main.Pos y) = Main.Pos (primMulNat x y);
12.57/4.86	primMulInt (Main.Pos x) (Main.Neg y) = Main.Neg (primMulNat x y);
12.57/4.86	primMulInt (Main.Neg x) (Main.Pos y) = Main.Neg (primMulNat x y);
12.57/4.86	primMulInt (Main.Neg x) (Main.Neg y) = Main.Pos (primMulNat x y);
12.57/4.86	
12.57/4.86	primMulNat :: Main.Nat  ->  Main.Nat  ->  Main.Nat;
12.57/4.86	primMulNat Main.Zero Main.Zero = Main.Zero;
12.57/4.86	primMulNat Main.Zero (Main.Succ y) = Main.Zero;
12.57/4.86	primMulNat (Main.Succ x) Main.Zero = Main.Zero;
12.57/4.86	primMulNat (Main.Succ x) (Main.Succ y) = primPlusNat (primMulNat x (Main.Succ y)) (Main.Succ y);
12.57/4.86	
12.57/4.86	primNegInt :: MyInt  ->  MyInt;
12.57/4.86	primNegInt (Main.Pos x) = Main.Neg x;
12.57/4.86	primNegInt (Main.Neg x) = Main.Pos x;
12.57/4.86	
12.57/4.86	primPlusNat :: Main.Nat  ->  Main.Nat  ->  Main.Nat;
12.57/4.86	primPlusNat Main.Zero Main.Zero = Main.Zero;
12.57/4.86	primPlusNat Main.Zero (Main.Succ y) = Main.Succ y;
12.57/4.86	primPlusNat (Main.Succ x) Main.Zero = Main.Succ x;
12.57/4.86	primPlusNat (Main.Succ x) (Main.Succ y) = Main.Succ (Main.Succ (primPlusNat x y));
12.57/4.86	
12.57/4.86	srFloat :: Float  ->  Float  ->  Float;
12.57/4.86	srFloat = primMulFloat;
12.57/4.86	
12.57/4.86	srMyInt :: MyInt  ->  MyInt  ->  MyInt;
12.57/4.86	srMyInt = primMulInt;
12.57/4.86	
12.57/4.86	}
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(5) Narrow (SOUND)
12.57/4.86	Haskell To QDPs
12.57/4.86	
12.57/4.86	digraph dp_graph {
12.57/4.86	node [outthreshold=100, inthreshold=100];1[label="encodeFloatFloat",fontsize=16,color="grey",shape="box"];1 -> 3[label="",style="dashed", color="grey", weight=3];
12.57/4.86	3[label="encodeFloatFloat yu3",fontsize=16,color="grey",shape="box"];3 -> 4[label="",style="dashed", color="grey", weight=3];
12.57/4.86	4[label="encodeFloatFloat yu3 yu4",fontsize=16,color="black",shape="triangle"];4 -> 5[label="",style="solid", color="black", weight=3];
12.57/4.86	5[label="primFloatEncode yu3 yu4",fontsize=16,color="black",shape="box"];5 -> 6[label="",style="solid", color="black", weight=3];
12.57/4.86	6[label="srFloat (fromIntegerFloat yu3) (primFloatEncodePower (Pos (Succ (Succ Zero))) yu4)",fontsize=16,color="black",shape="box"];6 -> 7[label="",style="solid", color="black", weight=3];
12.57/4.86	7[label="primMulFloat (fromIntegerFloat yu3) (primFloatEncodePower (Pos (Succ (Succ Zero))) yu4)",fontsize=16,color="black",shape="box"];7 -> 8[label="",style="solid", color="black", weight=3];
12.57/4.86	8[label="primMulFloat (primIntegerToFloat yu3) (primFloatEncodePower (Pos (Succ (Succ Zero))) yu4)",fontsize=16,color="burlywood",shape="box"];268[label="yu3/Integer yu30",fontsize=10,color="white",style="solid",shape="box"];8 -> 268[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	268 -> 9[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	9[label="primMulFloat (primIntegerToFloat (Integer yu30)) (primFloatEncodePower (Pos (Succ (Succ Zero))) yu4)",fontsize=16,color="black",shape="box"];9 -> 10[label="",style="solid", color="black", weight=3];
12.57/4.86	10[label="primMulFloat (primIntToFloat yu30) (primFloatEncodePower (Pos (Succ (Succ Zero))) yu4)",fontsize=16,color="black",shape="box"];10 -> 11[label="",style="solid", color="black", weight=3];
12.57/4.86	11 -> 87[label="",style="dashed", color="red", weight=0];
12.57/4.86	11[label="primMulFloat (Float yu30 (Pos (Succ Zero))) (primFloatEncodePower (Pos (Succ (Succ Zero))) yu4)",fontsize=16,color="magenta"];11 -> 88[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	88[label="primFloatEncodePower (Pos (Succ (Succ Zero))) yu4",fontsize=16,color="black",shape="triangle"];88 -> 133[label="",style="solid", color="black", weight=3];
12.57/4.86	87[label="primMulFloat (Float yu30 (Pos (Succ Zero))) yu6",fontsize=16,color="burlywood",shape="triangle"];269[label="yu6/Float yu60 yu61",fontsize=10,color="white",style="solid",shape="box"];87 -> 269[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	269 -> 134[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	133[label="primFloatEncodePower4 (Pos (Succ (Succ Zero))) yu4",fontsize=16,color="black",shape="box"];133 -> 135[label="",style="solid", color="black", weight=3];
12.57/4.86	134[label="primMulFloat (Float yu30 (Pos (Succ Zero))) (Float yu60 yu61)",fontsize=16,color="black",shape="box"];134 -> 136[label="",style="solid", color="black", weight=3];
12.57/4.86	135[label="primFloatEncodePower3 (esEsMyInt yu4 (Pos Zero)) (Pos (Succ (Succ Zero))) yu4",fontsize=16,color="black",shape="box"];135 -> 137[label="",style="solid", color="black", weight=3];
12.57/4.86	136[label="Float (srMyInt yu30 yu60) (srMyInt (Pos (Succ Zero)) yu61)",fontsize=16,color="green",shape="box"];136 -> 138[label="",style="dashed", color="green", weight=3];
12.57/4.86	136 -> 139[label="",style="dashed", color="green", weight=3];
12.57/4.86	137[label="primFloatEncodePower3 (primEqInt yu4 (Pos Zero)) (Pos (Succ (Succ Zero))) yu4",fontsize=16,color="burlywood",shape="box"];270[label="yu4/Pos yu40",fontsize=10,color="white",style="solid",shape="box"];137 -> 270[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	270 -> 140[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	271[label="yu4/Neg yu40",fontsize=10,color="white",style="solid",shape="box"];137 -> 271[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	271 -> 141[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	138[label="srMyInt yu30 yu60",fontsize=16,color="black",shape="triangle"];138 -> 142[label="",style="solid", color="black", weight=3];
12.57/4.86	139 -> 138[label="",style="dashed", color="red", weight=0];
12.57/4.86	139[label="srMyInt (Pos (Succ Zero)) yu61",fontsize=16,color="magenta"];139 -> 143[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	139 -> 144[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	140[label="primFloatEncodePower3 (primEqInt (Pos yu40) (Pos Zero)) (Pos (Succ (Succ Zero))) (Pos yu40)",fontsize=16,color="burlywood",shape="box"];272[label="yu40/Succ yu400",fontsize=10,color="white",style="solid",shape="box"];140 -> 272[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	272 -> 145[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	273[label="yu40/Zero",fontsize=10,color="white",style="solid",shape="box"];140 -> 273[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	273 -> 146[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	141[label="primFloatEncodePower3 (primEqInt (Neg yu40) (Pos Zero)) (Pos (Succ (Succ Zero))) (Neg yu40)",fontsize=16,color="burlywood",shape="box"];274[label="yu40/Succ yu400",fontsize=10,color="white",style="solid",shape="box"];141 -> 274[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	274 -> 147[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	275[label="yu40/Zero",fontsize=10,color="white",style="solid",shape="box"];141 -> 275[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	275 -> 148[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	142[label="primMulInt yu30 yu60",fontsize=16,color="burlywood",shape="box"];276[label="yu30/Pos yu300",fontsize=10,color="white",style="solid",shape="box"];142 -> 276[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	276 -> 149[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	277[label="yu30/Neg yu300",fontsize=10,color="white",style="solid",shape="box"];142 -> 277[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	277 -> 150[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	143[label="Pos (Succ Zero)",fontsize=16,color="green",shape="box"];144[label="yu61",fontsize=16,color="green",shape="box"];145[label="primFloatEncodePower3 (primEqInt (Pos (Succ yu400)) (Pos Zero)) (Pos (Succ (Succ Zero))) (Pos (Succ yu400))",fontsize=16,color="black",shape="box"];145 -> 151[label="",style="solid", color="black", weight=3];
12.57/4.86	146[label="primFloatEncodePower3 (primEqInt (Pos Zero) (Pos Zero)) (Pos (Succ (Succ Zero))) (Pos Zero)",fontsize=16,color="black",shape="box"];146 -> 152[label="",style="solid", color="black", weight=3];
12.57/4.86	147[label="primFloatEncodePower3 (primEqInt (Neg (Succ yu400)) (Pos Zero)) (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];147 -> 153[label="",style="solid", color="black", weight=3];
12.57/4.86	148[label="primFloatEncodePower3 (primEqInt (Neg Zero) (Pos Zero)) (Pos (Succ (Succ Zero))) (Neg Zero)",fontsize=16,color="black",shape="box"];148 -> 154[label="",style="solid", color="black", weight=3];
12.57/4.86	149[label="primMulInt (Pos yu300) yu60",fontsize=16,color="burlywood",shape="box"];278[label="yu60/Pos yu600",fontsize=10,color="white",style="solid",shape="box"];149 -> 278[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	278 -> 155[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	279[label="yu60/Neg yu600",fontsize=10,color="white",style="solid",shape="box"];149 -> 279[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	279 -> 156[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	150[label="primMulInt (Neg yu300) yu60",fontsize=16,color="burlywood",shape="box"];280[label="yu60/Pos yu600",fontsize=10,color="white",style="solid",shape="box"];150 -> 280[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	280 -> 157[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	281[label="yu60/Neg yu600",fontsize=10,color="white",style="solid",shape="box"];150 -> 281[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	281 -> 158[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	151[label="primFloatEncodePower3 MyFalse (Pos (Succ (Succ Zero))) (Pos (Succ yu400))",fontsize=16,color="black",shape="box"];151 -> 159[label="",style="solid", color="black", weight=3];
12.57/4.86	152[label="primFloatEncodePower3 MyTrue (Pos (Succ (Succ Zero))) (Pos Zero)",fontsize=16,color="black",shape="box"];152 -> 160[label="",style="solid", color="black", weight=3];
12.57/4.86	153[label="primFloatEncodePower3 MyFalse (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];153 -> 161[label="",style="solid", color="black", weight=3];
12.57/4.86	154[label="primFloatEncodePower3 MyTrue (Pos (Succ (Succ Zero))) (Neg Zero)",fontsize=16,color="black",shape="box"];154 -> 162[label="",style="solid", color="black", weight=3];
12.57/4.86	155[label="primMulInt (Pos yu300) (Pos yu600)",fontsize=16,color="black",shape="box"];155 -> 163[label="",style="solid", color="black", weight=3];
12.57/4.86	156[label="primMulInt (Pos yu300) (Neg yu600)",fontsize=16,color="black",shape="box"];156 -> 164[label="",style="solid", color="black", weight=3];
12.57/4.86	157[label="primMulInt (Neg yu300) (Pos yu600)",fontsize=16,color="black",shape="box"];157 -> 165[label="",style="solid", color="black", weight=3];
12.57/4.86	158[label="primMulInt (Neg yu300) (Neg yu600)",fontsize=16,color="black",shape="box"];158 -> 166[label="",style="solid", color="black", weight=3];
12.57/4.86	159[label="primFloatEncodePower2 (Pos (Succ (Succ Zero))) (Pos (Succ yu400))",fontsize=16,color="black",shape="box"];159 -> 167[label="",style="solid", color="black", weight=3];
12.57/4.86	160[label="fromDoubleFloat (Double (Pos (Succ Zero)) (Pos (Succ Zero)))",fontsize=16,color="black",shape="triangle"];160 -> 168[label="",style="solid", color="black", weight=3];
12.57/4.86	161[label="primFloatEncodePower2 (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];161 -> 169[label="",style="solid", color="black", weight=3];
12.57/4.86	162 -> 160[label="",style="dashed", color="red", weight=0];
12.57/4.86	162[label="fromDoubleFloat (Double (Pos (Succ Zero)) (Pos (Succ Zero)))",fontsize=16,color="magenta"];163[label="Pos (primMulNat yu300 yu600)",fontsize=16,color="green",shape="box"];163 -> 170[label="",style="dashed", color="green", weight=3];
12.57/4.86	164[label="Neg (primMulNat yu300 yu600)",fontsize=16,color="green",shape="box"];164 -> 171[label="",style="dashed", color="green", weight=3];
12.57/4.86	165[label="Neg (primMulNat yu300 yu600)",fontsize=16,color="green",shape="box"];165 -> 172[label="",style="dashed", color="green", weight=3];
12.57/4.86	166[label="Pos (primMulNat yu300 yu600)",fontsize=16,color="green",shape="box"];166 -> 173[label="",style="dashed", color="green", weight=3];
12.57/4.86	167[label="primFloatEncodePower1 (gtEsMyInt (Pos (Succ yu400)) (Pos (Succ Zero))) (Pos (Succ (Succ Zero))) (Pos (Succ yu400))",fontsize=16,color="black",shape="box"];167 -> 174[label="",style="solid", color="black", weight=3];
12.57/4.86	168[label="doubleToFloat (Double (Pos (Succ Zero)) (Pos (Succ Zero)))",fontsize=16,color="black",shape="box"];168 -> 175[label="",style="solid", color="black", weight=3];
12.57/4.86	169[label="primFloatEncodePower1 (gtEsMyInt (Neg (Succ yu400)) (Pos (Succ Zero))) (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];169 -> 176[label="",style="solid", color="black", weight=3];
12.57/4.86	170[label="primMulNat yu300 yu600",fontsize=16,color="burlywood",shape="triangle"];282[label="yu300/Succ yu3000",fontsize=10,color="white",style="solid",shape="box"];170 -> 282[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	282 -> 177[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	283[label="yu300/Zero",fontsize=10,color="white",style="solid",shape="box"];170 -> 283[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	283 -> 178[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	171 -> 170[label="",style="dashed", color="red", weight=0];
12.57/4.86	171[label="primMulNat yu300 yu600",fontsize=16,color="magenta"];171 -> 179[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	172 -> 170[label="",style="dashed", color="red", weight=0];
12.57/4.86	172[label="primMulNat yu300 yu600",fontsize=16,color="magenta"];172 -> 180[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	173 -> 170[label="",style="dashed", color="red", weight=0];
12.57/4.86	173[label="primMulNat yu300 yu600",fontsize=16,color="magenta"];173 -> 181[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	173 -> 182[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	174[label="primFloatEncodePower1 (fsEsOrdering (compareMyInt (Pos (Succ yu400)) (Pos (Succ Zero))) LT) (Pos (Succ (Succ Zero))) (Pos (Succ yu400))",fontsize=16,color="black",shape="box"];174 -> 183[label="",style="solid", color="black", weight=3];
12.57/4.86	175[label="Float (Pos (Succ Zero)) (Pos (Succ Zero))",fontsize=16,color="green",shape="box"];176[label="primFloatEncodePower1 (fsEsOrdering (compareMyInt (Neg (Succ yu400)) (Pos (Succ Zero))) LT) (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];176 -> 184[label="",style="solid", color="black", weight=3];
12.57/4.86	177[label="primMulNat (Succ yu3000) yu600",fontsize=16,color="burlywood",shape="box"];284[label="yu600/Succ yu6000",fontsize=10,color="white",style="solid",shape="box"];177 -> 284[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	284 -> 185[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	285[label="yu600/Zero",fontsize=10,color="white",style="solid",shape="box"];177 -> 285[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	285 -> 186[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	178[label="primMulNat Zero yu600",fontsize=16,color="burlywood",shape="box"];286[label="yu600/Succ yu6000",fontsize=10,color="white",style="solid",shape="box"];178 -> 286[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	286 -> 187[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	287[label="yu600/Zero",fontsize=10,color="white",style="solid",shape="box"];178 -> 287[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	287 -> 188[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	179[label="yu600",fontsize=16,color="green",shape="box"];180[label="yu300",fontsize=16,color="green",shape="box"];181[label="yu300",fontsize=16,color="green",shape="box"];182[label="yu600",fontsize=16,color="green",shape="box"];183[label="primFloatEncodePower1 (not (esEsOrdering (compareMyInt (Pos (Succ yu400)) (Pos (Succ Zero))) LT)) (Pos (Succ (Succ Zero))) (Pos (Succ yu400))",fontsize=16,color="black",shape="box"];183 -> 189[label="",style="solid", color="black", weight=3];
12.57/4.86	184[label="primFloatEncodePower1 (not (esEsOrdering (compareMyInt (Neg (Succ yu400)) (Pos (Succ Zero))) LT)) (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];184 -> 190[label="",style="solid", color="black", weight=3];
12.57/4.86	185[label="primMulNat (Succ yu3000) (Succ yu6000)",fontsize=16,color="black",shape="box"];185 -> 191[label="",style="solid", color="black", weight=3];
12.57/4.86	186[label="primMulNat (Succ yu3000) Zero",fontsize=16,color="black",shape="box"];186 -> 192[label="",style="solid", color="black", weight=3];
12.57/4.86	187[label="primMulNat Zero (Succ yu6000)",fontsize=16,color="black",shape="box"];187 -> 193[label="",style="solid", color="black", weight=3];
12.57/4.86	188[label="primMulNat Zero Zero",fontsize=16,color="black",shape="box"];188 -> 194[label="",style="solid", color="black", weight=3];
12.57/4.86	189[label="primFloatEncodePower1 (not (esEsOrdering (primCmpInt (Pos (Succ yu400)) (Pos (Succ Zero))) LT)) (Pos (Succ (Succ Zero))) (Pos (Succ yu400))",fontsize=16,color="black",shape="box"];189 -> 195[label="",style="solid", color="black", weight=3];
12.57/4.86	190[label="primFloatEncodePower1 (not (esEsOrdering (primCmpInt (Neg (Succ yu400)) (Pos (Succ Zero))) LT)) (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];190 -> 196[label="",style="solid", color="black", weight=3];
12.57/4.86	191 -> 197[label="",style="dashed", color="red", weight=0];
12.57/4.86	191[label="primPlusNat (primMulNat yu3000 (Succ yu6000)) (Succ yu6000)",fontsize=16,color="magenta"];191 -> 198[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	192[label="Zero",fontsize=16,color="green",shape="box"];193[label="Zero",fontsize=16,color="green",shape="box"];194[label="Zero",fontsize=16,color="green",shape="box"];195[label="primFloatEncodePower1 (not (esEsOrdering (primCmpNat (Succ yu400) (Succ Zero)) LT)) (Pos (Succ (Succ Zero))) (Pos (Succ yu400))",fontsize=16,color="black",shape="box"];195 -> 199[label="",style="solid", color="black", weight=3];
12.57/4.86	196[label="primFloatEncodePower1 (not (esEsOrdering LT LT)) (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];196 -> 200[label="",style="solid", color="black", weight=3];
12.57/4.86	198 -> 170[label="",style="dashed", color="red", weight=0];
12.57/4.86	198[label="primMulNat yu3000 (Succ yu6000)",fontsize=16,color="magenta"];198 -> 201[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	198 -> 202[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	197[label="primPlusNat yu7 (Succ yu6000)",fontsize=16,color="burlywood",shape="triangle"];288[label="yu7/Succ yu70",fontsize=10,color="white",style="solid",shape="box"];197 -> 288[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	288 -> 203[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	289[label="yu7/Zero",fontsize=10,color="white",style="solid",shape="box"];197 -> 289[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	289 -> 204[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	199[label="primFloatEncodePower1 (not (esEsOrdering (primCmpNat yu400 Zero) LT)) (Pos (Succ (Succ Zero))) (Pos (Succ yu400))",fontsize=16,color="burlywood",shape="box"];290[label="yu400/Succ yu4000",fontsize=10,color="white",style="solid",shape="box"];199 -> 290[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	290 -> 205[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	291[label="yu400/Zero",fontsize=10,color="white",style="solid",shape="box"];199 -> 291[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	291 -> 206[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	200[label="primFloatEncodePower1 (not MyTrue) (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];200 -> 207[label="",style="solid", color="black", weight=3];
12.57/4.86	201[label="yu3000",fontsize=16,color="green",shape="box"];202[label="Succ yu6000",fontsize=16,color="green",shape="box"];203[label="primPlusNat (Succ yu70) (Succ yu6000)",fontsize=16,color="black",shape="box"];203 -> 208[label="",style="solid", color="black", weight=3];
12.57/4.86	204[label="primPlusNat Zero (Succ yu6000)",fontsize=16,color="black",shape="box"];204 -> 209[label="",style="solid", color="black", weight=3];
12.57/4.86	205[label="primFloatEncodePower1 (not (esEsOrdering (primCmpNat (Succ yu4000) Zero) LT)) (Pos (Succ (Succ Zero))) (Pos (Succ (Succ yu4000)))",fontsize=16,color="black",shape="box"];205 -> 210[label="",style="solid", color="black", weight=3];
12.57/4.86	206[label="primFloatEncodePower1 (not (esEsOrdering (primCmpNat Zero Zero) LT)) (Pos (Succ (Succ Zero))) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];206 -> 211[label="",style="solid", color="black", weight=3];
12.57/4.86	207[label="primFloatEncodePower1 MyFalse (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];207 -> 212[label="",style="solid", color="black", weight=3];
12.57/4.86	208[label="Succ (Succ (primPlusNat yu70 yu6000))",fontsize=16,color="green",shape="box"];208 -> 213[label="",style="dashed", color="green", weight=3];
12.57/4.86	209[label="Succ yu6000",fontsize=16,color="green",shape="box"];210[label="primFloatEncodePower1 (not (esEsOrdering GT LT)) (Pos (Succ (Succ Zero))) (Pos (Succ (Succ yu4000)))",fontsize=16,color="black",shape="box"];210 -> 214[label="",style="solid", color="black", weight=3];
12.57/4.86	211[label="primFloatEncodePower1 (not (esEsOrdering EQ LT)) (Pos (Succ (Succ Zero))) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];211 -> 215[label="",style="solid", color="black", weight=3];
12.57/4.86	212[label="primFloatEncodePower0 (Pos (Succ (Succ Zero))) (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];212 -> 216[label="",style="solid", color="black", weight=3];
12.57/4.86	213[label="primPlusNat yu70 yu6000",fontsize=16,color="burlywood",shape="triangle"];292[label="yu70/Succ yu700",fontsize=10,color="white",style="solid",shape="box"];213 -> 292[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	292 -> 217[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	293[label="yu70/Zero",fontsize=10,color="white",style="solid",shape="box"];213 -> 293[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	293 -> 218[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	214[label="primFloatEncodePower1 (not MyFalse) (Pos (Succ (Succ Zero))) (Pos (Succ (Succ yu4000)))",fontsize=16,color="black",shape="box"];214 -> 219[label="",style="solid", color="black", weight=3];
12.57/4.86	215[label="primFloatEncodePower1 (not MyFalse) (Pos (Succ (Succ Zero))) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];215 -> 220[label="",style="solid", color="black", weight=3];
12.57/4.86	216 -> 221[label="",style="dashed", color="red", weight=0];
12.57/4.86	216[label="fsFloat (fromDoubleFloat (Double (Pos (Succ Zero)) (Pos (Succ Zero)))) (primFloatEncodePower (Pos (Succ (Succ Zero))) (negateMyInt (Neg (Succ yu400))))",fontsize=16,color="magenta"];216 -> 222[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	216 -> 223[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	217[label="primPlusNat (Succ yu700) yu6000",fontsize=16,color="burlywood",shape="box"];294[label="yu6000/Succ yu60000",fontsize=10,color="white",style="solid",shape="box"];217 -> 294[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	294 -> 224[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	295[label="yu6000/Zero",fontsize=10,color="white",style="solid",shape="box"];217 -> 295[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	295 -> 225[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	218[label="primPlusNat Zero yu6000",fontsize=16,color="burlywood",shape="box"];296[label="yu6000/Succ yu60000",fontsize=10,color="white",style="solid",shape="box"];218 -> 296[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	296 -> 226[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	297[label="yu6000/Zero",fontsize=10,color="white",style="solid",shape="box"];218 -> 297[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	297 -> 227[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	219[label="primFloatEncodePower1 MyTrue (Pos (Succ (Succ Zero))) (Pos (Succ (Succ yu4000)))",fontsize=16,color="black",shape="box"];219 -> 228[label="",style="solid", color="black", weight=3];
12.57/4.86	220[label="primFloatEncodePower1 MyTrue (Pos (Succ (Succ Zero))) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];220 -> 229[label="",style="solid", color="black", weight=3];
12.57/4.86	222 -> 160[label="",style="dashed", color="red", weight=0];
12.57/4.86	222[label="fromDoubleFloat (Double (Pos (Succ Zero)) (Pos (Succ Zero)))",fontsize=16,color="magenta"];223 -> 88[label="",style="dashed", color="red", weight=0];
12.57/4.86	223[label="primFloatEncodePower (Pos (Succ (Succ Zero))) (negateMyInt (Neg (Succ yu400)))",fontsize=16,color="magenta"];223 -> 230[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	221[label="fsFloat yu9 yu8",fontsize=16,color="black",shape="triangle"];221 -> 231[label="",style="solid", color="black", weight=3];
12.57/4.86	224[label="primPlusNat (Succ yu700) (Succ yu60000)",fontsize=16,color="black",shape="box"];224 -> 232[label="",style="solid", color="black", weight=3];
12.57/4.86	225[label="primPlusNat (Succ yu700) Zero",fontsize=16,color="black",shape="box"];225 -> 233[label="",style="solid", color="black", weight=3];
12.57/4.86	226[label="primPlusNat Zero (Succ yu60000)",fontsize=16,color="black",shape="box"];226 -> 234[label="",style="solid", color="black", weight=3];
12.57/4.86	227[label="primPlusNat Zero Zero",fontsize=16,color="black",shape="box"];227 -> 235[label="",style="solid", color="black", weight=3];
12.57/4.86	228 -> 236[label="",style="dashed", color="red", weight=0];
12.57/4.86	228[label="srFloat (fromIntFloat (Pos (Succ (Succ Zero)))) (primFloatEncodePower (Pos (Succ (Succ Zero))) (msMyInt (Pos (Succ (Succ yu4000))) (Pos (Succ Zero))))",fontsize=16,color="magenta"];228 -> 237[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	229 -> 236[label="",style="dashed", color="red", weight=0];
12.57/4.86	229[label="srFloat (fromIntFloat (Pos (Succ (Succ Zero)))) (primFloatEncodePower (Pos (Succ (Succ Zero))) (msMyInt (Pos (Succ Zero)) (Pos (Succ Zero))))",fontsize=16,color="magenta"];229 -> 238[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	230[label="negateMyInt (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];230 -> 239[label="",style="solid", color="black", weight=3];
12.57/4.86	231[label="primDivFloat yu9 yu8",fontsize=16,color="burlywood",shape="box"];298[label="yu9/Float yu90 yu91",fontsize=10,color="white",style="solid",shape="box"];231 -> 298[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	298 -> 240[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	232[label="Succ (Succ (primPlusNat yu700 yu60000))",fontsize=16,color="green",shape="box"];232 -> 241[label="",style="dashed", color="green", weight=3];
12.57/4.86	233[label="Succ yu700",fontsize=16,color="green",shape="box"];234[label="Succ yu60000",fontsize=16,color="green",shape="box"];235[label="Zero",fontsize=16,color="green",shape="box"];237 -> 88[label="",style="dashed", color="red", weight=0];
12.57/4.86	237[label="primFloatEncodePower (Pos (Succ (Succ Zero))) (msMyInt (Pos (Succ (Succ yu4000))) (Pos (Succ Zero)))",fontsize=16,color="magenta"];237 -> 242[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	236[label="srFloat (fromIntFloat (Pos (Succ (Succ Zero)))) yu10",fontsize=16,color="black",shape="triangle"];236 -> 243[label="",style="solid", color="black", weight=3];
12.57/4.86	238 -> 88[label="",style="dashed", color="red", weight=0];
12.57/4.86	238[label="primFloatEncodePower (Pos (Succ (Succ Zero))) (msMyInt (Pos (Succ Zero)) (Pos (Succ Zero)))",fontsize=16,color="magenta"];238 -> 244[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	239[label="primNegInt (Neg (Succ yu400))",fontsize=16,color="black",shape="box"];239 -> 245[label="",style="solid", color="black", weight=3];
12.57/4.86	240[label="primDivFloat (Float yu90 yu91) yu8",fontsize=16,color="burlywood",shape="box"];299[label="yu8/Float yu80 yu81",fontsize=10,color="white",style="solid",shape="box"];240 -> 299[label="",style="solid", color="burlywood", weight=9];
12.57/4.86	299 -> 246[label="",style="solid", color="burlywood", weight=3];
12.57/4.86	241 -> 213[label="",style="dashed", color="red", weight=0];
12.57/4.86	241[label="primPlusNat yu700 yu60000",fontsize=16,color="magenta"];241 -> 247[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	241 -> 248[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	242[label="msMyInt (Pos (Succ (Succ yu4000))) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];242 -> 249[label="",style="solid", color="black", weight=3];
12.57/4.86	243[label="primMulFloat (fromIntFloat (Pos (Succ (Succ Zero)))) yu10",fontsize=16,color="black",shape="box"];243 -> 250[label="",style="solid", color="black", weight=3];
12.57/4.86	244[label="msMyInt (Pos (Succ Zero)) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];244 -> 251[label="",style="solid", color="black", weight=3];
12.57/4.86	245[label="Pos (Succ yu400)",fontsize=16,color="green",shape="box"];246[label="primDivFloat (Float yu90 yu91) (Float yu80 yu81)",fontsize=16,color="black",shape="box"];246 -> 252[label="",style="solid", color="black", weight=3];
12.57/4.86	247[label="yu700",fontsize=16,color="green",shape="box"];248[label="yu60000",fontsize=16,color="green",shape="box"];249[label="primMinusInt (Pos (Succ (Succ yu4000))) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];249 -> 253[label="",style="solid", color="black", weight=3];
12.57/4.86	250[label="primMulFloat (primIntToFloat (Pos (Succ (Succ Zero)))) yu10",fontsize=16,color="black",shape="box"];250 -> 254[label="",style="solid", color="black", weight=3];
12.57/4.86	251[label="primMinusInt (Pos (Succ Zero)) (Pos (Succ Zero))",fontsize=16,color="black",shape="box"];251 -> 255[label="",style="solid", color="black", weight=3];
12.57/4.86	252[label="Float (srMyInt yu90 yu81) (srMyInt yu91 yu80)",fontsize=16,color="green",shape="box"];252 -> 256[label="",style="dashed", color="green", weight=3];
12.57/4.86	252 -> 257[label="",style="dashed", color="green", weight=3];
12.57/4.86	253[label="primMinusNat (Succ (Succ yu4000)) (Succ Zero)",fontsize=16,color="black",shape="box"];253 -> 258[label="",style="solid", color="black", weight=3];
12.57/4.86	254 -> 87[label="",style="dashed", color="red", weight=0];
12.57/4.86	254[label="primMulFloat (Float (Pos (Succ (Succ Zero))) (Pos (Succ Zero))) yu10",fontsize=16,color="magenta"];254 -> 259[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	254 -> 260[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	255[label="primMinusNat (Succ Zero) (Succ Zero)",fontsize=16,color="black",shape="box"];255 -> 261[label="",style="solid", color="black", weight=3];
12.57/4.86	256 -> 138[label="",style="dashed", color="red", weight=0];
12.57/4.86	256[label="srMyInt yu90 yu81",fontsize=16,color="magenta"];256 -> 262[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	256 -> 263[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	257 -> 138[label="",style="dashed", color="red", weight=0];
12.57/4.86	257[label="srMyInt yu91 yu80",fontsize=16,color="magenta"];257 -> 264[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	257 -> 265[label="",style="dashed", color="magenta", weight=3];
12.57/4.86	258[label="primMinusNat (Succ yu4000) Zero",fontsize=16,color="black",shape="box"];258 -> 266[label="",style="solid", color="black", weight=3];
12.57/4.86	259[label="Pos (Succ (Succ Zero))",fontsize=16,color="green",shape="box"];260[label="yu10",fontsize=16,color="green",shape="box"];261[label="primMinusNat Zero Zero",fontsize=16,color="black",shape="box"];261 -> 267[label="",style="solid", color="black", weight=3];
12.57/4.86	262[label="yu90",fontsize=16,color="green",shape="box"];263[label="yu81",fontsize=16,color="green",shape="box"];264[label="yu91",fontsize=16,color="green",shape="box"];265[label="yu80",fontsize=16,color="green",shape="box"];266[label="Pos (Succ yu4000)",fontsize=16,color="green",shape="box"];267[label="Pos Zero",fontsize=16,color="green",shape="box"];}
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(6)
12.57/4.86	Complex Obligation (AND)
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(7)
12.57/4.86	Obligation:
12.57/4.86	Q DP problem:
12.57/4.86	The TRS P consists of the following rules:
12.57/4.86	
12.57/4.86	   new_primMulNat(Main.Succ(yu3000), Main.Succ(yu6000)) -> new_primMulNat(yu3000, Main.Succ(yu6000))
12.57/4.86	
12.57/4.86	R is empty.
12.57/4.86	Q is empty.
12.57/4.86	We have to consider all minimal (P,Q,R)-chains.
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(8) QDPSizeChangeProof (EQUIVALENT)
12.57/4.86	By using the subterm criterion [SUBTERM_CRITERION] together with the size-change analysis [AAECC05] we have proven that there are no infinite chains for this DP problem. 
12.57/4.86	
12.57/4.86	From the DPs we obtained the following set of size-change graphs:
12.57/4.86	*new_primMulNat(Main.Succ(yu3000), Main.Succ(yu6000)) -> new_primMulNat(yu3000, Main.Succ(yu6000))
12.57/4.86	The graph contains the following edges 1 > 1, 2 >= 2
12.57/4.86	
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(9)
12.57/4.86	YES
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(10)
12.57/4.86	Obligation:
12.57/4.86	Q DP problem:
12.57/4.86	The TRS P consists of the following rules:
12.57/4.86	
12.57/4.86	   new_primPlusNat(Main.Succ(yu700), Main.Succ(yu60000)) -> new_primPlusNat(yu700, yu60000)
12.57/4.86	
12.57/4.86	R is empty.
12.57/4.86	Q is empty.
12.57/4.86	We have to consider all minimal (P,Q,R)-chains.
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(11) QDPSizeChangeProof (EQUIVALENT)
12.57/4.86	By using the subterm criterion [SUBTERM_CRITERION] together with the size-change analysis [AAECC05] we have proven that there are no infinite chains for this DP problem. 
12.57/4.86	
12.57/4.86	From the DPs we obtained the following set of size-change graphs:
12.57/4.86	*new_primPlusNat(Main.Succ(yu700), Main.Succ(yu60000)) -> new_primPlusNat(yu700, yu60000)
12.57/4.86	The graph contains the following edges 1 > 1, 2 > 2
12.57/4.86	
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(12)
12.57/4.86	YES
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(13)
12.57/4.86	Obligation:
12.57/4.86	Q DP problem:
12.57/4.86	The TRS P consists of the following rules:
12.57/4.86	
12.57/4.86	   new_primFloatEncodePower(Main.Neg(Main.Succ(yu400))) -> new_primFloatEncodePower(Main.Pos(Main.Succ(yu400)))
12.57/4.86	   new_primFloatEncodePower(Main.Pos(Main.Succ(Main.Succ(yu4000)))) -> new_primFloatEncodePower(Main.Pos(Main.Succ(yu4000)))
12.57/4.86	   new_primFloatEncodePower(Main.Pos(Main.Succ(Main.Zero))) -> new_primFloatEncodePower(Main.Pos(Main.Zero))
12.57/4.86	
12.57/4.86	R is empty.
12.57/4.86	Q is empty.
12.57/4.86	We have to consider all minimal (P,Q,R)-chains.
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(14) DependencyGraphProof (EQUIVALENT)
12.57/4.86	The approximation of the Dependency Graph [LPAR04,FROCOS05,EDGSTAR] contains 1 SCC with 2 less nodes.
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(15)
12.57/4.86	Obligation:
12.57/4.86	Q DP problem:
12.57/4.86	The TRS P consists of the following rules:
12.57/4.86	
12.57/4.86	   new_primFloatEncodePower(Main.Pos(Main.Succ(Main.Succ(yu4000)))) -> new_primFloatEncodePower(Main.Pos(Main.Succ(yu4000)))
12.57/4.86	
12.57/4.86	R is empty.
12.57/4.86	Q is empty.
12.57/4.86	We have to consider all minimal (P,Q,R)-chains.
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(16) QDPSizeChangeProof (EQUIVALENT)
12.57/4.86	We used the following order and afs together with the size-change analysis [AAECC05] to show that there are no infinite chains for this DP problem. 
12.57/4.86	
12.57/4.86	Order:EMB rules!
12.57/4.86	
12.57/4.86	AFS: 
12.57/4.86	Main.Pos(x1)  =  x1
12.57/4.86	
12.57/4.86	Main.Succ(x1)  =  Main.Succ(x1)
12.57/4.86	
12.57/4.86	
12.57/4.86	
12.57/4.86	
12.57/4.86	
12.57/4.86	From the DPs we obtained the following set of size-change graphs:
12.57/4.86	*new_primFloatEncodePower(Main.Pos(Main.Succ(Main.Succ(yu4000)))) -> new_primFloatEncodePower(Main.Pos(Main.Succ(yu4000))) (allowed arguments on rhs = {1})
12.57/4.86	The graph contains the following edges 1 > 1
12.57/4.86	
12.57/4.86	
12.57/4.86	
12.57/4.86	We oriented the following set of usable rules [AAECC05,FROCOS05].
12.57/4.86	none
12.57/4.86	
12.57/4.86	----------------------------------------
12.57/4.86	
12.57/4.86	(17)
12.57/4.86	YES
12.79/4.96	EOF