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

Theorem cdlemg27b 41320
Description: TODO: Fix comment. (Contributed by NM, 28-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‘𝐾)‘𝑊)
cdlemg31.n 𝑁 = ((𝑃 𝑣) (𝑄 (𝑅𝐹)))
Assertion
Ref Expression
cdlemg27b ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ¬ (𝑅𝐹) (𝑄 𝑧))

Proof of Theorem cdlemg27b
StepHypRef Expression
1 simp11 1217 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simp12 1218 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
3 simp13 1219 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
4 simp22 1221 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑣𝐴𝑣 𝑊))
5 simp23l 1308 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝐹𝑇)
6 simp31 1223 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝑣 ≠ (𝑅𝐹))
7 cdlemg12.l . . . . . 6 = (le‘𝐾)
8 cdlemg12.j . . . . . 6 = (join‘𝐾)
9 cdlemg12.m . . . . . 6 = (meet‘𝐾)
10 cdlemg12.a . . . . . 6 𝐴 = (Atoms‘𝐾)
11 cdlemg12.h . . . . . 6 𝐻 = (LHyp‘𝐾)
12 cdlemg12.t . . . . . 6 𝑇 = ((LTrn‘𝐾)‘𝑊)
13 cdlemg12b.r . . . . . 6 𝑅 = ((trL‘𝐾)‘𝑊)
14 cdlemg31.n . . . . . 6 𝑁 = ((𝑃 𝑣) (𝑄 (𝑅𝐹)))
157, 8, 9, 10, 11, 12, 13, 14cdlemg31b0a 41319 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ (𝐹𝑇𝑣 ≠ (𝑅𝐹))) → (𝑁𝐴𝑁 = (0.‘𝐾)))
161, 2, 3, 4, 5, 6, 15syl132anc 1407 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑁𝐴𝑁 = (0.‘𝐾)))
17 simp23r 1309 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝑧𝑁)
1817adantr 484 . . . . 5 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ (𝑁𝐴𝑁 = (0.‘𝐾))) → 𝑧𝑁)
19 simp11l 1298 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝐾 ∈ HL)
2019adantr 484 . . . . . . . . 9 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁𝐴) → 𝐾 ∈ HL)
21 hlatl 39984 . . . . . . . . 9 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
2220, 21syl 17 . . . . . . . 8 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁𝐴) → 𝐾 ∈ AtLat)
23 simpl21 1265 . . . . . . . 8 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁𝐴) → 𝑧𝐴)
24 simpr 488 . . . . . . . 8 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁𝐴) → 𝑁𝐴)
257, 10atcmp 39935 . . . . . . . 8 ((𝐾 ∈ AtLat ∧ 𝑧𝐴𝑁𝐴) → (𝑧 𝑁𝑧 = 𝑁))
2622, 23, 24, 25syl3anc 1390 . . . . . . 7 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁𝐴) → (𝑧 𝑁𝑧 = 𝑁))
2726necon3bbid 2994 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁𝐴) → (¬ 𝑧 𝑁𝑧𝑁))
2819adantr 484 . . . . . . . . . 10 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁 = (0.‘𝐾)) → 𝐾 ∈ HL)
2928, 21syl 17 . . . . . . . . 9 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁 = (0.‘𝐾)) → 𝐾 ∈ AtLat)
30 simpl21 1265 . . . . . . . . 9 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁 = (0.‘𝐾)) → 𝑧𝐴)
31 eqid 2762 . . . . . . . . . 10 (0.‘𝐾) = (0.‘𝐾)
327, 31, 10atnle0 39933 . . . . . . . . 9 ((𝐾 ∈ AtLat ∧ 𝑧𝐴) → ¬ 𝑧 (0.‘𝐾))
3329, 30, 32syl2anc 593 . . . . . . . 8 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁 = (0.‘𝐾)) → ¬ 𝑧 (0.‘𝐾))
34 simpr 488 . . . . . . . . 9 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁 = (0.‘𝐾)) → 𝑁 = (0.‘𝐾))
3534breq2d 5112 . . . . . . . 8 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁 = (0.‘𝐾)) → (𝑧 𝑁𝑧 (0.‘𝐾)))
3633, 35mtbird 327 . . . . . . 7 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁 = (0.‘𝐾)) → ¬ 𝑧 𝑁)
3717adantr 484 . . . . . . 7 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁 = (0.‘𝐾)) → 𝑧𝑁)
3836, 372thd 267 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ 𝑁 = (0.‘𝐾)) → (¬ 𝑧 𝑁𝑧𝑁))
3927, 38jaodan 970 . . . . 5 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ (𝑁𝐴𝑁 = (0.‘𝐾))) → (¬ 𝑧 𝑁𝑧𝑁))
4018, 39mpbird 259 . . . 4 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) ∧ (𝑁𝐴𝑁 = (0.‘𝐾))) → ¬ 𝑧 𝑁)
4116, 40mpdan 697 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ¬ 𝑧 𝑁)
42 simp32 1224 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝑧 (𝑃 𝑣))
4319hllatd 39988 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝐾 ∈ Lat)
44 simp21 1220 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝑧𝐴)
45 eqid 2762 . . . . . . . . 9 (Base‘𝐾) = (Base‘𝐾)
4645, 10atbase 39913 . . . . . . . 8 (𝑧𝐴𝑧 ∈ (Base‘𝐾))
4744, 46syl 17 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝑧 ∈ (Base‘𝐾))
48 simp12l 1300 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝑃𝐴)
49 simp22l 1306 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝑣𝐴)
5045, 8, 10hlatjcl 39991 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑣𝐴) → (𝑃 𝑣) ∈ (Base‘𝐾))
5119, 48, 49, 50syl3anc 1390 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑃 𝑣) ∈ (Base‘𝐾))
52 simp13l 1302 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → 𝑄𝐴)
53 simp33 1225 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝐹𝑃) ≠ 𝑃)
547, 10, 11, 12, 13trlat 40793 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝐹𝑇 ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑅𝐹) ∈ 𝐴)
551, 2, 5, 53, 54syl112anc 1393 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑅𝐹) ∈ 𝐴)
5645, 8, 10hlatjcl 39991 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑄𝐴 ∧ (𝑅𝐹) ∈ 𝐴) → (𝑄 (𝑅𝐹)) ∈ (Base‘𝐾))
5719, 52, 55, 56syl3anc 1390 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑄 (𝑅𝐹)) ∈ (Base‘𝐾))
5845, 7, 9latlem12 18498 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑧 ∈ (Base‘𝐾) ∧ (𝑃 𝑣) ∈ (Base‘𝐾) ∧ (𝑄 (𝑅𝐹)) ∈ (Base‘𝐾))) → ((𝑧 (𝑃 𝑣) ∧ 𝑧 (𝑄 (𝑅𝐹))) ↔ 𝑧 ((𝑃 𝑣) (𝑄 (𝑅𝐹)))))
5943, 47, 51, 57, 58syl13anc 1391 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ((𝑧 (𝑃 𝑣) ∧ 𝑧 (𝑄 (𝑅𝐹))) ↔ 𝑧 ((𝑃 𝑣) (𝑄 (𝑅𝐹)))))
6014breq2i 5108 . . . . . 6 (𝑧 𝑁𝑧 ((𝑃 𝑣) (𝑄 (𝑅𝐹))))
6159, 60bitr4di 291 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ((𝑧 (𝑃 𝑣) ∧ 𝑧 (𝑄 (𝑅𝐹))) ↔ 𝑧 𝑁))
6261biimpd 231 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ((𝑧 (𝑃 𝑣) ∧ 𝑧 (𝑄 (𝑅𝐹))) → 𝑧 𝑁))
6342, 62mpand 705 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑧 (𝑄 (𝑅𝐹)) → 𝑧 𝑁))
6441, 63mtod 200 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ¬ 𝑧 (𝑄 (𝑅𝐹)))
657, 11, 12, 13trlle 40808 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → (𝑅𝐹) 𝑊)
661, 5, 65syl2anc 593 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑅𝐹) 𝑊)
67 simp13r 1303 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ¬ 𝑄 𝑊)
68 nbrne2 5120 . . . 4 (((𝑅𝐹) 𝑊 ∧ ¬ 𝑄 𝑊) → (𝑅𝐹) ≠ 𝑄)
6966, 67, 68syl2anc 593 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → (𝑅𝐹) ≠ 𝑄)
707, 8, 10hlatexch1 40019 . . 3 ((𝐾 ∈ HL ∧ ((𝑅𝐹) ∈ 𝐴𝑧𝐴𝑄𝐴) ∧ (𝑅𝐹) ≠ 𝑄) → ((𝑅𝐹) (𝑄 𝑧) → 𝑧 (𝑄 (𝑅𝐹))))
7119, 55, 44, 52, 69, 70syl131anc 1402 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ((𝑅𝐹) (𝑄 𝑧) → 𝑧 (𝑄 (𝑅𝐹))))
7264, 71mtod 200 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑧𝐴 ∧ (𝑣𝐴𝑣 𝑊) ∧ (𝐹𝑇𝑧𝑁)) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ¬ (𝑅𝐹) (𝑄 𝑧))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 399  wo 858  w3a 1098   = wceq 1560  wcel 2142  wne 2957   class class class wbr 5100  cfv 6521  (class class class)co 7396  Basecbs 17245  lecple 17293  joincjn 18343  meetcmee 18344  0.cp0 18453  Latclat 18463  Atomscatm 39887  AtLatcal 39888  HLchlt 39974  LHypclh 40608  LTrncltrn 40725  trLctrl 40782
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-iun 4951  df-iin 4952  df-br 5101  df-opab 5163  df-mpt 5182  df-id 5542  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-riota 7353  df-ov 7399  df-oprab 7400  df-mpo 7401  df-1st 7970  df-2nd 7971  df-map 8810  df-proset 18326  df-poset 18345  df-plt 18360  df-lub 18376  df-glb 18377  df-join 18378  df-meet 18379  df-p0 18455  df-p1 18456  df-lat 18464  df-clat 18531  df-oposet 39800  df-ol 39802  df-oml 39803  df-covers 39890  df-ats 39891  df-atl 39922  df-cvlat 39946  df-hlat 39975  df-llines 40122  df-psubsp 40127  df-pmap 40128  df-padd 40420  df-lhyp 40612  df-laut 40613  df-ldil 40728  df-ltrn 40729  df-trl 40783
This theorem is referenced by:  cdlemg28b  41327
  Copyright terms: Public domain W3C validator