summaryrefslogtreecommitdiff
path: root/test/regress/regress1/rels/rel_complex_3.cvc.smt2
diff options
context:
space:
mode:
Diffstat (limited to 'test/regress/regress1/rels/rel_complex_3.cvc.smt2')
-rw-r--r--test/regress/regress1/rels/rel_complex_3.cvc.smt236
1 files changed, 36 insertions, 0 deletions
diff --git a/test/regress/regress1/rels/rel_complex_3.cvc.smt2 b/test/regress/regress1/rels/rel_complex_3.cvc.smt2
new file mode 100644
index 000000000..ccd152268
--- /dev/null
+++ b/test/regress/regress1/rels/rel_complex_3.cvc.smt2
@@ -0,0 +1,36 @@
+; EXPECT: unsat
+(set-option :incremental true)
+(set-logic ALL)
+
+(declare-fun x () (Set (Tuple Int Int)))
+(declare-fun y () (Set (Tuple Int Int)))
+(declare-fun z () (Set (Tuple Int Int)))
+(declare-fun r () (Set (Tuple Int Int)))
+(declare-fun w () (Set (Tuple Int Int)))
+(declare-fun f () (Tuple Int Int))
+(assert (= f (mkTuple 3 1)))
+(assert (member f x))
+(declare-fun g () (Tuple Int Int))
+(assert (= g (mkTuple 1 3)))
+(assert (member g y))
+(declare-fun h () (Tuple Int Int))
+(assert (= h (mkTuple 3 5)))
+(assert (member h x))
+(assert (member h y))
+(assert (= r (join x y)))
+(declare-fun e () (Tuple Int Int))
+(assert (not (member e r)))
+(assert (not (= z (intersection x y))))
+(assert (= z (setminus x y)))
+(assert (subset x y))
+(assert (member e (join r z)))
+(assert (member e x))
+(assert (member e (intersection x y)))
+(push 1)
+
+(assert true)
+
+(check-sat)
+
+(pop 1)
+
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback