X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fstatic%2Flfxs_fsle.ma;h=514e63defcfbacafef16a6dff3f4726e0065a879;hb=5c186c72f508da0849058afeecc6877cd9ed6303;hp=000a74e6553c2075c7bc9d128c139427539ff631;hpb=75f395f0febd02de8e0f881d918a8812b1425c8d;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/static/lfxs_fsle.ma b/matita/matita/contribs/lambdadelta/basic_2/static/lfxs_fsle.ma index 000a74e65..514e63def 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/static/lfxs_fsle.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/static/lfxs_fsle.ma @@ -165,7 +165,7 @@ elim (lexs_conf … HL01 … HL02) /2 width=3 by ex2_intro/ [ | -HL01 -HL02 ] qed-. theorem lfxs_trans_fsle: ∀R1,R2,R3. - lfxs_fsle_compatible R1 → lfxs_transitive_next R1 R2 R3 → + lfxs_fsle_compatible R1 → f_transitive_next R1 R2 R3 → ∀L1,L,T. L1 ⪤*[R1, T] L → ∀L2. L ⪤*[R2, T] L2 → L1 ⪤*[R3, T] L2. #R1 #R2 #R3 #H1R #H2R #L1 #L #T #H