summaryrefslogtreecommitdiff
path: root/test/regress/regress1/push-pop/quant-fun-proc-unmacro.smt2
blob: 7cacfca98bfbb4e3b803ddc2ec7865b49a3479a3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
; COMMAND-LINE: --incremental --fmf-fun --macros-quant --no-check-models
(set-logic UFLIA)


(define-fun f ((x Int)) Int x)

(define-fun-rec g ((x Int)) Int (ite (<= x 0) 0 (+ (g x) x)))

; EXPECT: sat
(declare-fun h (Int) Int)
(push 1)
(assert (forall ((x Int)) (= (h x) 0)))
(check-sat)
(pop 1)


; EXPECT: unsat
(push 1)
(assert (= (f 1) 2))
(check-sat)
(pop 1)

; EXPECT: unsat
(push 1)
(assert (= (g 1) 5))
(check-sat)
(pop 1)

; EXPECT: sat
(push 1)
(assert (= (h 1) 5))
(check-sat)
(pop 1)

generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback