summaryrefslogtreecommitdiff
path: root/test/regress/regress0/rels/rel_transpose_1.cvc.smt2
blob: fb7070e82637e761c1567fab0775b6822c1a48c1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
; EXPECT: unsat
(set-option :incremental false)
(set-logic ALL)

(declare-fun x () (Set (Tuple Int Int Int)))
(declare-fun y () (Set (Tuple Int Int Int)))
(declare-fun z () (Tuple Int Int Int))
(assert (= z (tuple 1 2 3)))
(declare-fun zt () (Tuple Int Int Int))
(assert (= zt (tuple 3 2 1)))
(assert (member z x))
(assert (not (member zt (transpose x))))
(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback