X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2Fnat%2Fdiv_and_mod.ma;h=538515a8cc806003287340ef9d1299b4625a17a0;hb=bfb1d0076c4adf923f0507e4e2ab26519e689b88;hp=523f7431403a14071e2154d661eb9f22ef552332;hpb=32d926732ac785220007f1999d8ee868efd12e8c;p=helm.git diff --git a/helm/software/matita/library/nat/div_and_mod.ma b/helm/software/matita/library/nat/div_and_mod.ma index 523f74314..538515a8c 100644 --- a/helm/software/matita/library/nat/div_and_mod.ma +++ b/helm/software/matita/library/nat/div_and_mod.ma @@ -12,12 +12,9 @@ (* *) (**************************************************************************) -set "baseuri" "cic:/matita/nat/div_and_mod". - include "datatypes/constructors.ma". include "nat/minus.ma". - let rec mod_aux p m n: nat \def match (leb m n) with [ true \Rightarrow m