Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  cdlemk51 Structured version   Visualization version   GIF version

Theorem cdlemk51 41616
Description: Part of proof of Lemma K of [Crawley] p. 118. Line 6, p. 120. 𝐺, 𝐼 stand for g, h. 𝑋 represents tau. TODO: Combine into cdlemk52 41617? (Contributed by NM, 23-Jul-2013.)
Hypotheses
Ref Expression
cdlemk5.b 𝐵 = (Base‘𝐾)
cdlemk5.l = (le‘𝐾)
cdlemk5.j = (join‘𝐾)
cdlemk5.m = (meet‘𝐾)
cdlemk5.a 𝐴 = (Atoms‘𝐾)
cdlemk5.h 𝐻 = (LHyp‘𝐾)
cdlemk5.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemk5.r 𝑅 = ((trL‘𝐾)‘𝑊)
cdlemk5.z 𝑍 = ((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹))))
cdlemk5.y 𝑌 = ((𝑃 (𝑅𝑔)) (𝑍 (𝑅‘(𝑔𝑏))))
cdlemk5.x 𝑋 = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝑔)) → (𝑧𝑃) = 𝑌))
Assertion
Ref Expression
cdlemk51 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋))) (((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺))))
Distinct variable groups:   ,𝑔   ,𝑔   𝐵,𝑔   𝑃,𝑔   𝑅,𝑔   𝑇,𝑔   𝑔,𝑍   𝑔,𝑏,𝐺,𝑧   ,𝑏,𝑧   ,𝑏   𝑧,𝑔,   ,𝑏,𝑧   𝐴,𝑏,𝑔,𝑧   𝐵,𝑏,𝑧   𝐹,𝑏,𝑔,𝑧   𝑧,𝐺   𝐻,𝑏,𝑔,𝑧   𝐾,𝑏,𝑔,𝑧   𝑁,𝑏,𝑔,𝑧   𝑃,𝑏,𝑧   𝑅,𝑏,𝑧   𝑇,𝑏,𝑧   𝑊,𝑏,𝑔,𝑧   𝑧,𝑌   𝐺,𝑏   𝐼,𝑏,𝑔,𝑧
Allowed substitution hints:   𝑋(𝑧,𝑔,𝑏)   𝑌(𝑔,𝑏)   𝑍(𝑧,𝑏)

Proof of Theorem cdlemk51
StepHypRef Expression
1 simp11 1220 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simp12 1221 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)))
3 simp3 1154 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵)))
4 simp21 1223 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝑁𝑇)
5 simp22 1224 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
6 simp23 1225 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑅𝐹) = (𝑅𝑁))
7 cdlemk5.b . . . . 5 𝐵 = (Base‘𝐾)
8 cdlemk5.l . . . . 5 = (le‘𝐾)
9 cdlemk5.j . . . . 5 = (join‘𝐾)
10 cdlemk5.m . . . . 5 = (meet‘𝐾)
11 cdlemk5.a . . . . 5 𝐴 = (Atoms‘𝐾)
12 cdlemk5.h . . . . 5 𝐻 = (LHyp‘𝐾)
13 cdlemk5.t . . . . 5 𝑇 = ((LTrn‘𝐾)‘𝑊)
14 cdlemk5.r . . . . 5 𝑅 = ((trL‘𝐾)‘𝑊)
15 cdlemk5.z . . . . 5 𝑍 = ((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹))))
16 cdlemk5.y . . . . 5 𝑌 = ((𝑃 (𝑅𝑔)) (𝑍 (𝑅‘(𝑔𝑏))))
17 cdlemk5.x . . . . 5 𝑋 = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝑔)) → (𝑧𝑃) = 𝑌))
187, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17cdlemk39s 41602 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵)) ∧ 𝑁𝑇) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁))) → (𝑅𝐼 / 𝑔𝑋) (𝑅𝐼))
191, 2, 3, 4, 5, 6, 18syl132anc 1413 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑅𝐼 / 𝑔𝑋) (𝑅𝐼))
20 simp11l 1301 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝐾 ∈ HL)
2120hllatd 40027 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝐾 ∈ Lat)
227, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17cdlemk35s 41600 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵)) ∧ 𝑁𝑇) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁))) → 𝐼 / 𝑔𝑋𝑇)
231, 2, 3, 4, 5, 6, 22syl132anc 1413 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝐼 / 𝑔𝑋𝑇)
247, 12, 13, 14trlcl 40827 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐼 / 𝑔𝑋𝑇) → (𝑅𝐼 / 𝑔𝑋) ∈ 𝐵)
251, 23, 24syl2anc 595 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑅𝐼 / 𝑔𝑋) ∈ 𝐵)
26 simp3l 1218 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝐼𝑇)
27 simp3r 1219 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝐼 ≠ ( I ↾ 𝐵))
287, 11, 12, 13, 14trlnidat 40836 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐼𝑇𝐼 ≠ ( I ↾ 𝐵)) → (𝑅𝐼) ∈ 𝐴)
291, 26, 27, 28syl3anc 1396 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑅𝐼) ∈ 𝐴)
307, 11atbase 39952 . . . . 5 ((𝑅𝐼) ∈ 𝐴 → (𝑅𝐼) ∈ 𝐵)
3129, 30syl 18 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑅𝐼) ∈ 𝐵)
32 simp13 1222 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)))
337, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17cdlemk35s 41600 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑁𝑇) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁))) → 𝐺 / 𝑔𝑋𝑇)
341, 2, 32, 4, 5, 6, 33syl132anc 1413 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝐺 / 𝑔𝑋𝑇)
35 simp22l 1309 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝑃𝐴)
368, 11, 12, 13ltrnat 40803 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺 / 𝑔𝑋𝑇𝑃𝐴) → (𝐺 / 𝑔𝑋𝑃) ∈ 𝐴)
371, 34, 35, 36syl3anc 1396 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝐺 / 𝑔𝑋𝑃) ∈ 𝐴)
387, 11atbase 39952 . . . . 5 ((𝐺 / 𝑔𝑋𝑃) ∈ 𝐴 → (𝐺 / 𝑔𝑋𝑃) ∈ 𝐵)
3937, 38syl 18 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝐺 / 𝑔𝑋𝑃) ∈ 𝐵)
407, 8, 9latjlej2 18509 . . . 4 ((𝐾 ∈ Lat ∧ ((𝑅𝐼 / 𝑔𝑋) ∈ 𝐵 ∧ (𝑅𝐼) ∈ 𝐵 ∧ (𝐺 / 𝑔𝑋𝑃) ∈ 𝐵)) → ((𝑅𝐼 / 𝑔𝑋) (𝑅𝐼) → ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼))))
4121, 25, 31, 39, 40syl13anc 1397 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → ((𝑅𝐼 / 𝑔𝑋) (𝑅𝐼) → ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼))))
4219, 41mpd 16 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)))
437, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17cdlemk39s 41602 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑁𝑇) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁))) → (𝑅𝐺 / 𝑔𝑋) (𝑅𝐺))
441, 2, 32, 4, 5, 6, 43syl132anc 1413 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑅𝐺 / 𝑔𝑋) (𝑅𝐺))
457, 12, 13, 14trlcl 40827 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺 / 𝑔𝑋𝑇) → (𝑅𝐺 / 𝑔𝑋) ∈ 𝐵)
461, 34, 45syl2anc 595 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑅𝐺 / 𝑔𝑋) ∈ 𝐵)
47 simp13l 1305 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝐺𝑇)
48 simp13r 1306 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → 𝐺 ≠ ( I ↾ 𝐵))
497, 11, 12, 13, 14trlnidat 40836 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) → (𝑅𝐺) ∈ 𝐴)
501, 47, 48, 49syl3anc 1396 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑅𝐺) ∈ 𝐴)
517, 11atbase 39952 . . . . 5 ((𝑅𝐺) ∈ 𝐴 → (𝑅𝐺) ∈ 𝐵)
5250, 51syl 18 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝑅𝐺) ∈ 𝐵)
538, 11, 12, 13ltrnat 40803 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐼 / 𝑔𝑋𝑇𝑃𝐴) → (𝐼 / 𝑔𝑋𝑃) ∈ 𝐴)
541, 23, 35, 53syl3anc 1396 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝐼 / 𝑔𝑋𝑃) ∈ 𝐴)
557, 11atbase 39952 . . . . 5 ((𝐼 / 𝑔𝑋𝑃) ∈ 𝐴 → (𝐼 / 𝑔𝑋𝑃) ∈ 𝐵)
5654, 55syl 18 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (𝐼 / 𝑔𝑋𝑃) ∈ 𝐵)
577, 8, 9latjlej2 18509 . . . 4 ((𝐾 ∈ Lat ∧ ((𝑅𝐺 / 𝑔𝑋) ∈ 𝐵 ∧ (𝑅𝐺) ∈ 𝐵 ∧ (𝐼 / 𝑔𝑋𝑃) ∈ 𝐵)) → ((𝑅𝐺 / 𝑔𝑋) (𝑅𝐺) → ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺))))
5821, 46, 52, 56, 57syl13anc 1397 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → ((𝑅𝐺 / 𝑔𝑋) (𝑅𝐺) → ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺))))
5944, 58mpd 16 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺)))
607, 9latjcl 18494 . . . 4 ((𝐾 ∈ Lat ∧ (𝐺 / 𝑔𝑋𝑃) ∈ 𝐵 ∧ (𝑅𝐼 / 𝑔𝑋) ∈ 𝐵) → ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ∈ 𝐵)
6121, 39, 25, 60syl3anc 1396 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ∈ 𝐵)
627, 9, 11hlatjcl 40030 . . . 4 ((𝐾 ∈ HL ∧ (𝐺 / 𝑔𝑋𝑃) ∈ 𝐴 ∧ (𝑅𝐼) ∈ 𝐴) → ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)) ∈ 𝐵)
6320, 37, 29, 62syl3anc 1396 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)) ∈ 𝐵)
647, 9latjcl 18494 . . . 4 ((𝐾 ∈ Lat ∧ (𝐼 / 𝑔𝑋𝑃) ∈ 𝐵 ∧ (𝑅𝐺 / 𝑔𝑋) ∈ 𝐵) → ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋)) ∈ 𝐵)
6521, 56, 46, 64syl3anc 1396 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋)) ∈ 𝐵)
667, 9, 11hlatjcl 40030 . . . 4 ((𝐾 ∈ HL ∧ (𝐼 / 𝑔𝑋𝑃) ∈ 𝐴 ∧ (𝑅𝐺) ∈ 𝐴) → ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺)) ∈ 𝐵)
6720, 54, 50, 66syl3anc 1396 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺)) ∈ 𝐵)
687, 8, 10latmlem12 18526 . . 3 ((𝐾 ∈ Lat ∧ (((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ∈ 𝐵 ∧ ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)) ∈ 𝐵) ∧ (((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋)) ∈ 𝐵 ∧ ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺)) ∈ 𝐵)) → ((((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)) ∧ ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺))) → (((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋))) (((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺)))))
6921, 61, 63, 65, 67, 68syl122anc 1404 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → ((((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)) ∧ ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺))) → (((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋))) (((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺)))))
7042, 59, 69mp2and 711 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐼𝑇𝐼 ≠ ( I ↾ 𝐵))) → (((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼 / 𝑔𝑋)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺 / 𝑔𝑋))) (((𝐺 / 𝑔𝑋𝑃) (𝑅𝐼)) ((𝐼 / 𝑔𝑋𝑃) (𝑅𝐺))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 400  w3a 1101   = wceq 1567  wcel 2149  wne 2964  wral 3085  csb 3861   class class class wbr 5113   I cid 5556  ccnv 5661  cres 5664  ccom 5666  cfv 6537  crio 7367  (class class class)co 7411  Basecbs 17268  lecple 17316  joincjn 18366  meetcmee 18367  Latclat 18486  Atomscatm 39926  HLchlt 40013  LHypclh 40647  LTrncltrn 40764  trLctrl 40821
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-riotaBAD 39616
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-iun 4962  df-iin 4963  df-br 5114  df-opab 5178  df-mpt 5197  df-id 5557  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-1st 7985  df-2nd 7986  df-undef 8268  df-map 8825  df-proset 18349  df-poset 18368  df-plt 18383  df-lub 18399  df-glb 18400  df-join 18401  df-meet 18402  df-p0 18478  df-p1 18479  df-lat 18487  df-clat 18554  df-oposet 39839  df-ol 39841  df-oml 39842  df-covers 39929  df-ats 39930  df-atl 39961  df-cvlat 39985  df-hlat 40014  df-llines 40161  df-lplanes 40162  df-lvols 40163  df-lines 40164  df-psubsp 40166  df-pmap 40167  df-padd 40459  df-lhyp 40651  df-laut 40652  df-ldil 40767  df-ltrn 40768  df-trl 40822
This theorem is referenced by:  cdlemk52  41617
  Copyright terms: Public domain W3C validator