aboutsummaryrefslogtreecommitdiff
path: root/plugins/funind/functional_principles_proofs.ml
diff options
context:
space:
mode:
authorGaëtan Gilbert2020-07-09 11:32:41 +0200
committerGaëtan Gilbert2020-07-09 11:32:41 +0200
commit577ec77f17a872d6bc36073ceeb3cf582fcf01c4 (patch)
tree93729a8f221b9d47269279c3672afc2b6854e1ba /plugins/funind/functional_principles_proofs.ml
parent769823c425f1b3ffc87141ede814976f6cf44128 (diff)
parent3ef2bd35926a83fbcfd34d03e1fb1db894a39627 (diff)
Merge PR #11836: [obligations] Functionalize Program state
Reviewed-by: SkySkimmer Ack-by: gares
Diffstat (limited to 'plugins/funind/functional_principles_proofs.ml')
-rw-r--r--plugins/funind/functional_principles_proofs.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/plugins/funind/functional_principles_proofs.ml b/plugins/funind/functional_principles_proofs.ml
index 14d0c04212..743afe4177 100644
--- a/plugins/funind/functional_principles_proofs.ml
+++ b/plugins/funind/functional_principles_proofs.ml
@@ -864,7 +864,8 @@ let generate_equation_lemma evd fnames f fun_num nb_params nb_args rec_args_num
Declare.Proof.by (Proofview.V82.tactic prove_replacement) lemma
in
let (_ : _ list) =
- Declare.Proof.save ~proof:lemma ~opaque:Vernacexpr.Transparent ~idopt:None
+ Declare.Proof.save_regular ~proof:lemma ~opaque:Vernacexpr.Transparent
+ ~idopt:None
in
evd