Theorem cdlemg33d 38944

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
cdlemg33d	⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → ∃𝑧 ∈ 𝐴 (¬ 𝑧 ≤ 𝑊 ∧ (𝑧 ≠ 𝑁 ∧ 𝑧 ≠ 𝑂 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣))))

Distinct variable groups:   𝐴,𝑟   𝐺,𝑟   ∨ ,𝑟   ≤ ,𝑟   𝑃,𝑟   𝑄,𝑟   𝑊,𝑟   𝐹,𝑟   𝑧,𝐴   𝑧,𝐹,𝑟   𝐻,𝑟,𝑧   𝑧, ∨   𝐾,𝑟,𝑧   𝑧, ≤   𝑁,𝑟,𝑧   𝑧,𝑃   𝑧,𝑄   𝑧,𝑅   𝑧,𝑇   𝑧,𝑊   𝑧,𝑣,𝑟   𝑧,𝐺   𝑧,𝑂,𝑟

Allowed substitution hints:   𝐴(𝑣)   𝑃(𝑣)   𝑄(𝑣)   𝑅(𝑣,𝑟)   𝑇(𝑣,𝑟)   𝐹(𝑣)   𝐺(𝑣)   𝐻(𝑣)   ∨ (𝑣)   𝐾(𝑣)   ≤ (𝑣)   ∧ (𝑧,𝑣,𝑟)   𝑁(𝑣)   𝑂(𝑣)   𝑊(𝑣)

Proof of Theorem cdlemg33d

Step	Hyp	Ref	Expression
1		simp1 1135	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)))
2		simp21 1205	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → (𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊))
3		simp22r 1292	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → 𝑂 ∈ 𝐴)
4		simp22l 1291	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → 𝑁 = (0.‘𝐾))
5	3, 4	jca 512	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → (𝑂 ∈ 𝐴 ∧ 𝑁 = (0.‘𝐾)))
6		simp23r 1294	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → 𝐺 ∈ 𝑇)
7		simp23l 1293	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → 𝐹 ∈ 𝑇)
8	6, 7	jca 512	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → (𝐺 ∈ 𝑇 ∧ 𝐹 ∈ 𝑇))
9		simp3 1137	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟))))
10		cdlemg12.l	. . . 4 ⊢ ≤ = (le‘𝐾)
11		cdlemg12.j	. . . 4 ⊢ ∨ = (join‘𝐾)
12		cdlemg12.m	. . . 4 ⊢ ∧ = (meet‘𝐾)
13		cdlemg12.a	. . . 4 ⊢ 𝐴 = (Atoms‘𝐾)
14		cdlemg12.h	. . . 4 ⊢ 𝐻 = (LHyp‘𝐾)
15		cdlemg12.t	. . . 4 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
16		cdlemg12b.r	. . . 4 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
17		cdlemg33.o	. . . 4 ⊢ 𝑂 = ((𝑃 ∨ 𝑣) ∧ (𝑄 ∨ (𝑅‘𝐺)))
18		cdlemg31.n	. . . 4 ⊢ 𝑁 = ((𝑃 ∨ 𝑣) ∧ (𝑄 ∨ (𝑅‘𝐹)))
19	10, 11, 12, 13, 14, 15, 16, 17, 18	cdlemg33c 38943	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑂 ∈ 𝐴 ∧ 𝑁 = (0.‘𝐾)) ∧ (𝐺 ∈ 𝑇 ∧ 𝐹 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → ∃𝑧 ∈ 𝐴 (¬ 𝑧 ≤ 𝑊 ∧ (𝑧 ≠ 𝑂 ∧ 𝑧 ≠ 𝑁 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣))))
20	1, 2, 5, 8, 9, 19	syl131anc 1382	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → ∃𝑧 ∈ 𝐴 (¬ 𝑧 ≤ 𝑊 ∧ (𝑧 ≠ 𝑂 ∧ 𝑧 ≠ 𝑁 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣))))
21		3ancoma 1097	. . . 4 ⊢ ((𝑧 ≠ 𝑂 ∧ 𝑧 ≠ 𝑁 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣)) ↔ (𝑧 ≠ 𝑁 ∧ 𝑧 ≠ 𝑂 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣)))
22	21	anbi2i 623	. . 3 ⊢ ((¬ 𝑧 ≤ 𝑊 ∧ (𝑧 ≠ 𝑂 ∧ 𝑧 ≠ 𝑁 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣))) ↔ (¬ 𝑧 ≤ 𝑊 ∧ (𝑧 ≠ 𝑁 ∧ 𝑧 ≠ 𝑂 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣))))
23	22	rexbii 3094	. 2 ⊢ (∃𝑧 ∈ 𝐴 (¬ 𝑧 ≤ 𝑊 ∧ (𝑧 ≠ 𝑂 ∧ 𝑧 ≠ 𝑁 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣))) ↔ ∃𝑧 ∈ 𝐴 (¬ 𝑧 ≤ 𝑊 ∧ (𝑧 ≠ 𝑁 ∧ 𝑧 ≠ 𝑂 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣))))
24	20, 23	sylib 217	1 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ ((𝑣 ∈ 𝐴 ∧ 𝑣 ≤ 𝑊) ∧ (𝑁 = (0.‘𝐾) ∧ 𝑂 ∈ 𝐴) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇)) ∧ (𝑃 ≠ 𝑄 ∧ 𝑣 ≠ (𝑅‘𝐺) ∧ ∃𝑟 ∈ 𝐴 (¬ 𝑟 ≤ 𝑊 ∧ (𝑃 ∨ 𝑟) = (𝑄 ∨ 𝑟)))) → ∃𝑧 ∈ 𝐴 (¬ 𝑧 ≤ 𝑊 ∧ (𝑧 ≠ 𝑁 ∧ 𝑧 ≠ 𝑂 ∧ 𝑧 ≤ (𝑃 ∨ 𝑣))))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 396   ∧ w3a 1086   = wceq 1540   ∈ wcel 2105   ≠ wne 2941  ∃wrex 3071   class class class wbr 5087  ‘cfv 6466  (class class class)co 7317  lecple 17046  joincjn 18106  meetcmee 18107  0.cp0 18218  Atomscatm 37497  HLchlt 37584  LHypclh 38219  LTrncltrn 38336  trLctrl 38393

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2708  ax-rep 5224  ax-sep 5238  ax-nul 5245  ax-pow 5303  ax-pr 5367  ax-un 7630

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-ral 3063  df-rex 3072  df-reu 3351  df-rab 3405  df-v 3443  df-sbc 3727  df-csb 3843  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-nul 4268  df-if 4472  df-pw 4547  df-sn 4572  df-pr 4574  df-op 4578  df-uni 4851  df-iun 4939  df-iin 4940  df-br 5088  df-opab 5150  df-mpt 5171  df-id 5507  df-xp 5614  df-rel 5615  df-cnv 5616  df-co 5617  df-dm 5618  df-rn 5619  df-res 5620  df-ima 5621  df-iota 6418  df-fun 6468  df-fn 6469  df-f 6470  df-f1 6471  df-fo 6472  df-f1o 6473  df-fv 6474  df-riota 7274  df-ov 7320  df-oprab 7321  df-mpo 7322  df-1st 7878  df-2nd 7879  df-map 8667  df-proset 18090  df-poset 18108  df-plt 18125  df-lub 18141  df-glb 18142  df-join 18143  df-meet 18144  df-p0 18220  df-p1 18221  df-lat 18227  df-clat 18294  df-oposet 37410  df-ol 37412  df-oml 37413  df-covers 37500  df-ats 37501  df-atl 37532  df-cvlat 37556  df-hlat 37585  df-llines 37733  df-lplanes 37734  df-psubsp 37738  df-pmap 37739  df-padd 38031  df-lhyp 38223  df-laut 38224  df-ldil 38339  df-ltrn 38340  df-trl 38394

This theorem is referenced by:  cdlemg33  38946