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

diff --git a/helm/ocaml/tactics/tactics.ml b/helm/ocaml/tactics/tactics.ml
index ee59af349..d70df41f5 100644
--- a/helm/ocaml/tactics/tactics.ml
+++ b/helm/ocaml/tactics/tactics.ml
@@ -23,6 +23,8 @@
  * http://cs.unibo.it/helm/.
  *)
 
+(* $Id$ *)
+
 let absurd = NegationTactics.absurd_tac
 let apply = PrimitiveTactics.apply_tac
 let assumption = VariousTactics.assumption_tac
@@ -36,6 +38,7 @@ let contradiction = NegationTactics.contradiction_tac
 let cut = PrimitiveTactics.cut_tac
 let decide_equality = DiscriminationTactics.decide_equality_tac
 let decompose = EliminationTactics.decompose_tac
+let demodulate = Indexing.demodulate_tac
 let discriminate = DiscriminationTactics.discriminate_tac
 let elim_intros = PrimitiveTactics.elim_intros_tac
 let elim_intros_simpl = PrimitiveTactics.elim_intros_simpl_tac