Theorem fsng 7137

Description: A function maps a singleton to a singleton iff it is the singleton of an ordered pair. (Contributed by NM, 26-Oct-2012.)

Assertion

Ref	Expression
fsng	⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → (𝐹:{𝐴}⟶{𝐵} ↔ 𝐹 = {⟨𝐴, 𝐵⟩}))

Proof of Theorem fsng

Dummy variables 𝑎 𝑏 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		sneq 4638	. . . 4 ⊢ (𝑎 = 𝐴 → {𝑎} = {𝐴})
2	1	feq2d 6703	. . 3 ⊢ (𝑎 = 𝐴 → (𝐹:{𝑎}⟶{𝑏} ↔ 𝐹:{𝐴}⟶{𝑏}))
3		opeq1 4873	. . . . 5 ⊢ (𝑎 = 𝐴 → ⟨𝑎, 𝑏⟩ = ⟨𝐴, 𝑏⟩)
4	3	sneqd 4640	. . . 4 ⊢ (𝑎 = 𝐴 → {⟨𝑎, 𝑏⟩} = {⟨𝐴, 𝑏⟩})
5	4	eqeq2d 2743	. . 3 ⊢ (𝑎 = 𝐴 → (𝐹 = {⟨𝑎, 𝑏⟩} ↔ 𝐹 = {⟨𝐴, 𝑏⟩}))
6	2, 5	bibi12d 345	. 2 ⊢ (𝑎 = 𝐴 → ((𝐹:{𝑎}⟶{𝑏} ↔ 𝐹 = {⟨𝑎, 𝑏⟩}) ↔ (𝐹:{𝐴}⟶{𝑏} ↔ 𝐹 = {⟨𝐴, 𝑏⟩})))
7		sneq 4638	. . . 4 ⊢ (𝑏 = 𝐵 → {𝑏} = {𝐵})
8	7	feq3d 6704	. . 3 ⊢ (𝑏 = 𝐵 → (𝐹:{𝐴}⟶{𝑏} ↔ 𝐹:{𝐴}⟶{𝐵}))
9		opeq2 4874	. . . . 5 ⊢ (𝑏 = 𝐵 → ⟨𝐴, 𝑏⟩ = ⟨𝐴, 𝐵⟩)
10	9	sneqd 4640	. . . 4 ⊢ (𝑏 = 𝐵 → {⟨𝐴, 𝑏⟩} = {⟨𝐴, 𝐵⟩})
11	10	eqeq2d 2743	. . 3 ⊢ (𝑏 = 𝐵 → (𝐹 = {⟨𝐴, 𝑏⟩} ↔ 𝐹 = {⟨𝐴, 𝐵⟩}))
12	8, 11	bibi12d 345	. 2 ⊢ (𝑏 = 𝐵 → ((𝐹:{𝐴}⟶{𝑏} ↔ 𝐹 = {⟨𝐴, 𝑏⟩}) ↔ (𝐹:{𝐴}⟶{𝐵} ↔ 𝐹 = {⟨𝐴, 𝐵⟩})))
13		vex 3478	. . 3 ⊢ 𝑎 ∈ V
14		vex 3478	. . 3 ⊢ 𝑏 ∈ V
15	13, 14	fsn 7135	. 2 ⊢ (𝐹:{𝑎}⟶{𝑏} ↔ 𝐹 = {⟨𝑎, 𝑏⟩})
16	6, 12, 15	vtocl2g 3562	1 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → (𝐹:{𝐴}⟶{𝐵} ↔ 𝐹 = {⟨𝐴, 𝐵⟩}))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   = wceq 1541   ∈ wcel 2106  {csn 4628  ⟨cop 4634  ⟶wf 6539

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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-ext 2703  ax-sep 5299  ax-nul 5306  ax-pr 5427

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-ral 3062  df-rex 3071  df-reu 3377  df-rab 3433  df-v 3476  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-nul 4323  df-if 4529  df-sn 4629  df-pr 4631  df-op 4635  df-br 5149  df-opab 5211  df-id 5574  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550

This theorem is referenced by:  xpsng  7139  ftpg  7156  mapsnd  8882  axdc3lem4  10450  fseq1p1m1  13577  cats1un  14673  intopsn  18575  efmnd1bas  18776  grp1inv  18933  symg1bas  19260  esumsnf  33131  bnj149  33955  rngosn3  36884  sticksstones9  41062  sticksstones11  41064  k0004lem3  42988  ovnovollem1  45457  mapsnop  47105  snlindsntorlem  47235  lmod1zr  47258