X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fdynamic%2Fnta_ind.ma;h=d459d184ad6f6736aad06e0e11738033e3c43e2e;hb=87f57ddc367303c33e19c83cd8989cd561f3185b;hp=4de1ae8019b368e26b172f24c38685620de5978d;hpb=084ea7868f6153effc18e8ee1c0e6cdb34d181c0;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/dynamic/nta_ind.ma b/matita/matita/contribs/lambdadelta/basic_2/dynamic/nta_ind.ma index 4de1ae801..d459d184a 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/dynamic/nta_ind.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/dynamic/nta_ind.ma @@ -71,7 +71,7 @@ lemma nta_ind_rest_cnv (h) (Q:relation4 …): /4 width=5 by nta_bind_cnv/ | #V #T #HG #HL #HT #X #H destruct elim (nta_inv_appl_sn … H) -H #p #W #U #HVW #HTU #HUX #HX - /4 width=9 by nta_appl/ + /4 width=9 by nta_appl, ylt_inj/ | #U #T #HG #HL #HT #X #H destruct elim (nta_inv_cast_sn … H) -H #HTU #HUX #HX /4 width=4 by nta_cast/ @@ -179,5 +179,5 @@ lemma nta_ind_ext_cnv (h) (Q:relation4 …): lapply (nta_fwd_cnv_dx … HTU) #H elim (cnv_inv_bind … H) -H #_ #HU elim (cnv_nta_sn … HU) -HU #X #HUX -/4 width=2 by nta_beta, nta_fwd_cnv_sn/ +/4 width=2 by nta_appl_abst, nta_fwd_cnv_sn/ qed-.