Small changes

[helm.git] / matita / library / nat / gcd.ma

diff --git a/matita/library/nat/gcd.ma b/matita/library/nat/gcd.ma
index 036167bd04535ad298647ccb3b6097e1d9c7997a..66bc6f8651565e43880cd73bdd222280cca9121f 100644 (file)
--- a/matita/library/nat/gcd.ma
+++ b/matita/library/nat/gcd.ma
@@ -519,10 +519,12 @@ cut (n \divides p \lor n \ndivides p)
           rewrite > distr_times_minus.
           rewrite > (sym_times q (a1*p)).
           rewrite > (assoc_times a1).
-          elim H1.rewrite > H6.
-          (* applyS (witness n (n*(q*a-a1*n2)) (q*a-a1*n2))
+          elim H1.
+          (*
+             rewrite > H6.
+             applyS (witness n (n*(q*a-a1*n2)) (q*a-a1*n2))
              reflexivity. *);
-          applyS (witness n ? ? (refl_eq ? ?)) timeout=50.
+          applyS (witness n ? ? (refl_eq ? ?)) (* timeout=50 *).
           (*
           rewrite < (sym_times n).rewrite < assoc_times.
           rewrite > (sym_times q).rewrite > assoc_times.