From 2dcccc3d0f1d0933c304bb0e61391c971afc1efd Mon Sep 17 00:00:00 2001
From: Andrew Reynolds <andrew.j.reynolds@gmail.com>
Date: Thu, 8 Apr 2021 05:05:43 -0500
Subject: [PATCH] Add benchmark for issue 4400 (#6288)

Fixes #4400.
---
 test/regress/CMakeLists.txt                   |  3 +-
 .../quantifiers/issue4400-2-already-conf.smt2 | 44 +++++++++++++++++++
 2 files changed, 46 insertions(+), 1 deletion(-)
 create mode 100644 test/regress/regress1/quantifiers/issue4400-2-already-conf.smt2

diff --git a/test/regress/CMakeLists.txt b/test/regress/CMakeLists.txt
index 83f1c7d84..080030a7e 100644
--- a/test/regress/CMakeLists.txt
+++ b/test/regress/CMakeLists.txt
@@ -1763,8 +1763,9 @@ set(regress_1_tests
   regress1/quantifiers/issue4243-prereg-inc.smt2
   regress1/quantifiers/issue4290-cegqi-r.smt2
   regress1/quantifiers/issue4328-nqe.smt2
-  regress1/quantifiers/issue4420-order-sensitive.smt2
+  regress1/quantifiers/issue4400-2-already-conf.smt2
   regress1/quantifiers/issue4412-cegqi-type.smt2
+  regress1/quantifiers/issue4420-order-sensitive.smt2
   regress1/quantifiers/issue4433-nqe.smt2
   regress1/quantifiers/issue4620-erq-witness-unsound.smt2
   regress1/quantifiers/issue4685-wrewrite.smt2
diff --git a/test/regress/regress1/quantifiers/issue4400-2-already-conf.smt2 b/test/regress/regress1/quantifiers/issue4400-2-already-conf.smt2
new file mode 100644
index 000000000..1eedb6921
--- /dev/null
+++ b/test/regress/regress1/quantifiers/issue4400-2-already-conf.smt2
@@ -0,0 +1,44 @@
+(set-logic ALL)
+(set-info :status unsat)
+(declare-datatypes ((ap 0)) (((bp) (cp (p (_ BitVec 2)) (dp (_ BitVec 2))
+  (leftp ap) (aap ap)))))
+(declare-datatypes ((ep 0)) (((kp) (fp (jp ep) (gp (_ BitVec 2))))))
+(declare-fun mp (ap) Bool)
+(declare-fun op (ap) (_ BitVec 2))
+(declare-fun abp1 () ap)
+(declare-fun acp2 ((_ BitVec 2) ap) ap)
+(declare-fun qp ((_ BitVec 2) ap ap) ap)
+(declare-fun rp (ep ap) ap)
+(declare-fun adp (ap ap) ap)
+(declare-fun abp9 () ap)
+(declare-sort sp 0)
+(declare-fun mpae (sp) ap)
+(declare-sort tp 0)
+(declare-fun opu (tp) ap)
+(declare-sort up2 0)
+(declare-fun acp2v (up2) (_ BitVec 2))
+(declare-fun acp2w (up2) ap)
+(declare-fun qpag (up2) (_ BitVec 2))
+(declare-fun qpah (up2) ap)
+(declare-fun qpai (up2) ap)
+(declare-fun adpan (up2) ap)
+(declare-fun adpao (up2) ap)
+(assert (forall ((i sp)) (= (mp (mpae i)) (ite ((_ is bp) (mpae i)) true (mp
+  (aap (mpae i)))) true (ite ((_ is cp) (mpae i)) (exists ((z tp)) (= (opu z)
+  (mpae i))) true))))
+(assert (forall ((i up2)) (and (= (acp2w i) (adp abp9 (cp (_ bv1 2) (acp2v i)
+  bp bp))) (exists ((z up2)) (and (= (adpao z) (acp2w i)) (= (adpan z) (cp (_
+  bv1 2) (acp2v i) bp bp)))))))
+(assert (forall ((i up2)) (and (exists ((z tp)) (= (opu z) (qpah i))) (exists
+  ((z tp)) (= (opu z) (qpai i))) (= (qp (qpag i) (qpah i) (qpai i)) (ite
+  (bvslt (op (qpah i)) (op (qpai i))) (cp (bvadd (op (qpai i)) (_ bv1 2))
+  (qpag i) (qpah i) (qpai i)) (cp (bvadd (op (qpah i)) (_ bv1 2)) (qpag i)
+  (qpai i) (qpah i)))))))
+(assert (forall ((i up2)) (and (exists ((z up2)) (and (= (qpag z) (dp abp1))
+  (= (qpah z) (leftp (adpan i))))) (= (adpao i) (ite ((_ is bp) (adpao i))
+  (adpan i) (qp (dp abp9) (leftp (adpan i)) (adpao i)))))))
+(assert (exists ((hp ap) (lp ep)) (not (=> (exists ((z sp)) (= hp (mpae z)))
+  (or (forall ((z up2)) (not (= hp (acp2w z)))) (mp (ite ((_ is kp) lp) hp (rp
+  (jp lp) (acp2 (gp lp) hp)))) (forall ((z sp)) (not (= (mpae z) (ite ((_ is
+  kp) lp) hp (rp (jp lp) (acp2 (gp lp) hp)))))))))))
+(check-sat)
-- 
2.30.2