diff options
Diffstat (limited to 'test/regress/regress0/push-pop/bug674.smt2')
| -rw-r--r-- | test/regress/regress0/push-pop/bug674.smt2 | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/test/regress/regress0/push-pop/bug674.smt2 b/test/regress/regress0/push-pop/bug674.smt2 new file mode 100644 index 000000000..967681ec3 --- /dev/null +++ b/test/regress/regress0/push-pop/bug674.smt2 @@ -0,0 +1,28 @@ +; COMMAND-LINE: --quant-ind --incremental --rewrite-divk +(set-logic ALL_SUPPORTED) +(declare-datatypes () ((Lst (cons (head Int) (tail Lst)) (nil)))) +(define-fun-rec app ((l1 Lst) (l2 Lst)) Lst (ite (is-nil l1) l2 (cons (head l1) (app (tail l1) l2)))) +(define-fun-rec rev ((l Lst)) Lst (ite (is-nil l) nil (app (rev (tail l)) (cons (head l) nil)))) +; EXPECT: unsat +(push 1) +(assert (not (=> true (and (forall (($l1$0 Lst) ($l2$0 Lst) ($l3$0 Lst)) (= (app $l1$0 (app $l2$0 $l3$0)) (app (app $l1$0 $l2$0) $l3$0))))))) +(check-sat) +(pop 1) + +(assert (forall (($l1$0 Lst) ($l2$0 Lst) ($l3$0 Lst)) (= (app $l1$0 (app $l2$0 $l3$0)) (app (app $l1$0 $l2$0) $l3$0)))) + +; EXPECT: unsat +(push 1) +(assert (not (=> true (and (forall (($l1$0 Lst) ($l2$0 Lst)) (= (rev (app $l1$0 $l2$0)) (app (rev $l2$0) (rev $l1$0)))))))) +(check-sat) +(pop 1) + +(assert (forall (($l1$0 Lst) ($l2$0 Lst)) (= (rev (app $l1$0 $l2$0)) (app (rev $l2$0) (rev $l1$0))))) + +; EXPECT: unsat +(push 1) +(assert (not (=> true (and (forall (($l1$0 Lst)) (= (rev (rev $l1$0)) $l1$0)))))) +(check-sat) +(pop 1) + + |