details

property	value
status	complete
benchmark	abs_2.hs
ran by	Akihisa Yamada
cpu timeout	1200 seconds
wallclock timeout	300 seconds
memory limit	137438953472 bytes
execution host	n045.star.cs.uiowa.edu
space	basic_haskell

run statistics

property	value
solver	AProVE
configuration	standard
runtime (wallclock)	4.62896 seconds
cpu usage	11.1534
user time	10.8183
system time	0.335096
max virtual memory	1.8285568E7
max residence set size	621360.0

stage attributes

key	value
starexec-result	YES

output

8.85/4.00 YES 10.82/4.55 proof of /export/starexec/sandbox/benchmark/theBenchmark.hs 10.82/4.55 # AProVE Commit ID: 48fb2092695e11cc9f56e44b17a92a5f88ffb256 marcel 20180622 unpublished dirty 10.82/4.55 10.82/4.55 10.82/4.55 H-Termination with start terms of the given HASKELL could be proven: 10.82/4.55 10.82/4.55 (0) HASKELL 10.82/4.55 (1) BR [EQUIVALENT, 0 ms] 10.82/4.55 (2) HASKELL 10.82/4.55 (3) COR [EQUIVALENT, 0 ms] 10.82/4.55 (4) HASKELL 10.82/4.55 (5) Narrow [SOUND, 0 ms] 10.82/4.55 (6) QDP 10.82/4.55 (7) QDPSizeChangeProof [EQUIVALENT, 0 ms] 10.82/4.55 (8) YES 10.82/4.55 10.82/4.55 10.82/4.55 ---------------------------------------- 10.82/4.55 10.82/4.55 (0) 10.82/4.55 Obligation: 10.82/4.55 mainModule Main 10.82/4.55 module Main where { 10.82/4.55 import qualified Prelude; 10.82/4.55 data Float = Float MyInt MyInt ; 10.82/4.55 10.82/4.55 data MyBool = MyTrue | MyFalse ; 10.82/4.55 10.82/4.55 data MyInt = Pos Main.Nat | Neg Main.Nat ; 10.82/4.55 10.82/4.55 data Main.Nat = Succ Main.Nat | Zero ; 10.82/4.55 10.82/4.55 data Ordering = LT | EQ | GT ; 10.82/4.55 10.82/4.55 absFloat :: Float -> Float; 10.82/4.55 absFloat = absReal; 10.82/4.55 10.82/4.55 absReal x = absReal2 x; 10.82/4.55 10.82/4.55 absReal0 x MyTrue = negateFloat x; 10.82/4.55 10.82/4.55 absReal1 x MyTrue = x; 10.82/4.55 absReal1 x MyFalse = absReal0 x otherwise; 10.82/4.55 10.82/4.55 absReal2 x = absReal1 x (gtEsFloat x (fromIntFloat (Main.Pos Main.Zero))); 10.82/4.55 10.82/4.55 compareFloat :: Float -> Float -> Ordering; 10.82/4.55 compareFloat = primCmpFloat; 10.82/4.55 10.82/4.55 compareMyInt :: MyInt -> MyInt -> Ordering; 10.82/4.55 compareMyInt = primCmpInt; 10.82/4.55 10.82/4.55 fromIntFloat :: MyInt -> Float; 10.82/4.55 fromIntFloat = primIntToFloat; 10.82/4.55 10.82/4.55 fsEsOrdering :: Ordering -> Ordering -> MyBool; 10.82/4.55 fsEsOrdering LT LT = MyFalse; 10.82/4.55 fsEsOrdering EQ EQ = MyFalse; 10.82/4.55 fsEsOrdering GT GT = MyFalse; 10.82/4.55 fsEsOrdering _ _ = MyTrue; 10.82/4.55 10.82/4.55 gtEsFloat :: Float -> Float -> MyBool; 10.82/4.55 gtEsFloat x y = fsEsOrdering (compareFloat x y) LT; 10.82/4.55 10.82/4.55 negateFloat :: Float -> Float; 10.82/4.55 negateFloat = primNegFloat; 10.82/4.55 10.82/4.55 negateMyInt :: MyInt -> MyInt; 10.82/4.55 negateMyInt = primNegInt; 10.82/4.55 10.82/4.55 otherwise :: MyBool; 10.82/4.55 otherwise = MyTrue; 10.82/4.55 10.82/4.55 primCmpFloat :: Float -> Float -> Ordering; 10.82/4.55 primCmpFloat (Float x1 x2) (Float y1 y2) = compareMyInt (srMyInt x1 y1) (srMyInt x2 y2); 10.82/4.55 10.82/4.55 primCmpInt :: MyInt -> MyInt -> Ordering; 10.82/4.55 primCmpInt (Main.Pos Main.Zero) (Main.Pos Main.Zero) = EQ; 10.82/4.55 primCmpInt (Main.Pos Main.Zero) (Main.Neg Main.Zero) = EQ; 10.82/4.55 primCmpInt (Main.Neg Main.Zero) (Main.Pos Main.Zero) = EQ; 10.82/4.55 primCmpInt (Main.Neg Main.Zero) (Main.Neg Main.Zero) = EQ; 10.82/4.55 primCmpInt (Main.Pos x) (Main.Pos y) = primCmpNat x y; 10.82/4.55 primCmpInt (Main.Pos x) (Main.Neg y) = GT; 10.82/4.55 primCmpInt (Main.Neg x) (Main.Pos y) = LT; 10.82/4.55 primCmpInt (Main.Neg x) (Main.Neg y) = primCmpNat y x; 10.82/4.55 10.82/4.55 primCmpNat :: Main.Nat -> Main.Nat -> Ordering; 10.82/4.55 primCmpNat Main.Zero Main.Zero = EQ; 10.82/4.55 primCmpNat Main.Zero (Main.Succ y) = LT; 10.82/4.55 primCmpNat (Main.Succ x) Main.Zero = GT; 10.82/4.55 primCmpNat (Main.Succ x) (Main.Succ y) = primCmpNat x y; 10.82/4.55 10.82/4.55 primIntToFloat :: MyInt -> Float; 10.82/4.55 primIntToFloat x = Float x (Main.Pos (Main.Succ Main.Zero)); 10.82/4.55 10.82/4.55 primMulInt :: MyInt -> MyInt -> MyInt; 10.82/4.55 primMulInt (Main.Pos x) (Main.Pos y) = Main.Pos (primMulNat x y); 10.82/4.55 primMulInt (Main.Pos x) (Main.Neg y) = Main.Neg (primMulNat x y); 10.82/4.55 primMulInt (Main.Neg x) (Main.Pos y) = Main.Neg (primMulNat x y); popout

output may be truncated. 'popout' for the full output.

job log

popout

actions

all output return to Haskell 2019-04-01 06.52