X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Ftactics%2FprimitiveTactics.mli;h=95ba654f50815965c1925d7a5dce63a05c043861;hb=f3ad825f16c02c0c5fca620980882e409871e6f1;hp=890874a89447507173fb3cfb19e27c286b646cb1;hpb=797f61edb93f41eb2c5e281bc9457f6bff633063;p=helm.git

diff --git a/helm/software/components/tactics/primitiveTactics.mli b/helm/software/components/tactics/primitiveTactics.mli
index 890874a89..95ba654f5 100644
--- a/helm/software/components/tactics/primitiveTactics.mli
+++ b/helm/software/components/tactics/primitiveTactics.mli
@@ -42,6 +42,15 @@ val classify_metas :
   (Cic.term * Cic.context * Cic.term) list *
   (Cic.term * Cic.context * Cic.term) list
 
+(* Not primitive, but useful for elim *)
+
+exception AllSelectedTermsMustBeConvertible;;
+
+val generalize_tac:
+ ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
+ ProofEngineTypes.lazy_pattern ->
+   ProofEngineTypes.tactic
+
 (* ALB, needed by the new paramodulation... *)
 val apply_with_subst:
   term:Cic.term -> ?subst:Cic.substitution -> ?maxmeta:int -> ProofEngineTypes.proof * int ->
@@ -88,10 +97,6 @@ val cases_intros_tac:
 
 (* FG *)
 
-(* inserts a hole in the context *)
-val letout_tac:
-  ProofEngineTypes.tactic 
-
 val mk_predicate_for_elim: 
  context:Cic.context -> metasenv:Cic.metasenv -> 
  ugraph:CicUniv.universe_graph -> goal:Cic.term ->