summaryrefslogtreecommitdiff
path: root/test/regress/regress0/issue1063-overloading-dt-cons.smt2
blob: a77fcdd224687af0afe11e7e662695bfa12a0f16 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
; EXPECT: sat
(set-logic ALL)
(set-info :status sat)
(declare-datatypes ((Enum0 0)) (((In_Air) (On_Ground) (None))))
(declare-datatypes ((Enum1 0)) (((True) (False) (None))))
(declare-fun var_0 (Int) Enum0)
(declare-fun var_1 (Int) Enum1)
(assert (= (var_0 0) (as None Enum0)))
(assert (= (var_1 1) (as None Enum1)))
(assert (not ((_ is In_Air) (var_0 0))))
(declare-fun var_2 () Enum1)
(assert ((_ is (as None Enum1)) var_2))
(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback