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

Theorem cidval 16603
Description: Each object in a category has an associated identity arrow. (Contributed by Mario Carneiro, 2-Jan-2017.)
Hypotheses
Ref Expression
cidfval.b 𝐵 = (Base‘𝐶)
cidfval.h 𝐻 = (Hom ‘𝐶)
cidfval.o · = (comp‘𝐶)
cidfval.c (𝜑𝐶 ∈ Cat)
cidfval.i 1 = (Id‘𝐶)
cidval.x (𝜑𝑋𝐵)
Assertion
Ref Expression
cidval (𝜑 → ( 1𝑋) = (𝑔 ∈ (𝑋𝐻𝑋)∀𝑦𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋· 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋· 𝑦)𝑔) = 𝑓)))
Distinct variable groups:   𝑓,𝑔,𝑦,𝐵   𝐶,𝑓,𝑔,𝑦   · ,𝑓,𝑔,𝑦   𝑓,𝐻,𝑔,𝑦   𝜑,𝑓,𝑔,𝑦   𝑓,𝑋,𝑔,𝑦
Allowed substitution hints:   1 (𝑦,𝑓,𝑔)

Proof of Theorem cidval
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 cidfval.b . . 3 𝐵 = (Base‘𝐶)
2 cidfval.h . . 3 𝐻 = (Hom ‘𝐶)
3 cidfval.o . . 3 · = (comp‘𝐶)
4 cidfval.c . . 3 (𝜑𝐶 ∈ Cat)
5 cidfval.i . . 3 1 = (Id‘𝐶)
61, 2, 3, 4, 5cidfval 16602 . 2 (𝜑1 = (𝑥𝐵 ↦ (𝑔 ∈ (𝑥𝐻𝑥)∀𝑦𝐵 (∀𝑓 ∈ (𝑦𝐻𝑥)(𝑔(⟨𝑦, 𝑥· 𝑥)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑥𝐻𝑦)(𝑓(⟨𝑥, 𝑥· 𝑦)𝑔) = 𝑓))))
7 simpr 477 . . . 4 ((𝜑𝑥 = 𝑋) → 𝑥 = 𝑋)
87, 7oveq12d 6860 . . 3 ((𝜑𝑥 = 𝑋) → (𝑥𝐻𝑥) = (𝑋𝐻𝑋))
97oveq2d 6858 . . . . . 6 ((𝜑𝑥 = 𝑋) → (𝑦𝐻𝑥) = (𝑦𝐻𝑋))
107opeq2d 4566 . . . . . . . . 9 ((𝜑𝑥 = 𝑋) → ⟨𝑦, 𝑥⟩ = ⟨𝑦, 𝑋⟩)
1110, 7oveq12d 6860 . . . . . . . 8 ((𝜑𝑥 = 𝑋) → (⟨𝑦, 𝑥· 𝑥) = (⟨𝑦, 𝑋· 𝑋))
1211oveqd 6859 . . . . . . 7 ((𝜑𝑥 = 𝑋) → (𝑔(⟨𝑦, 𝑥· 𝑥)𝑓) = (𝑔(⟨𝑦, 𝑋· 𝑋)𝑓))
1312eqeq1d 2767 . . . . . 6 ((𝜑𝑥 = 𝑋) → ((𝑔(⟨𝑦, 𝑥· 𝑥)𝑓) = 𝑓 ↔ (𝑔(⟨𝑦, 𝑋· 𝑋)𝑓) = 𝑓))
149, 13raleqbidv 3300 . . . . 5 ((𝜑𝑥 = 𝑋) → (∀𝑓 ∈ (𝑦𝐻𝑥)(𝑔(⟨𝑦, 𝑥· 𝑥)𝑓) = 𝑓 ↔ ∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋· 𝑋)𝑓) = 𝑓))
157oveq1d 6857 . . . . . 6 ((𝜑𝑥 = 𝑋) → (𝑥𝐻𝑦) = (𝑋𝐻𝑦))
167, 7opeq12d 4567 . . . . . . . . 9 ((𝜑𝑥 = 𝑋) → ⟨𝑥, 𝑥⟩ = ⟨𝑋, 𝑋⟩)
1716oveq1d 6857 . . . . . . . 8 ((𝜑𝑥 = 𝑋) → (⟨𝑥, 𝑥· 𝑦) = (⟨𝑋, 𝑋· 𝑦))
1817oveqd 6859 . . . . . . 7 ((𝜑𝑥 = 𝑋) → (𝑓(⟨𝑥, 𝑥· 𝑦)𝑔) = (𝑓(⟨𝑋, 𝑋· 𝑦)𝑔))
1918eqeq1d 2767 . . . . . 6 ((𝜑𝑥 = 𝑋) → ((𝑓(⟨𝑥, 𝑥· 𝑦)𝑔) = 𝑓 ↔ (𝑓(⟨𝑋, 𝑋· 𝑦)𝑔) = 𝑓))
2015, 19raleqbidv 3300 . . . . 5 ((𝜑𝑥 = 𝑋) → (∀𝑓 ∈ (𝑥𝐻𝑦)(𝑓(⟨𝑥, 𝑥· 𝑦)𝑔) = 𝑓 ↔ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋· 𝑦)𝑔) = 𝑓))
2114, 20anbi12d 624 . . . 4 ((𝜑𝑥 = 𝑋) → ((∀𝑓 ∈ (𝑦𝐻𝑥)(𝑔(⟨𝑦, 𝑥· 𝑥)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑥𝐻𝑦)(𝑓(⟨𝑥, 𝑥· 𝑦)𝑔) = 𝑓) ↔ (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋· 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋· 𝑦)𝑔) = 𝑓)))
2221ralbidv 3133 . . 3 ((𝜑𝑥 = 𝑋) → (∀𝑦𝐵 (∀𝑓 ∈ (𝑦𝐻𝑥)(𝑔(⟨𝑦, 𝑥· 𝑥)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑥𝐻𝑦)(𝑓(⟨𝑥, 𝑥· 𝑦)𝑔) = 𝑓) ↔ ∀𝑦𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋· 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋· 𝑦)𝑔) = 𝑓)))
238, 22riotaeqbidv 6806 . 2 ((𝜑𝑥 = 𝑋) → (𝑔 ∈ (𝑥𝐻𝑥)∀𝑦𝐵 (∀𝑓 ∈ (𝑦𝐻𝑥)(𝑔(⟨𝑦, 𝑥· 𝑥)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑥𝐻𝑦)(𝑓(⟨𝑥, 𝑥· 𝑦)𝑔) = 𝑓)) = (𝑔 ∈ (𝑋𝐻𝑋)∀𝑦𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋· 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋· 𝑦)𝑔) = 𝑓)))
24 cidval.x . 2 (𝜑𝑋𝐵)
25 riotaex 6807 . . 3 (𝑔 ∈ (𝑋𝐻𝑋)∀𝑦𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋· 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋· 𝑦)𝑔) = 𝑓)) ∈ V
2625a1i 11 . 2 (𝜑 → (𝑔 ∈ (𝑋𝐻𝑋)∀𝑦𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋· 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋· 𝑦)𝑔) = 𝑓)) ∈ V)
276, 23, 24, 26fvmptd 6477 1 (𝜑 → ( 1𝑋) = (𝑔 ∈ (𝑋𝐻𝑋)∀𝑦𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋· 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋· 𝑦)𝑔) = 𝑓)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 384   = wceq 1652  wcel 2155  wral 3055  Vcvv 3350  cop 4340  cfv 6068  crio 6802  (class class class)co 6842  Basecbs 16130  Hom chom 16225  compcco 16226  Catccat 16590  Idccid 16591
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-rep 4930  ax-sep 4941  ax-nul 4949  ax-pr 5062
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 3597  df-csb 3692  df-dif 3735  df-un 3737  df-in 3739  df-ss 3746  df-nul 4080  df-if 4244  df-sn 4335  df-pr 4337  df-op 4341  df-uni 4595  df-iun 4678  df-br 4810  df-opab 4872  df-mpt 4889  df-id 5185  df-xp 5283  df-rel 5284  df-cnv 5285  df-co 5286  df-dm 5287  df-rn 5288  df-res 5289  df-ima 5290  df-iota 6031  df-fun 6070  df-fn 6071  df-f 6072  df-f1 6073  df-fo 6074  df-f1o 6075  df-fv 6076  df-riota 6803  df-ov 6845  df-cid 16595
This theorem is referenced by:  catidcl  16608  catlid  16609  catrid  16610
  Copyright terms: Public domain W3C validator