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=08cb57944c0df08611d4f35d286e46c0d13e4813;hp=b65cd73f5dd237e261689d8aae9f4abd6b7782de;hpb=9245402674a791dfdb943902f8288d742088c854;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 ************************************************)