diff options
author | Quentin Garchery <garchery.quentin@gmail.com> | 2018-10-27 20:08:44 +0200 |
---|---|---|
committer | Valentin Blot <24938579+vblot@users.noreply.github.com> | 2018-10-28 00:39:25 +0200 |
commit | faaa2848c37444f8f37ac432c25f9f813e1df39b (patch) | |
tree | 2672d165fd13b5262005406d1496bc6a14e8b521 /src/lia/lia.ml | |
parent | 7940ef63c654be26b41ce20162207f3c67d0b10a (diff) | |
download | smtcoq-faaa2848c37444f8f37ac432c25f9f813e1df39b.tar.gz smtcoq-faaa2848c37444f8f37ac432c25f9f813e1df39b.zip |
Adding support for lemmas in the command verit
Diffstat (limited to 'src/lia/lia.ml')
-rw-r--r-- | src/lia/lia.ml | 1 |
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) |