added support for goal patterns

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

diff --git a/helm/ocaml/tactics/tactics.ml b/helm/ocaml/tactics/tactics.ml
index 5bbb01645a20ea1b6705f15f6161a7e6ea076d9c..60c60c7ff53a51b64d82534fdc6d2ad5c2608439 100644 (file)
--- a/helm/ocaml/tactics/tactics.ml
+++ b/helm/ocaml/tactics/tactics.ml
@@ -36,33 +36,33 @@ let cut = PrimitiveTactics.cut_tac
 let decide_equality = DiscriminationTactics.decide_equality_tac
 let decompose = EliminationTactics.decompose_tac
 let discriminate = DiscriminationTactics.discriminate_tac
-let elim_intros_simpl = PrimitiveTactics.elim_intros_simpl_tac
 let elim_intros = PrimitiveTactics.elim_intros_tac
+let elim_intros_simpl = PrimitiveTactics.elim_intros_simpl_tac
 let elim_type = EliminationTactics.elim_type_tac
 let exact = PrimitiveTactics.exact_tac
 let exists = IntroductionTactics.exists_tac
 let fold = ReductionTactics.fold_tac
 let fourier = FourierR.fourier_tac
+let fwd_simpl = FwdSimplTactic.fwd_simpl_tac
 let generalize = VariousTactics.generalize_tac
-let set_goal = VariousTactics.set_goal
 let injection = DiscriminationTactics.injection_tac
 let intros = PrimitiveTactics.intros_tac
+let lapply = FwdSimplTactic.lapply_tac
 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 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 = EqualityTactics.rewrite_tac
 let rewrite_simpl = EqualityTactics.rewrite_simpl_tac
 let right = IntroductionTactics.right_tac
 let ring = Ring.ring_tac
+let set_goal = VariousTactics.set_goal
 let simpl = ReductionTactics.simpl_tac
 let split = IntroductionTactics.split_tac
 let symmetry = EqualityTactics.symmetry_tac
 let transitivity = EqualityTactics.transitivity_tac
 let whd = ReductionTactics.whd_tac
-let normalize = ReductionTactics.normalize_tac
-let fwd_simpl = FwdSimplTactic.fwd_simpl_tac
-let lapply = FwdSimplTactic.lapply_tac