Theorem linedegen 31420

Description: When Line is applied with the same argument, the result is the empty set. (Contributed by Scott Fenton, 29-Oct-2013.) (Revised by Mario Carneiro, 19-Apr-2014.)

Assertion

Ref	Expression
linedegen	⊢ (𝐴Line𝐴) = ∅

Proof of Theorem linedegen

Dummy variables 𝑙 𝑛 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-ov 6552	. 2 ⊢ (𝐴Line𝐴) = (Line‘⟨𝐴, 𝐴⟩)
2		neirr 2791	. . . . . . . . . . 11 ⊢ ¬ 𝐴 ≠ 𝐴
3		simp3 1056	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) → 𝐴 ≠ 𝐴)
4	2, 3	mto 187	. . . . . . . . . 10 ⊢ ¬ (𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴)
5	4	intnanr 952	. . . . . . . . 9 ⊢ ¬ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) ∧ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear )
6	5	a1i 11	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ → ¬ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) ∧ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear ))
7	6	nrex 2983	. . . . . . 7 ⊢ ¬ ∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) ∧ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear )
8	7	nex 1722	. . . . . 6 ⊢ ¬ ∃𝑙∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) ∧ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear )
9		eleq1 2676	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝐴 → (𝑥 ∈ (𝔼‘𝑛) ↔ 𝐴 ∈ (𝔼‘𝑛)))
10		neeq1 2844	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝐴 → (𝑥 ≠ 𝑦 ↔ 𝐴 ≠ 𝑦))
11	9, 10	3anbi13d 1393	. . . . . . . . . . 11 ⊢ (𝑥 = 𝐴 → ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ↔ (𝐴 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝑦)))
12		opeq1 4340	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝐴 → ⟨𝑥, 𝑦⟩ = ⟨𝐴, 𝑦⟩)
13	12	eceq1d 7670	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝐴 → [⟨𝑥, 𝑦⟩]◡ Colinear = [⟨𝐴, 𝑦⟩]◡ Colinear )
14	13	eqeq2d 2620	. . . . . . . . . . 11 ⊢ (𝑥 = 𝐴 → (𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear ↔ 𝑙 = [⟨𝐴, 𝑦⟩]◡ Colinear ))
15	11, 14	anbi12d 743	. . . . . . . . . 10 ⊢ (𝑥 = 𝐴 → (((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear ) ↔ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝑦) ∧ 𝑙 = [⟨𝐴, 𝑦⟩]◡ Colinear )))
16	15	rexbidv 3034	. . . . . . . . 9 ⊢ (𝑥 = 𝐴 → (∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear ) ↔ ∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝑦) ∧ 𝑙 = [⟨𝐴, 𝑦⟩]◡ Colinear )))
17	16	exbidv 1837	. . . . . . . 8 ⊢ (𝑥 = 𝐴 → (∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear ) ↔ ∃𝑙∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝑦) ∧ 𝑙 = [⟨𝐴, 𝑦⟩]◡ Colinear )))
18		eleq1 2676	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝐴 → (𝑦 ∈ (𝔼‘𝑛) ↔ 𝐴 ∈ (𝔼‘𝑛)))
19		neeq2 2845	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝐴 → (𝐴 ≠ 𝑦 ↔ 𝐴 ≠ 𝐴))
20	18, 19	3anbi23d 1394	. . . . . . . . . . 11 ⊢ (𝑦 = 𝐴 → ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝑦) ↔ (𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴)))
21		opeq2 4341	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝐴 → ⟨𝐴, 𝑦⟩ = ⟨𝐴, 𝐴⟩)
22	21	eceq1d 7670	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝐴 → [⟨𝐴, 𝑦⟩]◡ Colinear = [⟨𝐴, 𝐴⟩]◡ Colinear )
23	22	eqeq2d 2620	. . . . . . . . . . 11 ⊢ (𝑦 = 𝐴 → (𝑙 = [⟨𝐴, 𝑦⟩]◡ Colinear ↔ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear ))
24	20, 23	anbi12d 743	. . . . . . . . . 10 ⊢ (𝑦 = 𝐴 → (((𝐴 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝑦) ∧ 𝑙 = [⟨𝐴, 𝑦⟩]◡ Colinear ) ↔ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) ∧ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear )))
25	24	rexbidv 3034	. . . . . . . . 9 ⊢ (𝑦 = 𝐴 → (∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝑦) ∧ 𝑙 = [⟨𝐴, 𝑦⟩]◡ Colinear ) ↔ ∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) ∧ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear )))
26	25	exbidv 1837	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (∃𝑙∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝑦) ∧ 𝑙 = [⟨𝐴, 𝑦⟩]◡ Colinear ) ↔ ∃𝑙∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) ∧ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear )))
27	17, 26	opelopabg 4918	. . . . . . 7 ⊢ ((𝐴 ∈ V ∧ 𝐴 ∈ V) → (⟨𝐴, 𝐴⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )} ↔ ∃𝑙∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) ∧ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear )))
28	27	anidms 675	. . . . . 6 ⊢ (𝐴 ∈ V → (⟨𝐴, 𝐴⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )} ↔ ∃𝑙∃𝑛 ∈ ℕ ((𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ∈ (𝔼‘𝑛) ∧ 𝐴 ≠ 𝐴) ∧ 𝑙 = [⟨𝐴, 𝐴⟩]◡ Colinear )))
29	8, 28	mtbiri 316	. . . . 5 ⊢ (𝐴 ∈ V → ¬ ⟨𝐴, 𝐴⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )})
30		elopaelxp 5114	. . . . . . 7 ⊢ (⟨𝐴, 𝐴⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )} → ⟨𝐴, 𝐴⟩ ∈ (V × V))
31		opelxp1 5074	. . . . . . 7 ⊢ (⟨𝐴, 𝐴⟩ ∈ (V × V) → 𝐴 ∈ V)
32	30, 31	syl 17	. . . . . 6 ⊢ (⟨𝐴, 𝐴⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )} → 𝐴 ∈ V)
33	32	con3i 149	. . . . 5 ⊢ (¬ 𝐴 ∈ V → ¬ ⟨𝐴, 𝐴⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )})
34	29, 33	pm2.61i 175	. . . 4 ⊢ ¬ ⟨𝐴, 𝐴⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )}
35		df-line2 31414	. . . . . . 7 ⊢ Line = {⟨⟨𝑥, 𝑦⟩, 𝑙⟩ ∣ ∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )}
36	35	dmeqi 5247	. . . . . 6 ⊢ dom Line = dom {⟨⟨𝑥, 𝑦⟩, 𝑙⟩ ∣ ∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )}
37		dmoprab 6639	. . . . . 6 ⊢ dom {⟨⟨𝑥, 𝑦⟩, 𝑙⟩ ∣ ∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )} = {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )}
38	36, 37	eqtri 2632	. . . . 5 ⊢ dom Line = {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )}
39	38	eleq2i 2680	. . . 4 ⊢ (⟨𝐴, 𝐴⟩ ∈ dom Line ↔ ⟨𝐴, 𝐴⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ ∃𝑙∃𝑛 ∈ ℕ ((𝑥 ∈ (𝔼‘𝑛) ∧ 𝑦 ∈ (𝔼‘𝑛) ∧ 𝑥 ≠ 𝑦) ∧ 𝑙 = [⟨𝑥, 𝑦⟩]◡ Colinear )})
40	34, 39	mtbir 312	. . 3 ⊢ ¬ ⟨𝐴, 𝐴⟩ ∈ dom Line
41		ndmfv 6128	. . 3 ⊢ (¬ ⟨𝐴, 𝐴⟩ ∈ dom Line → (Line‘⟨𝐴, 𝐴⟩) = ∅)
42	40, 41	ax-mp 5	. 2 ⊢ (Line‘⟨𝐴, 𝐴⟩) = ∅
43	1, 42	eqtri 2632	1 ⊢ (𝐴Line𝐴) = ∅

Syntax hints:  ¬ wn 3   ↔ wb 195   ∧ wa 383   ∧ w3a 1031   = wceq 1475  ∃wex 1695   ∈ wcel 1977   ≠ wne 2780  ∃wrex 2897  Vcvv 3173  ∅c0 3874  ⟨cop 4131  {copab 4642   × cxp 5036  ^◡ccnv 5037  dom cdm 5038  ‘cfv 5804  (class class class)co 6549  {coprab 6550  [cec 7627  ℕcn 10897  𝔼cee 25568   Colinear ccolin 31314  Linecline2 31411

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-rab 2905  df-v 3175  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-sn 4126  df-pr 4128  df-op 4132  df-uni 4373  df-br 4584  df-opab 4644  df-xp 5044  df-cnv 5046  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-iota 5768  df-fv 5812  df-ov 6552  df-oprab 6553  df-ec 7631  df-line2 31414

This theorem is referenced by: (None)