X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2FmatitaEngine.ml;h=c5d36ee48359c9354b4896a3b6311759a8ed3716;hb=149bf63f62963edf8b7475668677701356ce6abc;hp=437fed32db9ee9f749c3e7c688cccb15761e3669;hpb=00583d5c57f2d242b5e7d0babbb909296705fb1f;p=helm.git

diff --git a/helm/matita/matitaEngine.ml b/helm/matita/matitaEngine.ml
index 437fed32d..c5d36ee48 100644
--- a/helm/matita/matitaEngine.ml
+++ b/helm/matita/matitaEngine.ml
@@ -40,7 +40,8 @@ let tactic_of_ast = function
   | TacticAst.Cut (_, term) -> Tactics.cut term
   | TacticAst.Elim (_, term, _) ->
       (* TODO Zack implement "using" argument *)
-      Tactics.elim_intros_simpl term
+      (* old: Tactics.elim_intros_simpl term *)
+      Tactics.elim_intros term
   | TacticAst.ElimType (_, term) -> Tactics.elim_type term
   | TacticAst.Replace (_, what, with_what) -> Tactics.replace ~what ~with_what
   | TacticAst.Auto (_,num) ->