Theorem 2llnmeqat 40295

Description: An atom equals the intersection of two majorizing lines. (Contributed by NM, 3-Apr-2013.)

Hypotheses

Ref	Expression
2llnmeqat.l	⊢ ≤ = (le‘𝐾)
2llnmeqat.m	⊢ ∧ = (meet‘𝐾)
2llnmeqat.a	⊢ 𝐴 = (Atoms‘𝐾)
2llnmeqat.n	⊢ 𝑁 = (LLines‘𝐾)

Assertion

Ref	Expression
2llnmeqat	⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑃 = (𝑋 ∧ 𝑌))

Proof of Theorem 2llnmeqat

Step	Hyp	Ref	Expression
1		simp3r 1219	. 2 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑃 ≤ (𝑋 ∧ 𝑌))
2		hlatl 40084	. . . 4 ⊢ (𝐾 ∈ HL → 𝐾 ∈ AtLat)
3	2	3ad2ant1 1149	. . 3 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝐾 ∈ AtLat)
4		simp23 1225	. . 3 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑃 ∈ 𝐴)
5		simp1 1152	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝐾 ∈ HL)
6		simp21 1223	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑋 ∈ 𝑁)
7		simp22 1224	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑌 ∈ 𝑁)
8		simp3l 1218	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑋 ≠ 𝑌)
9		hllat 40087	. . . . . . . 8 ⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat)
10	9	3ad2ant1 1149	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝐾 ∈ Lat)
11		eqid 2770	. . . . . . . . 9 ⊢ (Base‘𝐾) = (Base‘𝐾)
12		2llnmeqat.a	. . . . . . . . 9 ⊢ 𝐴 = (Atoms‘𝐾)
13	11, 12	atbase 40013	. . . . . . . 8 ⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ (Base‘𝐾))
14	4, 13	syl 18	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑃 ∈ (Base‘𝐾))
15		2llnmeqat.n	. . . . . . . . 9 ⊢ 𝑁 = (LLines‘𝐾)
16	11, 15	llnbase 40233	. . . . . . . 8 ⊢ (𝑋 ∈ 𝑁 → 𝑋 ∈ (Base‘𝐾))
17	6, 16	syl 18	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑋 ∈ (Base‘𝐾))
18	11, 15	llnbase 40233	. . . . . . . 8 ⊢ (𝑌 ∈ 𝑁 → 𝑌 ∈ (Base‘𝐾))
19	7, 18	syl 18	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑌 ∈ (Base‘𝐾))
20		2llnmeqat.l	. . . . . . . 8 ⊢ ≤ = (le‘𝐾)
21		2llnmeqat.m	. . . . . . . 8 ⊢ ∧ = (meet‘𝐾)
22	11, 20, 21	latlem12 18525	. . . . . . 7 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ 𝑋 ∈ (Base‘𝐾) ∧ 𝑌 ∈ (Base‘𝐾))) → ((𝑃 ≤ 𝑋 ∧ 𝑃 ≤ 𝑌) ↔ 𝑃 ≤ (𝑋 ∧ 𝑌)))
23	10, 14, 17, 19, 22	syl13anc 1397	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → ((𝑃 ≤ 𝑋 ∧ 𝑃 ≤ 𝑌) ↔ 𝑃 ≤ (𝑋 ∧ 𝑌)))
24	1, 23	mpbird 260	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → (𝑃 ≤ 𝑋 ∧ 𝑃 ≤ 𝑌))
25		eqid 2770	. . . . . 6 ⊢ (0.‘𝐾) = (0.‘𝐾)
26	20, 21, 25, 12, 15	2llnm4 40294	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁) ∧ (𝑃 ≤ 𝑋 ∧ 𝑃 ≤ 𝑌)) → (𝑋 ∧ 𝑌) ≠ (0.‘𝐾))
27	5, 4, 6, 7, 24, 26	syl131anc 1408	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → (𝑋 ∧ 𝑌) ≠ (0.‘𝐾))
28	21, 25, 12, 15	2llnmat 40248	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁) ∧ (𝑋 ≠ 𝑌 ∧ (𝑋 ∧ 𝑌) ≠ (0.‘𝐾))) → (𝑋 ∧ 𝑌) ∈ 𝐴)
29	5, 6, 7, 8, 27, 28	syl32anc 1403	. . 3 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → (𝑋 ∧ 𝑌) ∈ 𝐴)
30	20, 12	atcmp 40035	. . 3 ⊢ ((𝐾 ∈ AtLat ∧ 𝑃 ∈ 𝐴 ∧ (𝑋 ∧ 𝑌) ∈ 𝐴) → (𝑃 ≤ (𝑋 ∧ 𝑌) ↔ 𝑃 = (𝑋 ∧ 𝑌)))
31	3, 4, 29, 30	syl3anc 1396	. 2 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → (𝑃 ≤ (𝑋 ∧ 𝑌) ↔ 𝑃 = (𝑋 ∧ 𝑌)))
32	1, 31	mpbid 235	1 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝑁 ∧ 𝑌 ∈ 𝑁 ∧ 𝑃 ∈ 𝐴) ∧ (𝑋 ≠ 𝑌 ∧ 𝑃 ≤ (𝑋 ∧ 𝑌))) → 𝑃 = (𝑋 ∧ 𝑌))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   ∧ w3a 1101   = wceq 1568   ∈ wcel 2150   ≠ wne 2965   class class class wbr 5114  ‘cfv 6540  (class class class)co 7414  Basecbs 17272  lecple 17320  meetcmee 18371  0.cp0 18480  Latclat 18490  Atomscatm 39987  AtLatcal 39988  HLchlt 40074  LLinesclln 40215

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1823  ax-4 1837  ax-5 1938  ax-6 1995  ax-7 2036  ax-8 2152  ax-9 2160  ax-10 2183  ax-11 2199  ax-12 2220  ax-ext 2742  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pow 5340  ax-pr 5408  ax-un 7736

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1571  df-fal 1581  df-ex 1808  df-nf 1812  df-sb 2099  df-mo 2574  df-eu 2604  df-clab 2749  df-cleq 2762  df-clel 2845  df-nfc 2919  df-ne 2966  df-ral 3087  df-rex 3097  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3464  df-sbc 3753  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 4878  df-iun 4963  df-br 5115  df-opab 5179  df-mpt 5198  df-id 5560  df-xp 5671  df-rel 5672  df-cnv 5673  df-co 5674  df-dm 5675  df-rn 5676  df-res 5677  df-ima 5678  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7371  df-ov 7417  df-oprab 7418  df-proset 18353  df-poset 18372  df-plt 18387  df-lub 18403  df-glb 18404  df-join 18405  df-meet 18406  df-p0 18482  df-lat 18491  df-clat 18558  df-oposet 39900  df-ol 39902  df-oml 39903  df-covers 39990  df-ats 39991  df-atl 40022  df-cvlat 40046  df-hlat 40075  df-llines 40222

This theorem is referenced by:  cdlemeg46req  41253