Theorem catideu 17619

Description: Each object in a category has a unique identity arrow. (Contributed by Mario Carneiro, 2-Jan-2017.)

Hypotheses

Ref	Expression
catidex.b	⊢ 𝐵 = (Base‘𝐶)
catidex.h	⊢ 𝐻 = (Hom ‘𝐶)
catidex.o	⊢ · = (comp‘𝐶)
catidex.c	⊢ (𝜑 → 𝐶 ∈ Cat)
catidex.x	⊢ (𝜑 → 𝑋 ∈ 𝐵)

Assertion

Ref	Expression
catideu	⊢ (𝜑 → ∃!𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓))

Distinct variable groups:   𝑓,𝑔,𝑦,𝐵   𝐶,𝑓,𝑔,𝑦   𝜑,𝑔   𝑓,𝑋,𝑔,𝑦   𝑓,𝐻,𝑔,𝑦   · ,𝑓,𝑔,𝑦

Allowed substitution hints:   𝜑(𝑦,𝑓)

Proof of Theorem catideu

Dummy variable ℎ is distinct from all other variables.

Step	Hyp	Ref	Expression
1		catidex.b	. . 3 ⊢ 𝐵 = (Base‘𝐶)
2		catidex.h	. . 3 ⊢ 𝐻 = (Hom ‘𝐶)
3		catidex.o	. . 3 ⊢ · = (comp‘𝐶)
4		catidex.c	. . 3 ⊢ (𝜑 → 𝐶 ∈ Cat)
5		catidex.x	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
6	1, 2, 3, 4, 5	catidex 17618	. 2 ⊢ (𝜑 → ∃𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓))
7		oveq1 7416	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → (𝑦𝐻𝑋) = (𝑋𝐻𝑋))
8		opeq1 4874	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑋 → ⟨𝑦, 𝑋⟩ = ⟨𝑋, 𝑋⟩)
9	8	oveq1d 7424	. . . . . . . . . 10 ⊢ (𝑦 = 𝑋 → (⟨𝑦, 𝑋⟩ · 𝑋) = (⟨𝑋, 𝑋⟩ · 𝑋))
10	9	oveqd 7426	. . . . . . . . 9 ⊢ (𝑦 = 𝑋 → (𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓))
11	10	eqeq1d 2735	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → ((𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓))
12	7, 11	raleqbidv 3343	. . . . . . 7 ⊢ (𝑦 = 𝑋 → (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓))
13		oveq2 7417	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → (𝑋𝐻𝑦) = (𝑋𝐻𝑋))
14		oveq2 7417	. . . . . . . . . 10 ⊢ (𝑦 = 𝑋 → (⟨𝑋, 𝑋⟩ · 𝑦) = (⟨𝑋, 𝑋⟩ · 𝑋))
15	14	oveqd 7426	. . . . . . . . 9 ⊢ (𝑦 = 𝑋 → (𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔))
16	15	eqeq1d 2735	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → ((𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓 ↔ (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓))
17	13, 16	raleqbidv 3343	. . . . . . 7 ⊢ (𝑦 = 𝑋 → (∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓 ↔ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓))
18	12, 17	anbi12d 632	. . . . . 6 ⊢ (𝑦 = 𝑋 → ((∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) ↔ (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)))
19	18	rspcv 3609	. . . . 5 ⊢ (𝑋 ∈ 𝐵 → (∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)))
20	5, 19	syl 17	. . . 4 ⊢ (𝜑 → (∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)))
21	20	ralrimivw 3151	. . 3 ⊢ (𝜑 → ∀𝑔 ∈ (𝑋𝐻𝑋)(∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)))
22		an3 658	. . . . . . 7 ⊢ (((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓))
23		oveq2 7417	. . . . . . . . . 10 ⊢ (𝑓 = ℎ → (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ))
24		id 22	. . . . . . . . . 10 ⊢ (𝑓 = ℎ → 𝑓 = ℎ)
25	23, 24	eqeq12d 2749	. . . . . . . . 9 ⊢ (𝑓 = ℎ → ((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ))
26	25	rspcv 3609	. . . . . . . 8 ⊢ (ℎ ∈ (𝑋𝐻𝑋) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 → (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ))
27		oveq1 7416	. . . . . . . . . 10 ⊢ (𝑓 = 𝑔 → (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ))
28		id 22	. . . . . . . . . 10 ⊢ (𝑓 = 𝑔 → 𝑓 = 𝑔)
29	27, 28	eqeq12d 2749	. . . . . . . . 9 ⊢ (𝑓 = 𝑔 → ((𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓 ↔ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔))
30	29	rspcv 3609	. . . . . . . 8 ⊢ (𝑔 ∈ (𝑋𝐻𝑋) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓 → (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔))
31	26, 30	im2anan9r 622	. . . . . . 7 ⊢ ((𝑔 ∈ (𝑋𝐻𝑋) ∧ ℎ ∈ (𝑋𝐻𝑋)) → ((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓) → ((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ ∧ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔)))
32		eqtr2 2757	. . . . . . . 8 ⊢ (((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ ∧ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔) → ℎ = 𝑔)
33	32	equcomd 2023	. . . . . . 7 ⊢ (((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ ∧ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔) → 𝑔 = ℎ)
34	22, 31, 33	syl56 36	. . . . . 6 ⊢ ((𝑔 ∈ (𝑋𝐻𝑋) ∧ ℎ ∈ (𝑋𝐻𝑋)) → (((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → 𝑔 = ℎ))
35	34	rgen2 3198	. . . . 5 ⊢ ∀𝑔 ∈ (𝑋𝐻𝑋)∀ℎ ∈ (𝑋𝐻𝑋)(((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → 𝑔 = ℎ)
36	35	a1i 11	. . . 4 ⊢ (𝜑 → ∀𝑔 ∈ (𝑋𝐻𝑋)∀ℎ ∈ (𝑋𝐻𝑋)(((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → 𝑔 = ℎ))
37		oveq1 7416	. . . . . . . 8 ⊢ (𝑔 = ℎ → (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = (ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓))
38	37	eqeq1d 2735	. . . . . . 7 ⊢ (𝑔 = ℎ → ((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ (ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓))
39	38	ralbidv 3178	. . . . . 6 ⊢ (𝑔 = ℎ → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ ∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓))
40		oveq2 7417	. . . . . . . 8 ⊢ (𝑔 = ℎ → (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ))
41	40	eqeq1d 2735	. . . . . . 7 ⊢ (𝑔 = ℎ → ((𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓 ↔ (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓))
42	41	ralbidv 3178	. . . . . 6 ⊢ (𝑔 = ℎ → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓 ↔ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓))
43	39, 42	anbi12d 632	. . . . 5 ⊢ (𝑔 = ℎ → ((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ↔ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)))
44	43	rmo4 3727	. . . 4 ⊢ (∃*𝑔 ∈ (𝑋𝐻𝑋)(∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ↔ ∀𝑔 ∈ (𝑋𝐻𝑋)∀ℎ ∈ (𝑋𝐻𝑋)(((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → 𝑔 = ℎ))
45	36, 44	sylibr 233	. . 3 ⊢ (𝜑 → ∃*𝑔 ∈ (𝑋𝐻𝑋)(∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓))
46		rmoim 3737	. . 3 ⊢ (∀𝑔 ∈ (𝑋𝐻𝑋)(∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)) → (∃*𝑔 ∈ (𝑋𝐻𝑋)(∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) → ∃*𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓)))
47	21, 45, 46	sylc 65	. 2 ⊢ (𝜑 → ∃*𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓))
48		reu5 3379	. 2 ⊢ (∃!𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) ↔ (∃𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) ∧ ∃*𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓)))
49	6, 47, 48	sylanbrc 584	1 ⊢ (𝜑 → ∃!𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓))

Syntax hints:   → wi 4   ∧ wa 397   = wceq 1542   ∈ wcel 2107  ∀wral 3062  ∃wrex 3071  ∃!wreu 3375  ∃*wrmo 3376  ⟨cop 4635  ‘cfv 6544  (class class class)co 7409  Basecbs 17144  Hom chom 17208  compcco 17209  Catccat 17608

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-ext 2704  ax-nul 5307

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-ne 2942  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3779  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-nul 4324  df-if 4530  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4910  df-br 5150  df-iota 6496  df-fv 6552  df-ov 7412  df-cat 17612

This theorem is referenced by:  catidd  17624  catidcl  17626  catlid  17627  catrid  17628