X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Ftactics%2Ftactics.ml;h=1fb1f8de5097fb5bcbaf625c9070e2044849b416;hb=25564c06c570e5ab9be455904c0b381842f8d4c4;hp=b941a8752a3b1d9c36b340717d054ec09ac87bd4;hpb=6beda5aa100b617b75d88a5a519b5022c99208a0;p=helm.git

diff --git a/helm/software/components/tactics/tactics.ml b/helm/software/components/tactics/tactics.ml
index b941a8752..1fb1f8de5 100644
--- a/helm/software/components/tactics/tactics.ml
+++ b/helm/software/components/tactics/tactics.ml
@@ -27,6 +27,7 @@
 
 let absurd = NegationTactics.absurd_tac
 let apply = PrimitiveTactics.apply_tac
+let applyP = PrimitiveTactics.applyP_tac
 let applyS = Auto.applyS_tac
 let assumption = VariousTactics.assumption_tac
 let auto = Auto.auto_tac
@@ -49,7 +50,7 @@ let fail = Tacticals.fail_tac
 let fold = ReductionTactics.fold_tac
 let fourier = FourierR.fourier_tac
 let fwd_simpl = FwdSimplTactic.fwd_simpl_tac
-let generalize = VariousTactics.generalize_tac
+let generalize = PrimitiveTactics.generalize_tac
 let id = Tacticals.id_tac
 let intros = PrimitiveTactics.intros_tac
 let inversion = Inversion.inversion_tac
@@ -64,7 +65,6 @@ let rewrite_simpl = EqualityTactics.rewrite_simpl_tac
 let right = IntroductionTactics.right_tac
 let ring = Ring.ring_tac
 let simpl = ReductionTactics.simpl_tac
-let solve_rewrite = Auto.solve_rewrite_tac
 let split = IntroductionTactics.split_tac
 let symmetry = EqualityTactics.symmetry_tac
 let transitivity = EqualityTactics.transitivity_tac