summaryrefslogtreecommitdiff
path: root/test/regress/regress0/fmf/fmc_unsound_model.smt2
diff options
context:
space:
mode:
Diffstat (limited to 'test/regress/regress0/fmf/fmc_unsound_model.smt2')
-rw-r--r--test/regress/regress0/fmf/fmc_unsound_model.smt227
1 files changed, 27 insertions, 0 deletions
diff --git a/test/regress/regress0/fmf/fmc_unsound_model.smt2 b/test/regress/regress0/fmf/fmc_unsound_model.smt2
new file mode 100644
index 000000000..813f89732
--- /dev/null
+++ b/test/regress/regress0/fmf/fmc_unsound_model.smt2
@@ -0,0 +1,27 @@
+; COMMAND-LINE: --finite-model-find
+; EXPECT: sat
+; this problem produced a model where incorrectly card(a)=1 due to --mbqi=fmc
+(set-logic ALL_SUPPORTED)
+
+(declare-sort a 0)
+(declare-datatypes () ((tree (Leaf (lab a)))))
+
+(declare-sort alpha 0)
+(declare-fun alphabet (tree a) Bool)
+(declare-fun g1 (alpha) tree)
+(declare-fun g2 (alpha) a)
+
+(assert
+ (forall ((x alpha))
+ (=>
+ (= (lab (g1 x)) (g2 x))
+ (alphabet (g1 x) (g2 x)))))
+
+(declare-fun x () a)
+(declare-fun y () a)
+; (assert (= x y))
+(assert
+ (and
+ (exists ((b alpha)) (and (= (Leaf y) (g1 b)) (= x (g2 b))))
+ (not (alphabet (Leaf y) x))))
+(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback