X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Flibrary%2Fnat%2Ftimes.ma;h=8c53a56c8adfb7872ffa6a846525edf58069cc60;hb=aeb7f0539398561dc84cadf38df14a051dd1ba75;hp=876dfecce3de966dc4e2594bf9d566f4b6f6e9e8;hpb=03fcee16d9c262aad38a47d0a409b684a965cc3f;p=helm.git diff --git a/helm/matita/library/nat/times.ma b/helm/matita/library/nat/times.ma index 876dfecce..8c53a56c8 100644 --- a/helm/matita/library/nat/times.ma +++ b/helm/matita/library/nat/times.ma @@ -43,7 +43,7 @@ reflexivity. apply assoc_plus. qed. -theorem times_n_SO : \forall n:nat. eq nat n (times n (S O)). +theorem times_n_SO : \forall n:nat. n = n * S O. intros. rewrite < times_n_Sm. rewrite < times_n_O.