diff options
| author | Andrew Reynolds <andrew.j.reynolds@gmail.com> | 2018-02-15 15:31:48 -0600 |
|---|---|---|
| committer | Aina Niemetz <aina.niemetz@gmail.com> | 2018-02-15 13:31:48 -0800 |
| commit | 55037e0bcef45c795f28ff3fcf6c1055af465c70 (patch) | |
| tree | 397d89bd10e541e1206c5dafdb8cf731feb34730 /test/regress/regress2/bug674.smt2 | |
| parent | 52a39aca19b7238d08c3cebcfa46436a73194008 (diff) | |
Refactor regressions (#1581)
Diffstat (limited to 'test/regress/regress2/bug674.smt2')
| -rw-r--r-- | test/regress/regress2/bug674.smt2 | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/test/regress/regress2/bug674.smt2 b/test/regress/regress2/bug674.smt2 new file mode 100644 index 000000000..fccde862a --- /dev/null +++ b/test/regress/regress2/bug674.smt2 @@ -0,0 +1,28 @@ +; COMMAND-LINE: --quant-ind --incremental --rewrite-divk +(set-logic ALL_SUPPORTED) +(declare-datatypes ((Lst 0)) (((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) + + |