diff options
Diffstat (limited to 'test/regress/regress1/rels/rel_complex_5.cvc.smt2')
-rw-r--r-- | test/regress/regress1/rels/rel_complex_5.cvc.smt2 | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/test/regress/regress1/rels/rel_complex_5.cvc.smt2 b/test/regress/regress1/rels/rel_complex_5.cvc.smt2 new file mode 100644 index 000000000..dfbc23c8e --- /dev/null +++ b/test/regress/regress1/rels/rel_complex_5.cvc.smt2 @@ -0,0 +1,42 @@ +; 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 a () (Tuple Int)) +(assert (= a (mkTuple 1))) +(declare-fun e () (Tuple Int Int)) +(assert (= e (mkTuple 1 1))) +(assert (let ((_let_1 (singleton a))) (= w (product _let_1 _let_1)))) +(assert (subset (transpose w) y)) +(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) + |