X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Farith%2Fnat_le.ma;h=a2bffd82c47fe054c4d83563a339e1bb90215661;hp=5d99e4c55a1606fca21959c80055157a9c83d9fe;hb=d7a1ab434c222c2445f36b7a3b6234d1f57f9794;hpb=f8b4eb67c2437f7b5174d7dca46e102e0ac0d19d diff --git a/matita/matita/contribs/lambdadelta/ground/arith/nat_le.ma b/matita/matita/contribs/lambdadelta/ground/arith/nat_le.ma index 5d99e4c55..a2bffd82c 100644 --- a/matita/matita/contribs/lambdadelta/ground/arith/nat_le.ma +++ b/matita/matita/contribs/lambdadelta/ground/arith/nat_le.ma @@ -19,7 +19,9 @@ include "ground/arith/nat_succ.ma". (*** le *) inductive nle (m:nat): predicate nat ≝ +(*** le_n *) | nle_refl : nle m m +(*** le_S *) | nle_succ_dx: ∀n. nle m n → nle m (↑n) .