diff options
| author | Andrew Reynolds <andrew.j.reynolds@gmail.com> | 2017-11-23 20:07:19 -0600 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2017-11-23 20:07:19 -0600 |
| commit | 612509379a1417f8d4a5e001ff143ba819f5516f (patch) | |
| tree | 764c379a42fa29ec36d9c83d448901c975e2fa29 /test/regress/regress0/ho/ho-matching-enum-2.smt2 | |
| parent | c9ae6b9812e737ae7932df91fa5f334d6d2588d4 (diff) | |
Ho parsing and regressions (#1350)
Diffstat (limited to 'test/regress/regress0/ho/ho-matching-enum-2.smt2')
| -rw-r--r-- | test/regress/regress0/ho/ho-matching-enum-2.smt2 | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/test/regress/regress0/ho/ho-matching-enum-2.smt2 b/test/regress/regress0/ho/ho-matching-enum-2.smt2 new file mode 100644 index 000000000..9581e4c4f --- /dev/null +++ b/test/regress/regress0/ho/ho-matching-enum-2.smt2 @@ -0,0 +1,18 @@ +; COMMAND-LINE: --uf-ho +; EXPECT: unsat +(set-logic ALL) +(set-info :status unsat) + +(declare-sort U 0) + +(declare-fun p (Int) Bool) +(declare-fun q (Int) Bool) +(declare-fun k (Int Int) Int) + +(assert (q (k 0 1))) +(assert (not (p (k 0 0)))) + +(assert (forall ((f (-> Int Int Int)) (y Int) (z Int)) (or (p (f y z)) (not (q (f z y)))))) + +(check-sat) +(exit) |