X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_transition%2Fcpg_drops.ma;h=686676a947ddaf290e17746c6b4693d4d9bff684;hp=9ea5a2521c53fd943bcf3936f257e0bdb2e19c47;hb=076439def28e649ec384fae038ed021dadd5f75c;hpb=d2545ffd201b1aa49887313791386add78fa8603 diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpg_drops.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpg_drops.ma index 9ea5a2521..686676a94 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpg_drops.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cpg_drops.ma @@ -61,7 +61,7 @@ lemma cpg_inv_lref1_drops: ∀Rt,c,h,G,i,L,T2. ❪G,L❫ ⊢ #i ⬈[Rt,c,h] T2 ] * #cV #L #W #W2 #HKL #HW2 #HWV2 #H destruct lapply (lifts_trans … HWV2 … HVT2 ??) -V2 [3,6: |*: // ] #H - lapply (lifts_uni … H) -H #H +(* lapply (lifts_uni … H) -H #H *) (**) /4 width=8 by drops_drop, ex4_4_intro, or3_intro2, or3_intro1/ ] qed-.