summaryrefslogtreecommitdiff
path: root/test/regress/regress0/rels/rel_transpose_5.cvc.smt2
diff options
context:
space:
mode:
Diffstat (limited to 'test/regress/regress0/rels/rel_transpose_5.cvc.smt2')
-rw-r--r--test/regress/regress0/rels/rel_transpose_5.cvc.smt218
1 files changed, 18 insertions, 0 deletions
diff --git a/test/regress/regress0/rels/rel_transpose_5.cvc.smt2 b/test/regress/regress0/rels/rel_transpose_5.cvc.smt2
new file mode 100644
index 000000000..927a5f07f
--- /dev/null
+++ b/test/regress/regress0/rels/rel_transpose_5.cvc.smt2
@@ -0,0 +1,18 @@
+; EXPECT: unsat
+(set-option :incremental false)
+(set-logic ALL)
+
+(declare-fun x () (Set (Tuple Int Int)))
+(declare-fun y () (Set (Tuple Int Int)))
+(declare-fun r () (Set (Tuple Int Int)))
+(declare-fun z () (Tuple Int Int))
+(assert (= z (mkTuple 1 2)))
+(declare-fun zt () (Tuple Int Int))
+(assert (= zt (mkTuple 2 1)))
+(assert (member zt y))
+(declare-fun w () (Tuple Int Int))
+(assert (= w (mkTuple 2 2)))
+(assert (member w y))
+(assert (member z x))
+(assert (not (member zt (transpose (join x y)))))
+(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback