X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Farith%2Fynat_succ.ma;h=b642bc56ba9109fab574af9db164bd59f9238d4c;hp=9e4fb430cf71182640720323b20ffb472c656b25;hb=4d232392091ee233afc26ecf3120dd5f5c6a33c8;hpb=da0775e27b362e91ea1453a800bc403781cc2ca3 diff --git a/matita/matita/contribs/lambdadelta/ground/arith/ynat_succ.ma b/matita/matita/contribs/lambdadelta/ground/arith/ynat_succ.ma index 9e4fb430c..b642bc56b 100644 --- a/matita/matita/contribs/lambdadelta/ground/arith/ynat_succ.ma +++ b/matita/matita/contribs/lambdadelta/ground/arith/ynat_succ.ma @@ -39,7 +39,7 @@ qed. lemma ysucc_inf: ∞ = ↑(∞). // qed. -(* Inversion lemmas *********************************************************) +(* Inversions ***************************************************************) (*** ysucc_inv_inj_sn *) lemma eq_inv_inj_ysucc (n1) (x2): @@ -96,7 +96,7 @@ qed-. lemma eq_inv_ysucc_zero (x): ↑x = 𝟎 → ⊥. /2 width=2 by eq_inv_zero_ysucc/ qed-. -(* Eliminators **************************************************************) +(* Eliminations *************************************************************) (*** ynat_ind *) lemma ynat_ind_succ (Q:predicate …):