Theorem ressn 6272

Description: Restriction of a class to a singleton. (Contributed by Mario Carneiro, 28-Dec-2014.) (Proof shortened by Peter Mazsa, 2-Oct-2022.)

Assertion

Ref	Expression
ressn	⊢ (𝐴 ↾ {𝐵}) = ({𝐵} × (𝐴 “ {𝐵}))

Proof of Theorem ressn

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

Step	Hyp	Ref	Expression
1		relres 5991	. 2 ⊢ Rel (𝐴 ↾ {𝐵})
2		relxp 5665	. 2 ⊢ Rel ({𝐵} × (𝐴 “ {𝐵}))
3		vex 3458	. . . . . 6 ⊢ 𝑥 ∈ V
4		vex 3458	. . . . . 6 ⊢ 𝑦 ∈ V
5	3, 4	elimasn 6079	. . . . 5 ⊢ (𝑦 ∈ (𝐴 “ {𝑥}) ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐴)
6		elsni 4599	. . . . . . . 8 ⊢ (𝑥 ∈ {𝐵} → 𝑥 = 𝐵)
7	6	sneqd 4594	. . . . . . 7 ⊢ (𝑥 ∈ {𝐵} → {𝑥} = {𝐵})
8	7	imaeq2d 6049	. . . . . 6 ⊢ (𝑥 ∈ {𝐵} → (𝐴 “ {𝑥}) = (𝐴 “ {𝐵}))
9	8	eleq2d 2848	. . . . 5 ⊢ (𝑥 ∈ {𝐵} → (𝑦 ∈ (𝐴 “ {𝑥}) ↔ 𝑦 ∈ (𝐴 “ {𝐵})))
10	5, 9	bitr3id 287	. . . 4 ⊢ (𝑥 ∈ {𝐵} → (⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ 𝑦 ∈ (𝐴 “ {𝐵})))
11	10	pm5.32i 582	. . 3 ⊢ ((𝑥 ∈ {𝐵} ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐴) ↔ (𝑥 ∈ {𝐵} ∧ 𝑦 ∈ (𝐴 “ {𝐵})))
12	4	opelresi 5973	. . 3 ⊢ (⟨𝑥, 𝑦⟩ ∈ (𝐴 ↾ {𝐵}) ↔ (𝑥 ∈ {𝐵} ∧ ⟨𝑥, 𝑦⟩ ∈ 𝐴))
13		opelxp 5683	. . 3 ⊢ (⟨𝑥, 𝑦⟩ ∈ ({𝐵} × (𝐴 “ {𝐵})) ↔ (𝑥 ∈ {𝐵} ∧ 𝑦 ∈ (𝐴 “ {𝐵})))
14	11, 12, 13	3bitr4i 305	. 2 ⊢ (⟨𝑥, 𝑦⟩ ∈ (𝐴 ↾ {𝐵}) ↔ ⟨𝑥, 𝑦⟩ ∈ ({𝐵} × (𝐴 “ {𝐵})))
15	1, 2, 14	eqrelriiv 5762	1 ⊢ (𝐴 ↾ {𝐵}) = ({𝐵} × (𝐴 “ {𝐵}))

Syntax hints:   ∧ wa 399   = wceq 1560   ∈ wcel 2142  {csn 4582  ⟨cop 4588   × cxp 5645   ↾ cres 5649   “ cima 5650

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-ext 2734  ax-sep 5246  ax-pr 5390

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-sb 2091  df-clab 2741  df-cleq 2754  df-clel 2837  df-ral 3077  df-rex 3087  df-rab 3415  df-v 3456  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4481  df-sn 4583  df-pr 4585  df-op 4589  df-br 5101  df-opab 5163  df-xp 5653  df-rel 5654  df-cnv 5655  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660

This theorem is referenced by:  gsum2dlem2  20011  dprd2da  20084  ustneism  24284  tposres3  49502