X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frelocation%2Flreq_lreq.ma;h=c823270ec8e98fc7d3d782ad661e808c771213b7;hb=e9da8e091898b6e67a2f270581bdc5cdbe80e9b0;hp=70abd6f5bcd45fcd72b1a04ceb9407726991e801;hpb=3a430d712f9d87185e9271b7b0c5188c5f311e4b;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 70abd6f5b..c823270ec 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: ∀L1,L2,f1. L1 ≡[f1] L2 → ∀f2. L1 ≡[f2] 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: ∀L1,L2,f1. L1 ≡[f1] L2 → ∀f2. L1 ≡[f2] 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-.