X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2FZ%2Fmoebius.ma;h=33c9ad4be350236f679d925fe34d2d6d34dd2091;hb=32d8d8d419e0b910435da275361bb55d49bc43a9;hp=e91bf8df912b6b1748868ff8ab2d4580ac43b871;hpb=0ec069491a2e870c95e095e15d8c54c76a17bc80;p=helm.git

diff --git a/helm/software/matita/library/Z/moebius.ma b/helm/software/matita/library/Z/moebius.ma
index e91bf8df9..33c9ad4be 100644
--- a/helm/software/matita/library/Z/moebius.ma
+++ b/helm/software/matita/library/Z/moebius.ma
@@ -64,7 +64,7 @@ intros.
 apply p_ord_exp1
   [apply lt_O_nth_prime_n
   |assumption
-  |auto
+  |autobatch
   ]
 qed.
 
@@ -514,7 +514,7 @@ lapply (exp_ord (nth_prime (max_prime_factor n)) n)
           (ord_rem n (nth_prime (max_prime_factor n))))
           [apply lt_to_le.assumption
           |apply le_n
-          |auto
+          |autobatch
           |assumption
           ]
         |left.apply sym_eq.assumption
@@ -527,3 +527,6 @@ lapply (exp_ord (nth_prime (max_prime_factor n)) n)
   |apply lt_to_le.assumption
   ]
 qed.
+
+
+