diff options
| author |  Julien Forest <forest@ensiie.fr> | 2017-03-31 19:48:03 +0200 |
|---|---|---|
| committer | Julien Forest <forest@ensiie.fr> | 2017-04-04 17:41:32 +0200 |
| commit | 043c3907f9ed23ae9b9642d2cbb651f6a29737bd (patch) | |
| tree | cbfe95dd6ec16893db15da44c8bad1634b73e3f3 /plugins/funind/functional_principles_proofs.mli | |
| parent | 59f5391576aca91400f506adfc7f1a1965f79069 (diff) | |
Solving first problem in bug #4306. TO DO : solve the let in problem
Diffstat (limited to 'plugins/funind/functional_principles_proofs.mli')
| -rw-r--r-- | plugins/funind/functional_principles_proofs.mli | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/funind/functional_principles_proofs.mli b/plugins/funind/functional_principles_proofs.mli index 34ce66967..e11cd9eac 100644 --- a/plugins/funind/functional_principles_proofs.mli +++ b/plugins/funind/functional_principles_proofs.mli @@ -9,7 +9,7 @@ val prove_princ_for_struct : val prove_principle_for_gen : constant*constant*constant -> (* name of the function, the functional and the fixpoint equation *) - constr option ref -> (* a pointer to the obligation proofs lemma *) + Indfun_common.tcc_lemma_value ref -> (* a pointer to the obligation proofs lemma *) bool -> (* is that function uses measure *) int -> (* the number of recursive argument *) types -> (* the type of the recursive argument *) |