X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Ftactics%2FprimitiveTactics.mli;h=6e0c821cca0333bfaf6b03ea5291f83ac02a6f3c;hb=115915f23df4f56832d68b2f6b5b80c5afe019fc;hp=c47c9e19a9347b662f3b22c04bdb5e4097ac78fd;hpb=2a20f24b0c51947e5b3f03d31d9ffd8ce7ee5324;p=helm.git

diff --git a/components/tactics/primitiveTactics.mli b/components/tactics/primitiveTactics.mli
index c47c9e19a..6e0c821cc 100644
--- a/components/tactics/primitiveTactics.mli
+++ b/components/tactics/primitiveTactics.mli
@@ -43,9 +43,9 @@ val classify_metas :
   (Cic.term * Cic.context * Cic.term) list
 
 (* ALB, needed by the new paramodulation... *)
-val apply_tac_verbose_with_subst:
-  term:Cic.term -> ProofEngineTypes.proof * int ->
-  Cic.substitution * (ProofEngineTypes.proof * int list)
+val apply_with_subst:
+  term:Cic.term -> ?subst:Cic.substitution -> ?maxmeta:int -> ProofEngineTypes.proof * int ->
+  Cic.substitution * (ProofEngineTypes.proof * int list) * int
 
 (* not a real tactic *)
 val apply_tac_verbose :
@@ -76,3 +76,9 @@ val elim_intros_simpl_tac:
 val elim_intros_tac:
   ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
   ?depth:int -> ?using:Cic.term -> Cic.term -> ProofEngineTypes.tactic 
+
+(* FG *)
+
+(* inserts a hole in the context *)
+val letout_tac:
+  ProofEngineTypes.tactic