X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Ftactics%2Ftactics.ml;h=fe8adc549f67ef388656d81c3e7fcdf71c6f3cf7;hb=cbac948d507d74a558ba7f11ce10bc252b1ba8ba;hp=170d6887f857a844f2145f0886d7f01198cd081c;hpb=d4246a4c72251a9e9cdd5ddfeed19039f8153877;p=helm.git

diff --git a/helm/ocaml/tactics/tactics.ml b/helm/ocaml/tactics/tactics.ml
index 170d6887f..fe8adc549 100644
--- a/helm/ocaml/tactics/tactics.ml
+++ b/helm/ocaml/tactics/tactics.ml
@@ -38,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 = Saturation.demodulate_tac
 let discriminate = DiscriminationTactics.discriminate_tac
 let elim_intros = PrimitiveTactics.elim_intros_tac
 let elim_intros_simpl = PrimitiveTactics.elim_intros_simpl_tac