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

Theorem funcid 17134
Description: A functor maps each identity to the corresponding identity in the target category. (Contributed by Mario Carneiro, 2-Jan-2017.)
Hypotheses
Ref Expression
funcid.b 𝐵 = (Base‘𝐷)
funcid.1 1 = (Id‘𝐷)
funcid.i 𝐼 = (Id‘𝐸)
funcid.f (𝜑𝐹(𝐷 Func 𝐸)𝐺)
funcid.x (𝜑𝑋𝐵)
Assertion
Ref Expression
funcid (𝜑 → ((𝑋𝐺𝑋)‘( 1𝑋)) = (𝐼‘(𝐹𝑋)))

Proof of Theorem funcid
Dummy variables 𝑚 𝑛 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 id 22 . . . . 5 (𝑥 = 𝑋𝑥 = 𝑋)
21, 1oveq12d 7168 . . . 4 (𝑥 = 𝑋 → (𝑥𝐺𝑥) = (𝑋𝐺𝑋))
3 fveq2 6664 . . . 4 (𝑥 = 𝑋 → ( 1𝑥) = ( 1𝑋))
42, 3fveq12d 6671 . . 3 (𝑥 = 𝑋 → ((𝑥𝐺𝑥)‘( 1𝑥)) = ((𝑋𝐺𝑋)‘( 1𝑋)))
5 2fveq3 6669 . . 3 (𝑥 = 𝑋 → (𝐼‘(𝐹𝑥)) = (𝐼‘(𝐹𝑋)))
64, 5eqeq12d 2837 . 2 (𝑥 = 𝑋 → (((𝑥𝐺𝑥)‘( 1𝑥)) = (𝐼‘(𝐹𝑥)) ↔ ((𝑋𝐺𝑋)‘( 1𝑋)) = (𝐼‘(𝐹𝑋))))
7 funcid.f . . . . 5 (𝜑𝐹(𝐷 Func 𝐸)𝐺)
8 funcid.b . . . . . 6 𝐵 = (Base‘𝐷)
9 eqid 2821 . . . . . 6 (Base‘𝐸) = (Base‘𝐸)
10 eqid 2821 . . . . . 6 (Hom ‘𝐷) = (Hom ‘𝐷)
11 eqid 2821 . . . . . 6 (Hom ‘𝐸) = (Hom ‘𝐸)
12 funcid.1 . . . . . 6 1 = (Id‘𝐷)
13 funcid.i . . . . . 6 𝐼 = (Id‘𝐸)
14 eqid 2821 . . . . . 6 (comp‘𝐷) = (comp‘𝐷)
15 eqid 2821 . . . . . 6 (comp‘𝐸) = (comp‘𝐸)
16 df-br 5059 . . . . . . . . 9 (𝐹(𝐷 Func 𝐸)𝐺 ↔ ⟨𝐹, 𝐺⟩ ∈ (𝐷 Func 𝐸))
177, 16sylib 220 . . . . . . . 8 (𝜑 → ⟨𝐹, 𝐺⟩ ∈ (𝐷 Func 𝐸))
18 funcrcl 17127 . . . . . . . 8 (⟨𝐹, 𝐺⟩ ∈ (𝐷 Func 𝐸) → (𝐷 ∈ Cat ∧ 𝐸 ∈ Cat))
1917, 18syl 17 . . . . . . 7 (𝜑 → (𝐷 ∈ Cat ∧ 𝐸 ∈ Cat))
2019simpld 497 . . . . . 6 (𝜑𝐷 ∈ Cat)
2119simprd 498 . . . . . 6 (𝜑𝐸 ∈ Cat)
228, 9, 10, 11, 12, 13, 14, 15, 20, 21isfunc 17128 . . . . 5 (𝜑 → (𝐹(𝐷 Func 𝐸)𝐺 ↔ (𝐹:𝐵⟶(Base‘𝐸) ∧ 𝐺X𝑧 ∈ (𝐵 × 𝐵)(((𝐹‘(1st𝑧))(Hom ‘𝐸)(𝐹‘(2nd𝑧))) ↑m ((Hom ‘𝐷)‘𝑧)) ∧ ∀𝑥𝐵 (((𝑥𝐺𝑥)‘( 1𝑥)) = (𝐼‘(𝐹𝑥)) ∧ ∀𝑦𝐵𝑧𝐵𝑚 ∈ (𝑥(Hom ‘𝐷)𝑦)∀𝑛 ∈ (𝑦(Hom ‘𝐷)𝑧)((𝑥𝐺𝑧)‘(𝑛(⟨𝑥, 𝑦⟩(comp‘𝐷)𝑧)𝑚)) = (((𝑦𝐺𝑧)‘𝑛)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐸)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑚))))))
237, 22mpbid 234 . . . 4 (𝜑 → (𝐹:𝐵⟶(Base‘𝐸) ∧ 𝐺X𝑧 ∈ (𝐵 × 𝐵)(((𝐹‘(1st𝑧))(Hom ‘𝐸)(𝐹‘(2nd𝑧))) ↑m ((Hom ‘𝐷)‘𝑧)) ∧ ∀𝑥𝐵 (((𝑥𝐺𝑥)‘( 1𝑥)) = (𝐼‘(𝐹𝑥)) ∧ ∀𝑦𝐵𝑧𝐵𝑚 ∈ (𝑥(Hom ‘𝐷)𝑦)∀𝑛 ∈ (𝑦(Hom ‘𝐷)𝑧)((𝑥𝐺𝑧)‘(𝑛(⟨𝑥, 𝑦⟩(comp‘𝐷)𝑧)𝑚)) = (((𝑦𝐺𝑧)‘𝑛)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐸)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑚)))))
2423simp3d 1140 . . 3 (𝜑 → ∀𝑥𝐵 (((𝑥𝐺𝑥)‘( 1𝑥)) = (𝐼‘(𝐹𝑥)) ∧ ∀𝑦𝐵𝑧𝐵𝑚 ∈ (𝑥(Hom ‘𝐷)𝑦)∀𝑛 ∈ (𝑦(Hom ‘𝐷)𝑧)((𝑥𝐺𝑧)‘(𝑛(⟨𝑥, 𝑦⟩(comp‘𝐷)𝑧)𝑚)) = (((𝑦𝐺𝑧)‘𝑛)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐸)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑚))))
25 simpl 485 . . . 4 ((((𝑥𝐺𝑥)‘( 1𝑥)) = (𝐼‘(𝐹𝑥)) ∧ ∀𝑦𝐵𝑧𝐵𝑚 ∈ (𝑥(Hom ‘𝐷)𝑦)∀𝑛 ∈ (𝑦(Hom ‘𝐷)𝑧)((𝑥𝐺𝑧)‘(𝑛(⟨𝑥, 𝑦⟩(comp‘𝐷)𝑧)𝑚)) = (((𝑦𝐺𝑧)‘𝑛)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐸)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑚))) → ((𝑥𝐺𝑥)‘( 1𝑥)) = (𝐼‘(𝐹𝑥)))
2625ralimi 3160 . . 3 (∀𝑥𝐵 (((𝑥𝐺𝑥)‘( 1𝑥)) = (𝐼‘(𝐹𝑥)) ∧ ∀𝑦𝐵𝑧𝐵𝑚 ∈ (𝑥(Hom ‘𝐷)𝑦)∀𝑛 ∈ (𝑦(Hom ‘𝐷)𝑧)((𝑥𝐺𝑧)‘(𝑛(⟨𝑥, 𝑦⟩(comp‘𝐷)𝑧)𝑚)) = (((𝑦𝐺𝑧)‘𝑛)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐸)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑚))) → ∀𝑥𝐵 ((𝑥𝐺𝑥)‘( 1𝑥)) = (𝐼‘(𝐹𝑥)))
2724, 26syl 17 . 2 (𝜑 → ∀𝑥𝐵 ((𝑥𝐺𝑥)‘( 1𝑥)) = (𝐼‘(𝐹𝑥)))
28 funcid.x . 2 (𝜑𝑋𝐵)
296, 27, 28rspcdva 3624 1 (𝜑 → ((𝑋𝐺𝑋)‘( 1𝑋)) = (𝐼‘(𝐹𝑋)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 398  w3a 1083   = wceq 1533  wcel 2110  wral 3138  cop 4566   class class class wbr 5058   × cxp 5547  wf 6345  cfv 6349  (class class class)co 7150  1st c1st 7681  2nd c2nd 7682  m cmap 8400  Xcixp 8455  Basecbs 16477  Hom chom 16570  compcco 16571  Catccat 16929  Idccid 16930   Func cfunc 17118
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-rep 5182  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-op 4567  df-uni 4832  df-iun 4913  df-br 5059  df-opab 5121  df-mpt 5139  df-id 5454  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-f1 6354  df-fo 6355  df-f1o 6356  df-fv 6357  df-ov 7153  df-oprab 7154  df-mpo 7155  df-map 8402  df-ixp 8456  df-func 17122
This theorem is referenced by:  funcsect  17136  funcoppc  17139  cofucl  17152  funcres  17160  fthsect  17189  catcisolem  17360  prfcl  17447  evlfcl  17466  curf1cl  17472  curfcl  17476  curfuncf  17482  yonedainv  17525
  Copyright terms: Public domain W3C validator