New tactic cases (still to be documented).

[helm.git] / components / tactics / tactics.ml

diff --git a/components/tactics/tactics.ml b/components/tactics/tactics.ml
index f146d45e6bc1f99eedd9a0cdfe431c2236a04fa3..82c343085a0c0b4ec38e35693db54acfebd4a8b5 100644 (file)
--- a/components/tactics/tactics.ml
+++ b/components/tactics/tactics.ml
@@ -30,6 +30,7 @@ let apply = PrimitiveTactics.apply_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