Theorem dalempnes 37970

Description: Lemma for dath 38055. Frequently-used utility lemma. (Contributed by NM, 13-Aug-2012.)

Hypotheses

Ref	Expression
dalema.ph	⊢ (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴)) ∧ (𝑌 ∈ 𝑂 ∧ 𝑍 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (𝐶 ≤ (𝑃 ∨ 𝑆) ∧ 𝐶 ≤ (𝑄 ∨ 𝑇) ∧ 𝐶 ≤ (𝑅 ∨ 𝑈)))))
dalemc.l	⊢ ≤ = (le‘𝐾)
dalemc.j	⊢ ∨ = (join‘𝐾)
dalemc.a	⊢ 𝐴 = (Atoms‘𝐾)
dalempnes.o	⊢ 𝑂 = (LPlanes‘𝐾)
dalempnes.y	⊢ 𝑌 = ((𝑃 ∨ 𝑄) ∨ 𝑅)

Assertion

Ref	Expression
dalempnes	⊢ (𝜑 → 𝑃 ≠ 𝑆)

Proof of Theorem dalempnes

Step	Hyp	Ref	Expression
1		dalema.ph	. . . 4 ⊢ (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴)) ∧ (𝑌 ∈ 𝑂 ∧ 𝑍 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (𝐶 ≤ (𝑃 ∨ 𝑆) ∧ 𝐶 ≤ (𝑄 ∨ 𝑇) ∧ 𝐶 ≤ (𝑅 ∨ 𝑈)))))
2	1	dalemkelat 37943	. . 3 ⊢ (𝜑 → 𝐾 ∈ Lat)
3		dalemc.a	. . . 4 ⊢ 𝐴 = (Atoms‘𝐾)
4	1, 3	dalemceb 37957	. . 3 ⊢ (𝜑 → 𝐶 ∈ (Base‘𝐾))
5	1, 3	dalemseb 37961	. . 3 ⊢ (𝜑 → 𝑆 ∈ (Base‘𝐾))
6	1, 3	dalemteb 37962	. . 3 ⊢ (𝜑 → 𝑇 ∈ (Base‘𝐾))
7		simp321 1323	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴)) ∧ (𝑌 ∈ 𝑂 ∧ 𝑍 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (𝐶 ≤ (𝑃 ∨ 𝑆) ∧ 𝐶 ≤ (𝑄 ∨ 𝑇) ∧ 𝐶 ≤ (𝑅 ∨ 𝑈)))) → ¬ 𝐶 ≤ (𝑆 ∨ 𝑇))
8	1, 7	sylbi 216	. . 3 ⊢ (𝜑 → ¬ 𝐶 ≤ (𝑆 ∨ 𝑇))
9		eqid 2737	. . . 4 ⊢ (Base‘𝐾) = (Base‘𝐾)
10		dalemc.l	. . . 4 ⊢ ≤ = (le‘𝐾)
11		dalemc.j	. . . 4 ⊢ ∨ = (join‘𝐾)
12	9, 10, 11	latnlej2l 18275	. . 3 ⊢ ((𝐾 ∈ Lat ∧ (𝐶 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) ∧ ¬ 𝐶 ≤ (𝑆 ∨ 𝑇)) → ¬ 𝐶 ≤ 𝑆)
13	2, 4, 5, 6, 8, 12	syl131anc 1383	. 2 ⊢ (𝜑 → ¬ 𝐶 ≤ 𝑆)
14	1	dalemclpjs 37953	. . . . 5 ⊢ (𝜑 → 𝐶 ≤ (𝑃 ∨ 𝑆))
15		oveq1 7348	. . . . . 6 ⊢ (𝑃 = 𝑆 → (𝑃 ∨ 𝑆) = (𝑆 ∨ 𝑆))
16	15	breq2d 5108	. . . . 5 ⊢ (𝑃 = 𝑆 → (𝐶 ≤ (𝑃 ∨ 𝑆) ↔ 𝐶 ≤ (𝑆 ∨ 𝑆)))
17	14, 16	syl5ibcom 245	. . . 4 ⊢ (𝜑 → (𝑃 = 𝑆 → 𝐶 ≤ (𝑆 ∨ 𝑆)))
18	1	dalemkehl 37942	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ HL)
19	1	dalemsea 37948	. . . . . 6 ⊢ (𝜑 → 𝑆 ∈ 𝐴)
20	11, 3	hlatjidm 37687	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑆 ∈ 𝐴) → (𝑆 ∨ 𝑆) = 𝑆)
21	18, 19, 20	syl2anc 585	. . . . 5 ⊢ (𝜑 → (𝑆 ∨ 𝑆) = 𝑆)
22	21	breq2d 5108	. . . 4 ⊢ (𝜑 → (𝐶 ≤ (𝑆 ∨ 𝑆) ↔ 𝐶 ≤ 𝑆))
23	17, 22	sylibd 238	. . 3 ⊢ (𝜑 → (𝑃 = 𝑆 → 𝐶 ≤ 𝑆))
24	23	necon3bd 2955	. 2 ⊢ (𝜑 → (¬ 𝐶 ≤ 𝑆 → 𝑃 ≠ 𝑆))
25	13, 24	mpd 15	1 ⊢ (𝜑 → 𝑃 ≠ 𝑆)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 397   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106   ≠ wne 2941   class class class wbr 5096  ‘cfv 6483  (class class class)co 7341  Basecbs 17009  lecple 17066  joincjn 18126  Latclat 18246  Atomscatm 37581  HLchlt 37668  LPlanesclpl 37811

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2708  ax-rep 5233  ax-sep 5247  ax-nul 5254  ax-pow 5312  ax-pr 5376  ax-un 7654

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  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 3444  df-sbc 3731  df-csb 3847  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-nul 4274  df-if 4478  df-pw 4553  df-sn 4578  df-pr 4580  df-op 4584  df-uni 4857  df-iun 4947  df-br 5097  df-opab 5159  df-mpt 5180  df-id 5522  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-iota 6435  df-fun 6485  df-fn 6486  df-f 6487  df-f1 6488  df-fo 6489  df-f1o 6490  df-fv 6491  df-riota 7297  df-ov 7344  df-oprab 7345  df-proset 18110  df-poset 18128  df-lub 18161  df-glb 18162  df-join 18163  df-meet 18164  df-lat 18247  df-ats 37585  df-atl 37616  df-cvlat 37640  df-hlat 37669

This theorem is referenced by:  dalempjsen  37972  dalem24  38016