Theorem fnsingle 33493

Description: The singleton relationship is a function over the universe. (Contributed by Scott Fenton, 4-Apr-2014.) (Revised by Mario Carneiro, 19-Apr-2014.)

Assertion

Ref	Expression
fnsingle	⊢ Singleton Fn V

Proof of Theorem fnsingle

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

Step	Hyp	Ref	Expression
1		difss 4059	. . . . 5 ⊢ ((V × V) ∖ ran ((V ⊗ E ) △ ( I ⊗ V))) ⊆ (V × V)
2		df-rel 5526	. . . . 5 ⊢ (Rel ((V × V) ∖ ran ((V ⊗ E ) △ ( I ⊗ V))) ↔ ((V × V) ∖ ran ((V ⊗ E ) △ ( I ⊗ V))) ⊆ (V × V))
3	1, 2	mpbir 234	. . . 4 ⊢ Rel ((V × V) ∖ ran ((V ⊗ E ) △ ( I ⊗ V)))
4		df-singleton 33436	. . . . 5 ⊢ Singleton = ((V × V) ∖ ran ((V ⊗ E ) △ ( I ⊗ V)))
5	4	releqi 5616	. . . 4 ⊢ (Rel Singleton ↔ Rel ((V × V) ∖ ran ((V ⊗ E ) △ ( I ⊗ V))))
6	3, 5	mpbir 234	. . 3 ⊢ Rel Singleton
7		vex 3444	. . . . . . 7 ⊢ 𝑥 ∈ V
8		vex 3444	. . . . . . 7 ⊢ 𝑦 ∈ V
9	7, 8	brsingle 33491	. . . . . 6 ⊢ (𝑥Singleton𝑦 ↔ 𝑦 = {𝑥})
10		vex 3444	. . . . . . 7 ⊢ 𝑧 ∈ V
11	7, 10	brsingle 33491	. . . . . 6 ⊢ (𝑥Singleton𝑧 ↔ 𝑧 = {𝑥})
12		eqtr3 2820	. . . . . 6 ⊢ ((𝑦 = {𝑥} ∧ 𝑧 = {𝑥}) → 𝑦 = 𝑧)
13	9, 11, 12	syl2anb 600	. . . . 5 ⊢ ((𝑥Singleton𝑦 ∧ 𝑥Singleton𝑧) → 𝑦 = 𝑧)
14	13	ax-gen 1797	. . . 4 ⊢ ∀𝑧((𝑥Singleton𝑦 ∧ 𝑥Singleton𝑧) → 𝑦 = 𝑧)
15	14	gen2 1798	. . 3 ⊢ ∀𝑥∀𝑦∀𝑧((𝑥Singleton𝑦 ∧ 𝑥Singleton𝑧) → 𝑦 = 𝑧)
16		dffun2 6334	. . 3 ⊢ (Fun Singleton ↔ (Rel Singleton ∧ ∀𝑥∀𝑦∀𝑧((𝑥Singleton𝑦 ∧ 𝑥Singleton𝑧) → 𝑦 = 𝑧)))
17	6, 15, 16	mpbir2an 710	. 2 ⊢ Fun Singleton
18		eqv 3449	. . 3 ⊢ (dom Singleton = V ↔ ∀𝑥 𝑥 ∈ dom Singleton)
19		eqid 2798	. . . . . 6 ⊢ {𝑥} = {𝑥}
20		snex 5297	. . . . . . 7 ⊢ {𝑥} ∈ V
21	7, 20	brsingle 33491	. . . . . 6 ⊢ (𝑥Singleton{𝑥} ↔ {𝑥} = {𝑥})
22	19, 21	mpbir 234	. . . . 5 ⊢ 𝑥Singleton{𝑥}
23		breq2 5034	. . . . . 6 ⊢ (𝑦 = {𝑥} → (𝑥Singleton𝑦 ↔ 𝑥Singleton{𝑥}))
24	20, 23	spcev 3555	. . . . 5 ⊢ (𝑥Singleton{𝑥} → ∃𝑦 𝑥Singleton𝑦)
25	22, 24	ax-mp 5	. . . 4 ⊢ ∃𝑦 𝑥Singleton𝑦
26	7	eldm 5733	. . . 4 ⊢ (𝑥 ∈ dom Singleton ↔ ∃𝑦 𝑥Singleton𝑦)
27	25, 26	mpbir 234	. . 3 ⊢ 𝑥 ∈ dom Singleton
28	18, 27	mpgbir 1801	. 2 ⊢ dom Singleton = V
29		df-fn 6327	. 2 ⊢ (Singleton Fn V ↔ (Fun Singleton ∧ dom Singleton = V))
30	17, 28, 29	mpbir2an 710	1 ⊢ Singleton Fn V

Syntax hints:   → wi 4   ∧ wa 399  ∀wal 1536   = wceq 1538  ∃wex 1781   ∈ wcel 2111  Vcvv 3441   ∖ cdif 3878   ⊆ wss 3881   △ csymdif 4168  {csn 4525   class class class wbr 5030   I cid 5424   E cep 5429   × cxp 5517  dom cdm 5519  ran crn 5520  Rel wrel 5524  Fun wfun 6318   Fn wfn 6319   ⊗ ctxp 33404  Singletoncsingle 33412

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 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7441

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-ral 3111  df-rex 3112  df-rab 3115  df-v 3443  df-sbc 3721  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-symdif 4169  df-nul 4244  df-if 4426  df-sn 4526  df-pr 4528  df-op 4532  df-uni 4801  df-br 5031  df-opab 5093  df-mpt 5111  df-id 5425  df-eprel 5430  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-iota 6283  df-fun 6326  df-fn 6327  df-f 6328  df-fo 6330  df-fv 6332  df-1st 7671  df-2nd 7672  df-txp 33428  df-singleton 33436

This theorem is referenced by:  fvsingle  33494