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

Theorem cdlemg33c 39103
Description: TODO: Fix comment. (Contributed by NM, 30-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 𝑁 = ((𝑃 𝑣) (𝑄 (𝑅𝐹)))
cdlemg33.o 𝑂 = ((𝑃 𝑣) (𝑄 (𝑅𝐺)))
Assertion
Ref Expression
cdlemg33c ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ∃𝑧𝐴𝑧 𝑊 ∧ (𝑧𝑁𝑧𝑂𝑧 (𝑃 𝑣))))
Distinct variable groups:   𝐴,𝑟   𝐺,𝑟   ,𝑟   ,𝑟   𝑃,𝑟   𝑄,𝑟   𝑊,𝑟   𝐹,𝑟   𝑧,𝐴   𝑧,𝐹,𝑟   𝐻,𝑟,𝑧   𝑧,   𝐾,𝑟,𝑧   𝑧,   𝑁,𝑟,𝑧   𝑧,𝑃   𝑧,𝑄   𝑧,𝑅   𝑧,𝑇   𝑧,𝑊   𝑧,𝑣,𝑟   𝑧,𝐺   𝑧,𝑂,𝑟
Allowed substitution hints:   𝐴(𝑣)   𝑃(𝑣)   𝑄(𝑣)   𝑅(𝑣,𝑟)   𝑇(𝑣,𝑟)   𝐹(𝑣)   𝐺(𝑣)   𝐻(𝑣)   (𝑣)   𝐾(𝑣)   (𝑣)   (𝑧,𝑣,𝑟)   𝑁(𝑣)   𝑂(𝑣)   𝑊(𝑣)

Proof of Theorem cdlemg33c
StepHypRef Expression
1 simp1 1137 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)))
2 simp21 1207 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑣𝐴𝑣 𝑊))
3 simp22l 1293 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑁𝐴)
4 simp23l 1295 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐹𝑇)
5 simp3 1139 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟))))
6 cdlemg12.l . . . 4 = (le‘𝐾)
7 cdlemg12.j . . . 4 = (join‘𝐾)
8 cdlemg12.m . . . 4 = (meet‘𝐾)
9 cdlemg12.a . . . 4 𝐴 = (Atoms‘𝐾)
10 cdlemg12.h . . . 4 𝐻 = (LHyp‘𝐾)
11 cdlemg12.t . . . 4 𝑇 = ((LTrn‘𝐾)‘𝑊)
12 cdlemg12b.r . . . 4 𝑅 = ((trL‘𝐾)‘𝑊)
13 cdlemg31.n . . . 4 𝑁 = ((𝑃 𝑣) (𝑄 (𝑅𝐹)))
146, 7, 8, 9, 10, 11, 12, 13cdlemg33b0 39096 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ 𝑁𝐴𝐹𝑇) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ∃𝑧𝐴𝑧 𝑊 ∧ (𝑧𝑁𝑧 (𝑃 𝑣))))
151, 2, 3, 4, 5, 14syl131anc 1384 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ∃𝑧𝐴𝑧 𝑊 ∧ (𝑧𝑁𝑧 (𝑃 𝑣))))
16 simp11l 1285 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐾 ∈ HL)
1716adantr 482 . . . . . . . . . 10 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ 𝑧𝐴) → 𝐾 ∈ HL)
18 hlatl 37754 . . . . . . . . . 10 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
1917, 18syl 17 . . . . . . . . 9 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ 𝑧𝐴) → 𝐾 ∈ AtLat)
20 eqid 2738 . . . . . . . . . 10 (0.‘𝐾) = (0.‘𝐾)
2120, 9atn0 37702 . . . . . . . . 9 ((𝐾 ∈ AtLat ∧ 𝑧𝐴) → 𝑧 ≠ (0.‘𝐾))
2219, 21sylancom 589 . . . . . . . 8 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ 𝑧𝐴) → 𝑧 ≠ (0.‘𝐾))
23 simp22r 1294 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑂 = (0.‘𝐾))
2423adantr 482 . . . . . . . 8 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ 𝑧𝐴) → 𝑂 = (0.‘𝐾))
2522, 24neeqtrrd 3017 . . . . . . 7 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ 𝑧𝐴) → 𝑧𝑂)
2625biantrud 533 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ 𝑧𝐴) → (𝑧𝑁 ↔ (𝑧𝑁𝑧𝑂)))
2726anbi1d 631 . . . . 5 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ 𝑧𝐴) → ((𝑧𝑁𝑧 (𝑃 𝑣)) ↔ ((𝑧𝑁𝑧𝑂) ∧ 𝑧 (𝑃 𝑣))))
28 df-3an 1090 . . . . 5 ((𝑧𝑁𝑧𝑂𝑧 (𝑃 𝑣)) ↔ ((𝑧𝑁𝑧𝑂) ∧ 𝑧 (𝑃 𝑣)))
2927, 28bitr4di 289 . . . 4 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ 𝑧𝐴) → ((𝑧𝑁𝑧 (𝑃 𝑣)) ↔ (𝑧𝑁𝑧𝑂𝑧 (𝑃 𝑣))))
3029anbi2d 630 . . 3 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ 𝑧𝐴) → ((¬ 𝑧 𝑊 ∧ (𝑧𝑁𝑧 (𝑃 𝑣))) ↔ (¬ 𝑧 𝑊 ∧ (𝑧𝑁𝑧𝑂𝑧 (𝑃 𝑣)))))
3130rexbidva 3172 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (∃𝑧𝐴𝑧 𝑊 ∧ (𝑧𝑁𝑧 (𝑃 𝑣))) ↔ ∃𝑧𝐴𝑧 𝑊 ∧ (𝑧𝑁𝑧𝑂𝑧 (𝑃 𝑣)))))
3215, 31mpbid 231 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑣𝐴𝑣 𝑊) ∧ (𝑁𝐴𝑂 = (0.‘𝐾)) ∧ (𝐹𝑇𝐺𝑇)) ∧ (𝑃𝑄𝑣 ≠ (𝑅𝐹) ∧ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ∃𝑧𝐴𝑧 𝑊 ∧ (𝑧𝑁𝑧𝑂𝑧 (𝑃 𝑣))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 397  w3a 1088   = wceq 1542  wcel 2107  wne 2942  wrex 3072   class class class wbr 5104  cfv 6494  (class class class)co 7352  lecple 17100  joincjn 18160  meetcmee 18161  0.cp0 18272  Atomscatm 37657  AtLatcal 37658  HLchlt 37744  LHypclh 38379  LTrncltrn 38496  trLctrl 38553
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2709  ax-rep 5241  ax-sep 5255  ax-nul 5262  ax-pow 5319  ax-pr 5383  ax-un 7665
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2888  df-ne 2943  df-ral 3064  df-rex 3073  df-reu 3353  df-rab 3407  df-v 3446  df-sbc 3739  df-csb 3855  df-dif 3912  df-un 3914  df-in 3916  df-ss 3926  df-nul 4282  df-if 4486  df-pw 4561  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4865  df-iun 4955  df-iin 4956  df-br 5105  df-opab 5167  df-mpt 5188  df-id 5530  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-iota 6446  df-fun 6496  df-fn 6497  df-f 6498  df-f1 6499  df-fo 6500  df-f1o 6501  df-fv 6502  df-riota 7308  df-ov 7355  df-oprab 7356  df-mpo 7357  df-1st 7914  df-2nd 7915  df-map 8726  df-proset 18144  df-poset 18162  df-plt 18179  df-lub 18195  df-glb 18196  df-join 18197  df-meet 18198  df-p0 18274  df-p1 18275  df-lat 18281  df-clat 18348  df-oposet 37570  df-ol 37572  df-oml 37573  df-covers 37660  df-ats 37661  df-atl 37692  df-cvlat 37716  df-hlat 37745  df-llines 37893  df-lplanes 37894  df-psubsp 37898  df-pmap 37899  df-padd 38191  df-lhyp 38383  df-laut 38384  df-ldil 38499  df-ltrn 38500  df-trl 38554
This theorem is referenced by:  cdlemg33d  39104  cdlemg33  39106
  Copyright terms: Public domain W3C validator