X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2Fbasic_2%2Fstatic%2Flsuba_lsuba.ma;fp=matita%2Fmatita%2Fcontribs%2Flambda_delta%2Fbasic_2%2Fstatic%2Flsuba_lsuba.ma;h=5d64516a51ebb439409019198a1c6f47ddfac056;hb=2ba7ef901a6b72210692792f2396c08bc0cff52c;hp=9fae68633c4c3b70401b3726234e4ae464110697;hpb=74c7035b4dd6933bda4479816e51f5771ee1f572;p=helm.git diff --git a/matita/matita/contribs/lambda_delta/basic_2/static/lsuba_lsuba.ma b/matita/matita/contribs/lambda_delta/basic_2/static/lsuba_lsuba.ma index 9fae68633..5d64516a5 100644 --- a/matita/matita/contribs/lambda_delta/basic_2/static/lsuba_lsuba.ma +++ b/matita/matita/contribs/lambda_delta/basic_2/static/lsuba_lsuba.ma @@ -18,7 +18,7 @@ include "basic_2/static/lsuba_aaa.ma". (* Main properties **********************************************************) -theorem lsuba_trans: ∀L1,L. L1 ÷⊑ L → ∀L2. L ÷⊑ L2 → L1 ÷⊑ L2. +theorem lsuba_trans: ∀L1,L. L1 ⁝⊑ L → ∀L2. L ⁝⊑ L2 → L1 ⁝⊑ L2. #L1 #L #H elim H -L1 -L [ #X #H >(lsuba_inv_atom1 … H) -H // | #I #L1 #L #V #HL1 #IHL1 #X #H