Theorem lnatexN 40341

Description: There is an atom in a line different from any other. (Contributed by NM, 30-Apr-2012.) (New usage is discouraged.)

Hypotheses

Ref	Expression
lnatex.b	⊢ 𝐵 = (Base‘𝐾)
lnatex.l	⊢ ≤ = (le‘𝐾)
lnatex.a	⊢ 𝐴 = (Atoms‘𝐾)
lnatex.n	⊢ 𝑁 = (Lines‘𝐾)
lnatex.m	⊢ 𝑀 = (pmap‘𝐾)

Assertion

Ref	Expression
lnatexN	⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) → ∃𝑞 ∈ 𝐴 (𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋))

Distinct variable groups:   𝐴,𝑞   ≤ ,𝑞   𝑃,𝑞   𝑋,𝑞

Allowed substitution hints:   𝐵(𝑞)   𝐾(𝑞)   𝑀(𝑞)   𝑁(𝑞)

Proof of Theorem lnatexN

Dummy variables 𝑟 𝑠 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		lnatex.b	. . . 4 ⊢ 𝐵 = (Base‘𝐾)
2		eqid 2752	. . . 4 ⊢ (join‘𝐾) = (join‘𝐾)
3		lnatex.a	. . . 4 ⊢ 𝐴 = (Atoms‘𝐾)
4		lnatex.n	. . . 4 ⊢ 𝑁 = (Lines‘𝐾)
5		lnatex.m	. . . 4 ⊢ 𝑀 = (pmap‘𝐾)
6	1, 2, 3, 4, 5	isline3 40338	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → ((𝑀‘𝑋) ∈ 𝑁 ↔ ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))))
7	6	biimp3a 1480	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) → ∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠)))
8		simpl2r 1237	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝑠 ∈ 𝐴)
9		simpl3l 1238	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝑟 ≠ 𝑠)
10	9	necomd 3002	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝑠 ≠ 𝑟)
11		simpr 487	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝑟 = 𝑃)
12	10, 11	neeqtrd 3016	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝑠 ≠ 𝑃)
13		simpl11 1258	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝐾 ∈ HL)
14		simpl2l 1236	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝑟 ∈ 𝐴)
15		lnatex.l	. . . . . . . . 9 ⊢ ≤ = (le‘𝐾)
16	15, 2, 3	hlatlej2 39938	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) → 𝑠 ≤ (𝑟(join‘𝐾)𝑠))
17	13, 14, 8, 16	syl3anc 1382	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝑠 ≤ (𝑟(join‘𝐾)𝑠))
18		simpl3r 1239	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝑋 = (𝑟(join‘𝐾)𝑠))
19	17, 18	breqtrrd 5118	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → 𝑠 ≤ 𝑋)
20		neeq1 3009	. . . . . . . 8 ⊢ (𝑞 = 𝑠 → (𝑞 ≠ 𝑃 ↔ 𝑠 ≠ 𝑃))
21		breq1 5093	. . . . . . . 8 ⊢ (𝑞 = 𝑠 → (𝑞 ≤ 𝑋 ↔ 𝑠 ≤ 𝑋))
22	20, 21	anbi12d 640	. . . . . . 7 ⊢ (𝑞 = 𝑠 → ((𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋) ↔ (𝑠 ≠ 𝑃 ∧ 𝑠 ≤ 𝑋)))
23	22	rspcev 3572	. . . . . 6 ⊢ ((𝑠 ∈ 𝐴 ∧ (𝑠 ≠ 𝑃 ∧ 𝑠 ≤ 𝑋)) → ∃𝑞 ∈ 𝐴 (𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋))
24	8, 12, 19, 23	syl12anc 845	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 = 𝑃) → ∃𝑞 ∈ 𝐴 (𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋))
25		simpl2l 1236	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 ≠ 𝑃) → 𝑟 ∈ 𝐴)
26		simpr 487	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 ≠ 𝑃) → 𝑟 ≠ 𝑃)
27		simpl11 1258	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 ≠ 𝑃) → 𝐾 ∈ HL)
28		simpl2r 1237	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 ≠ 𝑃) → 𝑠 ∈ 𝐴)
29	15, 2, 3	hlatlej1 39937	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) → 𝑟 ≤ (𝑟(join‘𝐾)𝑠))
30	27, 25, 28, 29	syl3anc 1382	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 ≠ 𝑃) → 𝑟 ≤ (𝑟(join‘𝐾)𝑠))
31		simpl3r 1239	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 ≠ 𝑃) → 𝑋 = (𝑟(join‘𝐾)𝑠))
32	30, 31	breqtrrd 5118	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 ≠ 𝑃) → 𝑟 ≤ 𝑋)
33		neeq1 3009	. . . . . . . 8 ⊢ (𝑞 = 𝑟 → (𝑞 ≠ 𝑃 ↔ 𝑟 ≠ 𝑃))
34		breq1 5093	. . . . . . . 8 ⊢ (𝑞 = 𝑟 → (𝑞 ≤ 𝑋 ↔ 𝑟 ≤ 𝑋))
35	33, 34	anbi12d 640	. . . . . . 7 ⊢ (𝑞 = 𝑟 → ((𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋) ↔ (𝑟 ≠ 𝑃 ∧ 𝑟 ≤ 𝑋)))
36	35	rspcev 3572	. . . . . 6 ⊢ ((𝑟 ∈ 𝐴 ∧ (𝑟 ≠ 𝑃 ∧ 𝑟 ≤ 𝑋)) → ∃𝑞 ∈ 𝐴 (𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋))
37	25, 26, 32, 36	syl12anc 845	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) ∧ 𝑟 ≠ 𝑃) → ∃𝑞 ∈ 𝐴 (𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋))
38	24, 37	pm2.61dane 3034	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) ∧ (𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) ∧ (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠))) → ∃𝑞 ∈ 𝐴 (𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋))
39	38	3exp 1128	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) → ((𝑟 ∈ 𝐴 ∧ 𝑠 ∈ 𝐴) → ((𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠)) → ∃𝑞 ∈ 𝐴 (𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋))))
40	39	rexlimdvv 3208	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) → (∃𝑟 ∈ 𝐴 ∃𝑠 ∈ 𝐴 (𝑟 ≠ 𝑠 ∧ 𝑋 = (𝑟(join‘𝐾)𝑠)) → ∃𝑞 ∈ 𝐴 (𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋)))
41	7, 40	mpd 15	1 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑀‘𝑋) ∈ 𝑁) → ∃𝑞 ∈ 𝐴 (𝑞 ≠ 𝑃 ∧ 𝑞 ≤ 𝑋))

Syntax hints:   → wi 4   ∧ wa 398   ∧ w3a 1095   = wceq 1550   ∈ wcel 2132   ≠ wne 2947  ∃wrex 3076   class class class wbr 5090  ‘cfv 6506  (class class class)co 7381  Basecbs 17217  lecple 17265  joincjn 18315  Atomscatm 39825  HLchlt 39912  Linesclines 40056  pmapcpmap 40059

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1805  ax-4 1819  ax-5 1920  ax-6 1977  ax-7 2018  ax-8 2134  ax-9 2142  ax-10 2165  ax-11 2181  ax-12 2202  ax-ext 2724  ax-rep 5217  ax-sep 5236  ax-nul 5246  ax-pow 5312  ax-pr 5380  ax-un 7703

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3an 1097  df-tru 1553  df-fal 1563  df-ex 1790  df-nf 1794  df-sb 2081  df-mo 2556  df-eu 2586  df-clab 2731  df-cleq 2744  df-clel 2827  df-nfc 2901  df-ne 2948  df-ral 3067  df-rex 3077  df-rmo 3357  df-reu 3358  df-rab 3405  df-v 3446  df-sbc 3736  df-csb 3844  df-dif 3898  df-un 3900  df-in 3902  df-ss 3912  df-nul 4277  df-if 4471  df-pw 4547  df-sn 4573  df-pr 4575  df-op 4579  df-uni 4856  df-iun 4941  df-br 5091  df-opab 5153  df-mpt 5172  df-id 5531  df-xp 5642  df-rel 5643  df-cnv 5644  df-co 5645  df-dm 5646  df-rn 5647  df-res 5648  df-ima 5649  df-iota 6462  df-fun 6508  df-fn 6509  df-f 6510  df-f1 6511  df-fo 6512  df-f1o 6513  df-fv 6514  df-riota 7338  df-ov 7384  df-oprab 7385  df-proset 18298  df-poset 18317  df-plt 18332  df-lub 18348  df-glb 18349  df-join 18350  df-meet 18351  df-p0 18427  df-lat 18436  df-clat 18503  df-oposet 39738  df-ol 39740  df-oml 39741  df-covers 39828  df-ats 39829  df-atl 39860  df-cvlat 39884  df-hlat 39913  df-lines 40063  df-pmap 40066

This theorem is referenced by:  lnjatN  40342