X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fstatic_2%2Fi_static%2Frexs_fqup.ma;h=738035c2244d981517b6147a464696e9691b4e16;hb=8ec019202bff90959cf1a7158b309e7f83fa222e;hp=1adadac595bb4c31cf10356170b8a72bc1b39f56;hpb=98e786e1a6bd7b621e37ba7cd4098d4a0a6f8278;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/static_2/i_static/rexs_fqup.ma b/matita/matita/contribs/lambdadelta/static_2/i_static/rexs_fqup.ma index 1adadac59..738035c22 100644 --- a/matita/matita/contribs/lambdadelta/static_2/i_static/rexs_fqup.ma +++ b/matita/matita/contribs/lambdadelta/static_2/i_static/rexs_fqup.ma @@ -30,7 +30,7 @@ lemma rexs_pair_refl: ∀R. c_reflexive … R → /3 width=3 by rexs_step_dx, rex_pair_refl, inj/ qed. -lemma rexs_tc: ∀R,L1,L2,T,f. 𝐈❪f❫ → TC … (sex cfull (cext2 R) f) L1 L2 → +lemma rexs_tc: ∀R,L1,L2,T,f. 𝐈❨f❩ → TC … (sex cfull (cext2 R) f) L1 L2 → L1 ⪤*[R,T] L2. #R #L1 #L2 #T #f #Hf #H elim H -L2 [ elim (frees_total L1 T) | #L elim (frees_total L T) ]