X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fcomputation%2Ffprs_cprs.ma;h=9d4d954b8d25f16ab604a9f89b556a3f0fa289b8;hb=7abd5e0412171f7d07e085d334198c034895c2c3;hp=b65cd73f5dd237e261689d8aae9f4abd6b7782de;hpb=1aa4f40c651096deefd640a2040a904722fee37f;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/computation/fprs_cprs.ma b/matita/matita/contribs/lambdadelta/basic_2/computation/fprs_cprs.ma index b65cd73f5..9d4d954b8 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/computation/fprs_cprs.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/computation/fprs_cprs.ma @@ -48,7 +48,7 @@ lemma fprs_lift: ∀K1,K2,T1,T2. ⦃K1, T1⦄ ➡* ⦃K2, T2⦄ → elim (IHT1 … HLK1 … HTU1 HTU) -K1 -T1 #L #HU1 #HKL elim (fpr_lift … HT2 … HKL … HTU HTU2) -K -T -T2 /3 width=4/ ] -qed-. +qed-. (* Advanced inversion lemmas ************************************************)