X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Ftactics%2FproofEngineHelpers.mli;h=5a4f145f995a07c1130f0b05460178fa2dd59f60;hb=b4a7a577a04c56a68b6d79d06fdb925ff0bbd331;hp=0e2244f430d789c66580e03a03b3c27444204708;hpb=bac72fcaa876137ab7a5630e0c1badc2a627dce8;p=helm.git

diff --git a/helm/ocaml/tactics/proofEngineHelpers.mli b/helm/ocaml/tactics/proofEngineHelpers.mli
index 0e2244f43..5a4f145f9 100644
--- a/helm/ocaml/tactics/proofEngineHelpers.mli
+++ b/helm/ocaml/tactics/proofEngineHelpers.mli
@@ -23,21 +23,9 @@
  * http://cs.unibo.it/helm/.
  *)
 
-(* mk_fresh_name context name typ                      *)
-(* returns an identifier which is fresh in the context *)
-(* and that resembles [name] as much as possible.      *)
-(* [typ] will be the type of the variable              *)
-val mk_fresh_name : ProofEngineTypes.mk_fresh_name_type
-
-(* identity_relocation_list_for_metavariable i canonical_context         *)
-(* returns the identity relocation list, which is the list               *)
-(* [Rel 1 ; ... ; Rel n] where n = List.length [canonical_context]       *)
-val identity_relocation_list_for_metavariable :
-  'a option list -> Cic.term option list
-
 (* Returns the first meta whose number is above the *)
 (* number of the higher meta.                       *)
-val new_meta : proof:ProofEngineTypes.proof -> int
+val new_meta_of_proof : proof:ProofEngineTypes.proof -> int
 
 val subst_meta_in_proof :
   ProofEngineTypes.proof ->