X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Farith%2Fnat_le.ma;h=a2bffd82c47fe054c4d83563a339e1bb90215661;hb=d7a1ab434c222c2445f36b7a3b6234d1f57f9794;hp=5d99e4c55a1606fca21959c80055157a9c83d9fe;hpb=8fdf1af656038d0245eba64ff2531bbe94ce0e9e;p=helm.git 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) .