-(* ALB, needed by the new paramodulation... *)
-val apply_tac_verbose_with_subst:
- term:Cic.term -> ProofEngineTypes.proof * int ->
- Cic.substitution * (ProofEngineTypes.proof * int list)
+(**** useful only to implement tactics similar to apply ****)
+
+val generalize_exp_named_subst_with_fresh_metas :
+ Cic.context ->
+ int ->
+ UriManager.uri ->
+ (UriManager.uri * Cic.term) list ->
+ int * Cic.metasenv *
+ Cic.term Cic.explicit_named_substitution *
+ Cic.term Cic.explicit_named_substitution
+
+val classify_metas :
+ Cic.term ->
+ (Cic.term -> bool) ->
+ (Cic.context -> Cic.term -> Cic.term) ->
+ (Cic.term * Cic.context * Cic.term) list ->
+ (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