aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/funind/functional_principles_proofs.ml
diff options
context:
space:
mode:
authorGravatar Julien Forest <forest@ensiie.fr>2017-03-31 21:12:17 +0200
committerGravatar Julien Forest <forest@ensiie.fr>2017-04-04 17:41:32 +0200
commitedface9ff8462a8ecbffd03074e51f589861d88a (patch)
tree1a370b8cb4ec5cae1cc5d6b4d888afa3e6771d53 /plugins/funind/functional_principles_proofs.ml
parent043c3907f9ed23ae9b9642d2cbb651f6a29737bd (diff)
Bad correction in previous commit
Diffstat (limited to 'plugins/funind/functional_principles_proofs.ml')
-rw-r--r--plugins/funind/functional_principles_proofs.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/funind/functional_principles_proofs.ml b/plugins/funind/functional_principles_proofs.ml
index 85084badd..d6a67219f 100644
--- a/plugins/funind/functional_principles_proofs.ml
+++ b/plugins/funind/functional_principles_proofs.ml
@@ -1588,7 +1588,7 @@ let prove_principle_for_gen
match !tcc_lemma_ref with
| Undefined -> error "No tcc proof !!"
| Value lemma -> lemma
- | Not_needed -> Coqlib.build_coq_True ()
+ | Not_needed -> Coqlib.build_coq_I ()
in
(* let rec list_diff del_list check_list = *)
(* match del_list with *)