]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/library/nat/euler_theorem.ma
- transcript: bugfix
[helm.git] / helm / software / matita / library / nat / euler_theorem.ma
index 9396d444ed4b5a93db0e074e200c451f082cf5aa..e5933ad95d4dd16263c99d7b036869c5db12e93f 100644 (file)
@@ -83,7 +83,7 @@ elim (m)
         reflexivity
       | rewrite > gcd_O_n.
         apply not_eq_to_eqb_false.
-        apply cic:/matita/nat/nat/not_eq_S.con.                
+        apply not_eq_S.             
         unfold Not.
         intro.        
         cut ( (S n) \le O)
@@ -159,7 +159,7 @@ elim n
       apply (totient_card_aux n2 n2).
       reflexivity    
     | apply not_eq_to_eqb_false.
-      apply cic:/matita/nat/nat/not_eq_S.con.
+      apply not_eq_S.
       unfold Not.
       intro.
       cut ( (S n2) \le O)