]> matita.cs.unibo.it Git - helm.git/commitdiff
Porting to the new version of auto.
authorAndrea Asperti <andrea.asperti@unibo.it>
Thu, 4 Nov 2004 10:10:52 +0000 (10:10 +0000)
committerAndrea Asperti <andrea.asperti@unibo.it>
Thu, 4 Nov 2004 10:10:52 +0000 (10:10 +0000)
helm/gTopLevel/proofEngine.ml

index 25f81e37b20eedcd1375e4749787926110cb22c1..ac1119dd529285921eef4611336e7c87557242ef 100644 (file)
@@ -227,7 +227,10 @@ let fold_simpl term =
 let elim_type term = apply_tactic (EliminationTactics.elim_type_tac ~term)
 let ring () = apply_tactic Ring.ring_tac
 let fourier () = apply_tactic FourierR.fourier_tac
-let auto ~dbd () = apply_tactic (VariousTactics.auto_tac ~dbd)
+
+(* let auto ~dbd () = apply_tactic (AutoTactic.auto_tac ~dbd) *)
+let auto ~dbd () = apply_tactic (AutoTactic.auto_tac_new ~dbd)
+
 
 let rewrite_simpl term = apply_tactic (EqualityTactics.rewrite_simpl_tac ~term)
 let rewrite_back_simpl term = apply_tactic (EqualityTactics.rewrite_back_simpl_tac ~term)