X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Flibrary%2FZ%2Fmoebius.ma;h=33c9ad4be350236f679d925fe34d2d6d34dd2091;hb=35525e5acd7854210e2a1bbba07a4909117029ac;hp=e91bf8df912b6b1748868ff8ab2d4580ac43b871;hpb=56da8e05a8c19025fc4c1748fbc0aa204f99235d;p=helm.git diff --git a/matita/library/Z/moebius.ma b/matita/library/Z/moebius.ma index e91bf8df9..33c9ad4be 100644 --- a/matita/library/Z/moebius.ma +++ b/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. + + +