X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Ftactics%2Ftactics.ml;h=ee59af34906a52865838d20531a1888f56e9fe93;hb=827e35d6058ebba3a4a4fa6eb3c160f0cd0fd1e8;hp=fc2c1c75dc39e7e4d54cd1e188183d95b4270042;hpb=df0606d3bcbc41272fcde2d013bbe0b1aadf98af;p=helm.git

diff --git a/helm/ocaml/tactics/tactics.ml b/helm/ocaml/tactics/tactics.ml
index fc2c1c75d..ee59af349 100644
--- a/helm/ocaml/tactics/tactics.ml
+++ b/helm/ocaml/tactics/tactics.ml
@@ -27,7 +27,7 @@ let absurd = NegationTactics.absurd_tac
 let apply = PrimitiveTactics.apply_tac
 let assumption = VariousTactics.assumption_tac
 let auto = AutoTactic.auto_tac
-let change = PrimitiveTactics.change_tac
+let change = ReductionTactics.change_tac
 let clear = ProofEngineStructuralRules.clear
 let clearbody = ProofEngineStructuralRules.clearbody
 let compare = DiscriminationTactics.compare_tac
@@ -50,6 +50,7 @@ let generalize = VariousTactics.generalize_tac
 let id = Tacticals.id_tac
 let injection = DiscriminationTactics.injection_tac
 let intros = PrimitiveTactics.intros_tac
+let inversion = Inversion.inversion_tac
 let lapply = FwdSimplTactic.lapply_tac
 let left = IntroductionTactics.left_tac
 let letin = PrimitiveTactics.letin_tac
@@ -58,8 +59,6 @@ let reduce = ReductionTactics.reduce_tac
 let reflexivity = EqualityTactics.reflexivity_tac
 let replace = EqualityTactics.replace_tac
 let rewrite = EqualityTactics.rewrite_tac
-let rewrite_back = EqualityTactics.rewrite_back_tac
-let rewrite_back_simpl = EqualityTactics.rewrite_back_simpl_tac
 let rewrite_simpl = EqualityTactics.rewrite_simpl_tac
 let right = IntroductionTactics.right_tac
 let ring = Ring.ring_tac
@@ -68,4 +67,5 @@ let simpl = ReductionTactics.simpl_tac
 let split = IntroductionTactics.split_tac
 let symmetry = EqualityTactics.symmetry_tac
 let transitivity = EqualityTactics.transitivity_tac
+let unfold = ReductionTactics.unfold_tac
 let whd = ReductionTactics.whd_tac