]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/library/nat/gcd_properties1.ma
other simplifications.
[helm.git] / matita / library / nat / gcd_properties1.ma
index ad5cb2c6b7623cb86123eadbacfba80e24f6c63d..94aa67670aa07ac780712a2d3983097ed00d8f4b 100644 (file)
@@ -256,7 +256,7 @@ apply (nat_case1 a)
 [ intros.
   apply (nat_case1 b)
   [ intros.
-    cut (d = O)
+    cut (d = O) (*this is an impossible case*)
     [ rewrite > Hcut.
       simplify.
       apply divides_SO_n