X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Ftactics%2Ftactics.ml;h=82c343085a0c0b4ec38e35693db54acfebd4a8b5;hb=5682bf51adcde903c53a96e05475a7ded8fb255d;hp=5a2cc0e16978c792b1c0f53fc1c49f79f9e38f42;hpb=2686842a2780bffbe6b317e0fd3fdfa0a4370a48;p=helm.git

diff --git a/components/tactics/tactics.ml b/components/tactics/tactics.ml
index 5a2cc0e16..82c343085 100644
--- a/components/tactics/tactics.ml
+++ b/components/tactics/tactics.ml
@@ -27,9 +27,10 @@
 
 let absurd = NegationTactics.absurd_tac
 let apply = PrimitiveTactics.apply_tac
-let applyS = AutoTactic.applyS_tac
+let applyS = Auto.applyS_tac
 let assumption = VariousTactics.assumption_tac
 let auto = AutoTactic.auto_tac
+let cases_intros = PrimitiveTactics.cases_intros_tac
 let change = ReductionTactics.change_tac
 let clear = ProofEngineStructuralRules.clear
 let clearbody = ProofEngineStructuralRules.clearbody
@@ -37,7 +38,7 @@ let constructor = IntroductionTactics.constructor_tac
 let contradiction = NegationTactics.contradiction_tac
 let cut = PrimitiveTactics.cut_tac
 let decompose = EliminationTactics.decompose_tac
-let demodulate = Saturation.demodulate_tac
+let demodulate = Auto.demodulate_tac
 let destruct = DiscriminationTactics.destruct_tac
 let elim_intros = PrimitiveTactics.elim_intros_tac
 let elim_intros_simpl = PrimitiveTactics.elim_intros_simpl_tac
@@ -57,7 +58,7 @@ let left = IntroductionTactics.left_tac
 let letin = PrimitiveTactics.letin_tac
 let normalize = ReductionTactics.normalize_tac
 let reduce = ReductionTactics.reduce_tac
-let reflexivity = EqualityTactics.reflexivity_tac
+let reflexivity = Setoids.setoid_reflexivity_tac
 let replace = EqualityTactics.replace_tac
 let rewrite = EqualityTactics.rewrite_tac
 let rewrite_simpl = EqualityTactics.rewrite_simpl_tac