+(* ALB needed for paramodulation... *)
+val new_metasenv_for_apply:
+ int -> ProofEngineTypes.proof -> Cic.context -> Cic.term ->
+ Cic.term * Cic.metasenv * Cic.term list * int
+
+(* not a real tactic *)
+val apply_tac_verbose :
+ term:Cic.term ->
+ ProofEngineTypes.proof * int ->
+ (Cic.term -> Cic.term) * (ProofEngineTypes.proof * int list)
+