Theorem linepmap 39764

Description: A line described with a projective map. (Contributed by NM, 3-Feb-2012.)

Hypotheses

Ref	Expression
isline2.j	⊢ ∨ = (join‘𝐾)
isline2.a	⊢ 𝐴 = (Atoms‘𝐾)
isline2.n	⊢ 𝑁 = (Lines‘𝐾)
isline2.m	⊢ 𝑀 = (pmap‘𝐾)

Assertion

Ref	Expression
linepmap	⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑀‘(𝑃 ∨ 𝑄)) ∈ 𝑁)

Proof of Theorem linepmap

Dummy variable 𝑟 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpl1 1192	. . 3 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝐾 ∈ Lat)
2		simpl2 1193	. . . . 5 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑃 ∈ 𝐴)
3		eqid 2730	. . . . . 6 ⊢ (Base‘𝐾) = (Base‘𝐾)
4		isline2.a	. . . . . 6 ⊢ 𝐴 = (Atoms‘𝐾)
5	3, 4	atbase 39277	. . . . 5 ⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ (Base‘𝐾))
6	2, 5	syl 17	. . . 4 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑃 ∈ (Base‘𝐾))
7		simpl3 1194	. . . . 5 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑄 ∈ 𝐴)
8	3, 4	atbase 39277	. . . . 5 ⊢ (𝑄 ∈ 𝐴 → 𝑄 ∈ (Base‘𝐾))
9	7, 8	syl 17	. . . 4 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑄 ∈ (Base‘𝐾))
10		isline2.j	. . . . 5 ⊢ ∨ = (join‘𝐾)
11	3, 10	latjcl 18404	. . . 4 ⊢ ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑄 ∈ (Base‘𝐾)) → (𝑃 ∨ 𝑄) ∈ (Base‘𝐾))
12	1, 6, 9, 11	syl3anc 1373	. . 3 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑃 ∨ 𝑄) ∈ (Base‘𝐾))
13		eqid 2730	. . . 4 ⊢ (le‘𝐾) = (le‘𝐾)
14		isline2.m	. . . 4 ⊢ 𝑀 = (pmap‘𝐾)
15	3, 13, 4, 14	pmapval 39746	. . 3 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑄) ∈ (Base‘𝐾)) → (𝑀‘(𝑃 ∨ 𝑄)) = {𝑟 ∈ 𝐴 ∣ 𝑟(le‘𝐾)(𝑃 ∨ 𝑄)})
16	1, 12, 15	syl2anc 584	. 2 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑀‘(𝑃 ∨ 𝑄)) = {𝑟 ∈ 𝐴 ∣ 𝑟(le‘𝐾)(𝑃 ∨ 𝑄)})
17		eqid 2730	. . 3 ⊢ {𝑟 ∈ 𝐴 ∣ 𝑟(le‘𝐾)(𝑃 ∨ 𝑄)} = {𝑟 ∈ 𝐴 ∣ 𝑟(le‘𝐾)(𝑃 ∨ 𝑄)}
18		isline2.n	. . . 4 ⊢ 𝑁 = (Lines‘𝐾)
19	13, 10, 4, 18	islinei 39729	. . 3 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑃 ≠ 𝑄 ∧ {𝑟 ∈ 𝐴 ∣ 𝑟(le‘𝐾)(𝑃 ∨ 𝑄)} = {𝑟 ∈ 𝐴 ∣ 𝑟(le‘𝐾)(𝑃 ∨ 𝑄)})) → {𝑟 ∈ 𝐴 ∣ 𝑟(le‘𝐾)(𝑃 ∨ 𝑄)} ∈ 𝑁)
20	17, 19	mpanr2 704	. 2 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → {𝑟 ∈ 𝐴 ∣ 𝑟(le‘𝐾)(𝑃 ∨ 𝑄)} ∈ 𝑁)
21	16, 20	eqeltrd 2829	1 ⊢ (((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑀‘(𝑃 ∨ 𝑄)) ∈ 𝑁)

Syntax hints:   → wi 4   ∧ wa 395   ∧ w3a 1086   = wceq 1540   ∈ wcel 2109   ≠ wne 2926  {crab 3408   class class class wbr 5109  ‘cfv 6513  (class class class)co 7389  Basecbs 17185  lecple 17233  joincjn 18278  Latclat 18396  Atomscatm 39251  Linesclines 39483  pmapcpmap 39486

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-rep 5236  ax-sep 5253  ax-nul 5263  ax-pow 5322  ax-pr 5389  ax-un 7713

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3756  df-csb 3865  df-dif 3919  df-un 3921  df-in 3923  df-ss 3933  df-nul 4299  df-if 4491  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-iun 4959  df-br 5110  df-opab 5172  df-mpt 5191  df-id 5535  df-xp 5646  df-rel 5647  df-cnv 5648  df-co 5649  df-dm 5650  df-rn 5651  df-res 5652  df-ima 5653  df-iota 6466  df-fun 6515  df-fn 6516  df-f 6517  df-f1 6518  df-fo 6519  df-f1o 6520  df-fv 6521  df-riota 7346  df-ov 7392  df-oprab 7393  df-lub 18311  df-glb 18312  df-join 18313  df-meet 18314  df-lat 18397  df-ats 39255  df-lines 39490  df-pmap 39493

This theorem is referenced by:  cdleme3h  40224  cdleme7ga  40237