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

diff --git a/helm/ocaml/tactics/tactics.ml b/helm/ocaml/tactics/tactics.ml
index fc2c1c75d..f6c166268 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
@@ -58,8 +58,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