X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fdynamic%2Fcnv_cpce.ma;h=b9b6560fb9515f36f6e7891e9d9fdea2a2cd5611;hp=a4b4078d89fafa8560fd697a7365753ade4d1e53;hb=48bd1f41417fb167a100eb1613a64a711484b69a;hpb=e3369ffc8b690703cfafc7985f69db5fc140d749 diff --git a/matita/matita/contribs/lambdadelta/basic_2/dynamic/cnv_cpce.ma b/matita/matita/contribs/lambdadelta/basic_2/dynamic/cnv_cpce.ma index a4b4078d8..b9b6560fb 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/dynamic/cnv_cpce.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/dynamic/cnv_cpce.ma @@ -20,8 +20,9 @@ include "basic_2/dynamic/cnv_cpmuwe.ma". (* Properties with context-sensitive parallel eta-conversion for terms ******) -lemma cpce_total_cnv (h) (a) (G) (L): +axiom cpce_total_cnv (h) (a) (G) (L): ∀T1. ⦃G,L⦄ ⊢ T1 ![h,a] → ∃T2. ⦃G,L⦄ ⊢ T1 ⬌η[h] T2. +(* #h #a #G #L #T1 #HT1 lapply (cnv_fwd_csx … HT1) #H generalize in match HT1; -HT1 @@ -67,3 +68,4 @@ generalize in match HT1; -HT1 /3 width=2 by cpce_flat, ex_intro/ ] qed-. +*)