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

diff --git a/helm/ocaml/tactics/proofEngineHelpers.mli b/helm/ocaml/tactics/proofEngineHelpers.mli
index 0e2244f43..652776262 100644
--- a/helm/ocaml/tactics/proofEngineHelpers.mli
+++ b/helm/ocaml/tactics/proofEngineHelpers.mli
@@ -29,15 +29,9 @@
 (* [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 ->