aboutsummaryrefslogtreecommitdiffstats
path: root/src/lia
diff options
context:
space:
mode:
Diffstat (limited to 'src/lia')
-rw-r--r--src/lia/lia.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lia/lia.ml b/src/lia/lia.ml
index 589d59a..e5f2fe9 100644
--- a/src/lia/lia.ml
+++ b/src/lia/lia.ml
@@ -160,6 +160,7 @@ let rec smt_Form_to_coq_micromega_formula tbl l =
failwith "Lia.smt_Form_to_coq_micromega_formula: wrong number of arguments for Fnot2"
else
smt_Form_to_coq_micromega_formula tbl l.(0)
+ | Fapp (Fforall _, _) -> assert false
in
if Form.is_pos l then v
else N(v)