X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frelocation%2Flreq_lreq.ma;h=d0c06d0c7dc0ac9cbbc41774895e4d9964330782;hb=75f395f0febd02de8e0f881d918a8812b1425c8d;hp=b2bf0385a202cd8e6f21c299d29828848bd0c11e;hpb=d59f344b1e4b377e2f06abd9f8856d686d21b222;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/relocation/lreq_lreq.ma b/matita/matita/contribs/lambdadelta/basic_2/relocation/lreq_lreq.ma index b2bf0385a..d0c06d0c7 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/relocation/lreq_lreq.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/relocation/lreq_lreq.ma @@ -28,10 +28,10 @@ theorem lreq_canc_sn: ∀f. left_cancellable … (lreq f). theorem lreq_canc_dx: ∀f. right_cancellable … (lreq f). /3 width=3 by lexs_canc_dx, lreq_trans, lreq_sym/ qed-. -theorem lreq_join: ∀f1,L1,L2. L1 ≐[f1] L2 → ∀f2. L1 ≐[f2] L2 → - ∀f. f1 ⋓ f2 ≡ f → L1 ≐[f] L2. +theorem lreq_join: ∀f1,L1,L2. L1 ≡[f1] L2 → ∀f2. L1 ≡[f2] L2 → + ∀f. f1 ⋓ f2 ≘ f → L1 ≡[f] L2. /2 width=5 by lexs_join/ qed-. -theorem lreq_meet: ∀f1,L1,L2. L1 ≐[f1] L2 → ∀f2. L1 ≐[f2] L2 → - ∀f. f1 ⋒ f2 ≡ f → L1 ≐[f] L2. +theorem lreq_meet: ∀f1,L1,L2. L1 ≡[f1] L2 → ∀f2. L1 ≡[f2] L2 → + ∀f. f1 ⋒ f2 ≘ f → L1 ≡[f] L2. /2 width=5 by lexs_meet/ qed-.