MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  fnressn Structured version   Visualization version   GIF version

Theorem fnressn 6621
Description: A function restricted to a singleton. (Contributed by NM, 9-Oct-2004.)
Assertion
Ref Expression
fnressn ((𝐹 Fn 𝐴𝐵𝐴) → (𝐹 ↾ {𝐵}) = {⟨𝐵, (𝐹𝐵)⟩})

Proof of Theorem fnressn
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 sneq 4346 . . . . . 6 (𝑥 = 𝐵 → {𝑥} = {𝐵})
21reseq2d 5567 . . . . 5 (𝑥 = 𝐵 → (𝐹 ↾ {𝑥}) = (𝐹 ↾ {𝐵}))
3 fveq2 6379 . . . . . . 7 (𝑥 = 𝐵 → (𝐹𝑥) = (𝐹𝐵))
4 opeq12 4563 . . . . . . 7 ((𝑥 = 𝐵 ∧ (𝐹𝑥) = (𝐹𝐵)) → ⟨𝑥, (𝐹𝑥)⟩ = ⟨𝐵, (𝐹𝐵)⟩)
53, 4mpdan 678 . . . . . 6 (𝑥 = 𝐵 → ⟨𝑥, (𝐹𝑥)⟩ = ⟨𝐵, (𝐹𝐵)⟩)
65sneqd 4348 . . . . 5 (𝑥 = 𝐵 → {⟨𝑥, (𝐹𝑥)⟩} = {⟨𝐵, (𝐹𝐵)⟩})
72, 6eqeq12d 2780 . . . 4 (𝑥 = 𝐵 → ((𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩} ↔ (𝐹 ↾ {𝐵}) = {⟨𝐵, (𝐹𝐵)⟩}))
87imbi2d 331 . . 3 (𝑥 = 𝐵 → ((𝐹 Fn 𝐴 → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩}) ↔ (𝐹 Fn 𝐴 → (𝐹 ↾ {𝐵}) = {⟨𝐵, (𝐹𝐵)⟩})))
9 vex 3353 . . . . . . 7 𝑥 ∈ V
109snss 4472 . . . . . 6 (𝑥𝐴 ↔ {𝑥} ⊆ 𝐴)
11 fnssres 6184 . . . . . 6 ((𝐹 Fn 𝐴 ∧ {𝑥} ⊆ 𝐴) → (𝐹 ↾ {𝑥}) Fn {𝑥})
1210, 11sylan2b 587 . . . . 5 ((𝐹 Fn 𝐴𝑥𝐴) → (𝐹 ↾ {𝑥}) Fn {𝑥})
13 dffn2 6227 . . . . . 6 ((𝐹 ↾ {𝑥}) Fn {𝑥} ↔ (𝐹 ↾ {𝑥}):{𝑥}⟶V)
149fsn2 6598 . . . . . 6 ((𝐹 ↾ {𝑥}):{𝑥}⟶V ↔ (((𝐹 ↾ {𝑥})‘𝑥) ∈ V ∧ (𝐹 ↾ {𝑥}) = {⟨𝑥, ((𝐹 ↾ {𝑥})‘𝑥)⟩}))
15 fvex 6392 . . . . . . . 8 ((𝐹 ↾ {𝑥})‘𝑥) ∈ V
1615biantrur 526 . . . . . . 7 ((𝐹 ↾ {𝑥}) = {⟨𝑥, ((𝐹 ↾ {𝑥})‘𝑥)⟩} ↔ (((𝐹 ↾ {𝑥})‘𝑥) ∈ V ∧ (𝐹 ↾ {𝑥}) = {⟨𝑥, ((𝐹 ↾ {𝑥})‘𝑥)⟩}))
17 vsnid 4369 . . . . . . . . . . 11 𝑥 ∈ {𝑥}
18 fvres 6398 . . . . . . . . . . 11 (𝑥 ∈ {𝑥} → ((𝐹 ↾ {𝑥})‘𝑥) = (𝐹𝑥))
1917, 18ax-mp 5 . . . . . . . . . 10 ((𝐹 ↾ {𝑥})‘𝑥) = (𝐹𝑥)
2019opeq2i 4565 . . . . . . . . 9 𝑥, ((𝐹 ↾ {𝑥})‘𝑥)⟩ = ⟨𝑥, (𝐹𝑥)⟩
2120sneqi 4347 . . . . . . . 8 {⟨𝑥, ((𝐹 ↾ {𝑥})‘𝑥)⟩} = {⟨𝑥, (𝐹𝑥)⟩}
2221eqeq2i 2777 . . . . . . 7 ((𝐹 ↾ {𝑥}) = {⟨𝑥, ((𝐹 ↾ {𝑥})‘𝑥)⟩} ↔ (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩})
2316, 22bitr3i 268 . . . . . 6 ((((𝐹 ↾ {𝑥})‘𝑥) ∈ V ∧ (𝐹 ↾ {𝑥}) = {⟨𝑥, ((𝐹 ↾ {𝑥})‘𝑥)⟩}) ↔ (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩})
2413, 14, 233bitri 288 . . . . 5 ((𝐹 ↾ {𝑥}) Fn {𝑥} ↔ (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩})
2512, 24sylib 209 . . . 4 ((𝐹 Fn 𝐴𝑥𝐴) → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩})
2625expcom 402 . . 3 (𝑥𝐴 → (𝐹 Fn 𝐴 → (𝐹 ↾ {𝑥}) = {⟨𝑥, (𝐹𝑥)⟩}))
278, 26vtoclga 3425 . 2 (𝐵𝐴 → (𝐹 Fn 𝐴 → (𝐹 ↾ {𝐵}) = {⟨𝐵, (𝐹𝐵)⟩}))
2827impcom 396 1 ((𝐹 Fn 𝐴𝐵𝐴) → (𝐹 ↾ {𝐵}) = {⟨𝐵, (𝐹𝐵)⟩})
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 384   = wceq 1652  wcel 2155  Vcvv 3350  wss 3734  {csn 4336  cop 4342  cres 5281   Fn wfn 6065  wf 6066  cfv 6070
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1890  ax-4 1904  ax-5 2005  ax-6 2070  ax-7 2105  ax-9 2164  ax-10 2183  ax-11 2198  ax-12 2211  ax-13 2352  ax-ext 2743  ax-sep 4943  ax-nul 4951  ax-pr 5064
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 874  df-3an 1109  df-tru 1656  df-ex 1875  df-nf 1879  df-sb 2063  df-mo 2565  df-eu 2582  df-clab 2752  df-cleq 2758  df-clel 2761  df-nfc 2896  df-ne 2938  df-ral 3060  df-rex 3061  df-reu 3062  df-rab 3064  df-v 3352  df-sbc 3599  df-dif 3737  df-un 3739  df-in 3741  df-ss 3748  df-nul 4082  df-if 4246  df-sn 4337  df-pr 4339  df-op 4343  df-uni 4597  df-br 4812  df-opab 4874  df-id 5187  df-xp 5285  df-rel 5286  df-cnv 5287  df-co 5288  df-dm 5289  df-rn 5290  df-res 5291  df-ima 5292  df-iota 6033  df-fun 6072  df-fn 6073  df-f 6074  df-f1 6075  df-fo 6076  df-f1o 6077  df-fv 6078
This theorem is referenced by:  funressn  6622  fressnfv  6623  fnsnsplit  6647  canthp1lem2  9732  fseq1p1m1  12626  resunimafz0  13435  dprd2da  18722  dmdprdpr  18729  dprdpr  18730  dpjlem  18731  pgpfaclem1  18761  islindf4  20467  xpstopnlem1  21906  ptcmpfi  21910  subfacp1lem5  31635  cvmliftlem10  31745  nosupbnd2lem1  32326  poimirlem9  33863
  Copyright terms: Public domain W3C validator