Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  cdlemg12g Structured version   Visualization version   GIF version
Theorem cdlemg12g 40150
Description: TODO: FIX COMMENT. TODO: Combine with cdlemg12f 40149. (Contributed by NM, 6-May-2013.)
Hypotheses
Ref Expression
cdlemg12.l ≀ = (leβ€˜πΎ)
cdlemg12.j ∨ = (joinβ€˜πΎ)
cdlemg12.m ∧ = (meetβ€˜πΎ)
cdlemg12.a 𝐴 = (Atomsβ€˜πΎ)
cdlemg12.h 𝐻 = (LHypβ€˜πΎ)
cdlemg12.t 𝑇 = ((LTrnβ€˜πΎ)β€˜π‘Š)
cdlemg12b.r 𝑅 = ((trLβ€˜πΎ)β€˜π‘Š)
Assertion
Ref Expression
cdlemg12g ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) = ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ π‘Š))
Proof of Theorem cdlemg12g
StepHypRef Expression
1 simp11l 1281 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ 𝐾 ∈ HL)
2 hlop 38862 . . 3 (𝐾 ∈ HL β†’ 𝐾 ∈ OP)
31, 2syl 17 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ 𝐾 ∈ OP)
41hllatd 38864 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ 𝐾 ∈ Lat)
5 simp12l 1283 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ 𝑃 ∈ 𝐴)
6 simp11 1200 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (𝐾 ∈ HL ∧ π‘Š ∈ 𝐻))
7 simp21 1203 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ 𝐹 ∈ 𝑇)
8 simp22 1204 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ 𝐺 ∈ 𝑇)
9 cdlemg12.l . . . . . 6 ≀ = (leβ€˜πΎ)
10 cdlemg12.a . . . . . 6 𝐴 = (Atomsβ€˜πΎ)
11 cdlemg12.h . . . . . 6 𝐻 = (LHypβ€˜πΎ)
12 cdlemg12.t . . . . . 6 𝑇 = ((LTrnβ€˜πΎ)β€˜π‘Š)
139, 10, 11, 12ltrncoat 39645 . . . . 5 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ 𝑃 ∈ 𝐴) β†’ (πΉβ€˜(πΊβ€˜π‘ƒ)) ∈ 𝐴)
146, 7, 8, 5, 13syl121anc 1372 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (πΉβ€˜(πΊβ€˜π‘ƒ)) ∈ 𝐴)
15 eqid 2725 . . . . 5 (Baseβ€˜πΎ) = (Baseβ€˜πΎ)
16 cdlemg12.j . . . . 5 ∨ = (joinβ€˜πΎ)
1715, 16, 10hlatjcl 38867 . . . 4 ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ (πΉβ€˜(πΊβ€˜π‘ƒ)) ∈ 𝐴) β†’ (𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∈ (Baseβ€˜πΎ))
181, 5, 14, 17syl3anc 1368 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∈ (Baseβ€˜πΎ))
19 simp13l 1285 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ 𝑄 ∈ 𝐴)
209, 10, 11, 12ltrncoat 39645 . . . . 5 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ 𝑄 ∈ 𝐴) β†’ (πΉβ€˜(πΊβ€˜π‘„)) ∈ 𝐴)
216, 7, 8, 19, 20syl121anc 1372 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (πΉβ€˜(πΊβ€˜π‘„)) ∈ 𝐴)
2215, 16, 10hlatjcl 38867 . . . 4 ((𝐾 ∈ HL ∧ 𝑄 ∈ 𝐴 ∧ (πΉβ€˜(πΊβ€˜π‘„)) ∈ 𝐴) β†’ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„))) ∈ (Baseβ€˜πΎ))
231, 19, 21, 22syl3anc 1368 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„))) ∈ (Baseβ€˜πΎ))
24 cdlemg12.m . . . 4 ∧ = (meetβ€˜πΎ)
2515, 24latmcl 18429 . . 3 ((𝐾 ∈ Lat ∧ (𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∈ (Baseβ€˜πΎ) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„))) ∈ (Baseβ€˜πΎ)) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) ∈ (Baseβ€˜πΎ))
264, 18, 23, 25syl3anc 1368 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) ∈ (Baseβ€˜πΎ))
27 simp12 1201 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š))
28 simp13 1202 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š))
29 simp33 1208 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))
309, 16, 24, 10, 11, 12cdlemg11a 40138 . . . . 5 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (πΉβ€˜(πΊβ€˜π‘ƒ)) β‰  𝑃)
3130necomd 2986 . . . 4 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ 𝑃 β‰  (πΉβ€˜(πΊβ€˜π‘ƒ)))
326, 27, 28, 7, 8, 29, 31syl123anc 1384 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ 𝑃 β‰  (πΉβ€˜(πΊβ€˜π‘ƒ)))
339, 16, 24, 10, 11lhpat 39544 . . 3 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∈ 𝐴 ∧ 𝑃 β‰  (πΉβ€˜(πΊβ€˜π‘ƒ)))) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ π‘Š) ∈ 𝐴)
346, 27, 14, 32, 33syl112anc 1371 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ π‘Š) ∈ 𝐴)
3516, 10hlatjcom 38868 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ (πΉβ€˜(πΊβ€˜π‘ƒ)) ∈ 𝐴) β†’ (𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) = ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ 𝑃))
361, 5, 14, 35syl3anc 1368 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) = ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ 𝑃))
3716, 10hlatjcom 38868 . . . . 5 ((𝐾 ∈ HL ∧ 𝑄 ∈ 𝐴 ∧ (πΉβ€˜(πΊβ€˜π‘„)) ∈ 𝐴) β†’ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„))) = ((πΉβ€˜(πΊβ€˜π‘„)) ∨ 𝑄))
381, 19, 21, 37syl3anc 1368 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„))) = ((πΉβ€˜(πΊβ€˜π‘„)) ∨ 𝑄))
3936, 38oveq12d 7432 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) = (((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ 𝑃) ∧ ((πΉβ€˜(πΊβ€˜π‘„)) ∨ 𝑄)))
40 simp1 1133 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ ((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)))
41 simp2 1134 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄))
42 simp31l 1293 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄))
43 simp31r 1294 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄))
44 simp32 1207 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ))
45 cdlemg12b.r . . . . 5 𝑅 = ((trLβ€˜πΎ)β€˜π‘Š)
46 eqid 2725 . . . . 5 (0.β€˜πΎ) = (0.β€˜πΎ)
479, 16, 24, 10, 11, 12, 45, 46cdlemg12e 40148 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ (Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ))) β†’ (((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ 𝑃) ∧ ((πΉβ€˜(πΊβ€˜π‘„)) ∨ 𝑄)) β‰  (0.β€˜πΎ))
4840, 41, 42, 43, 44, 47syl113anc 1379 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ (((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ 𝑃) ∧ ((πΉβ€˜(πΊβ€˜π‘„)) ∨ 𝑄)) β‰  (0.β€˜πΎ))
4939, 48eqnetrd 2998 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) β‰  (0.β€˜πΎ))
509, 16, 24, 10, 11, 12, 45cdlemg12f 40149 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) ≀ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ π‘Š))
5115, 9, 46, 10leat2 38794 . 2 (((𝐾 ∈ OP ∧ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) ∈ (Baseβ€˜πΎ) ∧ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ π‘Š) ∈ 𝐴) ∧ (((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) β‰  (0.β€˜πΎ) ∧ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) ≀ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ π‘Š))) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) = ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ π‘Š))
523, 26, 34, 49, 50, 51syl32anc 1375 1 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇 ∧ 𝑃 β‰  𝑄) ∧ ((Β¬ (π‘…β€˜πΉ) ≀ (𝑃 ∨ 𝑄) ∧ Β¬ (π‘…β€˜πΊ) ≀ (𝑃 ∨ 𝑄)) ∧ (π‘…β€˜πΉ) β‰  (π‘…β€˜πΊ) ∧ ((πΉβ€˜(πΊβ€˜π‘ƒ)) ∨ (πΉβ€˜(πΊβ€˜π‘„))) β‰  (𝑃 ∨ 𝑄))) β†’ ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ (𝑄 ∨ (πΉβ€˜(πΊβ€˜π‘„)))) = ((𝑃 ∨ (πΉβ€˜(πΊβ€˜π‘ƒ))) ∧ π‘Š))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ∧ wa 394   ∧ w3a 1084   = wceq 1533   ∈ wcel 2098   β‰  wne 2930   class class class wbr 5141  β€˜cfv 6541  (class class class)co 7414  Basecbs 17177  lecple 17237  joincjn 18300  meetcmee 18301  0.cp0 18412  Latclat 18420  OPcops 38672  Atomscatm 38763  HLchlt 38850  LHypclh 39485  LTrncltrn 39602  trLctrl 39659
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-rep 5278  ax-sep 5292  ax-nul 5299  ax-pow 5357  ax-pr 5421  ax-un 7736  ax-riotaBAD 38453
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2931  df-ral 3052  df-rex 3061  df-rmo 3364  df-reu 3365  df-rab 3420  df-v 3465  df-sbc 3769  df-csb 3885  df-dif 3942  df-un 3944  df-in 3946  df-ss 3956  df-nul 4317  df-if 4523  df-pw 4598  df-sn 4623  df-pr 4625  df-op 4629  df-uni 4902  df-iun 4991  df-iin 4992  df-br 5142  df-opab 5204  df-mpt 5225  df-id 5568  df-xp 5676  df-rel 5677  df-cnv 5678  df-co 5679  df-dm 5680  df-rn 5681  df-res 5682  df-ima 5683  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-riota 7370  df-ov 7417  df-oprab 7418  df-mpo 7419  df-1st 7989  df-2nd 7990  df-undef 8275  df-map 8843  df-proset 18284  df-poset 18302  df-plt 18319  df-lub 18335  df-glb 18336  df-join 18337  df-meet 18338  df-p0 18414  df-p1 18415  df-lat 18421  df-clat 18488  df-oposet 38676  df-ol 38678  df-oml 38679  df-covers 38766  df-ats 38767  df-atl 38798  df-cvlat 38822  df-hlat 38851  df-llines 38999  df-lplanes 39000  df-lvols 39001  df-lines 39002  df-psubsp 39004  df-pmap 39005  df-padd 39297  df-lhyp 39489  df-laut 39490  df-ldil 39605  df-ltrn 39606  df-trl 39660
This theorem is referenced by:  cdlemg12  40151
  Copyright terms: Public domain W3C validator