summaryrefslogtreecommitdiff
path: root/test/smt/arith_C128FL.unsat.sail
diff options
context:
space:
mode:
authorAlasdair2019-04-12 22:46:30 +0100
committerAlasdair2019-04-13 01:12:23 +0100
commite89581c010b88de474f3f31748cb815a3b21d1af (patch)
tree45f584aa6e619d48da67b23444a0432d3cff016a /test/smt/arith_C128FL.unsat.sail
parentc6e9b167b43332464f8d066034bf4604cb37d182 (diff)
SMT: More builtins
Add some tests for arithmetic operations. Some tests fail in either Z3 or CVC4 currently, due to how overflow is handled.
Diffstat (limited to 'test/smt/arith_C128FL.unsat.sail')
-rw-r--r--test/smt/arith_C128FL.unsat.sail34
1 files changed, 34 insertions, 0 deletions
diff --git a/test/smt/arith_C128FL.unsat.sail b/test/smt/arith_C128FL.unsat.sail
new file mode 100644
index 00000000..3a323452
--- /dev/null
+++ b/test/smt/arith_C128FL.unsat.sail
@@ -0,0 +1,34 @@
+default Order dec
+
+$include <prelude.sail>
+
+$option -smt_ignore_overflow
+
+$property
+function prop forall 'n, 0 <= 'n <= 128. (x: int(128), y: int('n), z: int) -> bool = {
+ let lo = -100000000000;
+ let hi = 100000000000;
+ if lo >= x | x >= hi | lo >= y | y >= hi | lo >= z | z >= hi then {
+ return(true)
+ };
+
+ let add_comm = x + y == y + x;
+ let add_assoc = (x + y) + z == x + (y + z);
+ let add_id = x + 0 == x;
+
+ let mul_comm = x * y == y * x;
+ let mul_assoc = (x * y) * z == x * (y * z);
+ let mul_zero = x * 0 == 0;
+
+ let add_mul_distrib = x * (y + z) == (x * y) + (x * z);
+
+ let add_neg_zero = x + negate(x) == 0;
+ let add_neg_sub = x + negate(y) == x - y;
+ let neg_neg = negate(negate(x)) == x;
+
+ add_assoc
+ /* add_comm & add_assoc & add_id
+ & mul_comm & mul_assoc & mul_zero
+ & add_mul_distrib
+ & add_neg_zero & add_neg_sub & neg_neg */
+} \ No newline at end of file