summaryrefslogtreecommitdiff
path: root/test/regress/regress0/quantifiers/issue7353-var-elim-par-dt.smt2
blob: 8c9d9eb66684dc46f357cae17b0ab27ece4159b6 (plain)
1
2
3
4
5
6
7
8
9
(set-logic ALL)
(set-info :status sat)
(declare-datatype Option (par (T) ((none) (some (extractSome T)))))
(assert
 (forall ((x (Option Int)))
         (=> (and ((_ is some) x)
                  (= (extractSome x) 0))
             (= x (some 0)))))
(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback