Theorem catideu 16336

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 16335	. 2 ⊢ (𝜑 → ∃𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓))
7		oveq1 6657	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → (𝑦𝐻𝑋) = (𝑋𝐻𝑋))
8		opeq1 4402	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑋 → ⟨𝑦, 𝑋⟩ = ⟨𝑋, 𝑋⟩)
9	8	oveq1d 6665	. . . . . . . . . 10 ⊢ (𝑦 = 𝑋 → (⟨𝑦, 𝑋⟩ · 𝑋) = (⟨𝑋, 𝑋⟩ · 𝑋))
10	9	oveqd 6667	. . . . . . . . 9 ⊢ (𝑦 = 𝑋 → (𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓))
11	10	eqeq1d 2624	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → ((𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓))
12	7, 11	raleqbidv 3152	. . . . . . 7 ⊢ (𝑦 = 𝑋 → (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓))
13		oveq2 6658	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → (𝑋𝐻𝑦) = (𝑋𝐻𝑋))
14		oveq2 6658	. . . . . . . . . 10 ⊢ (𝑦 = 𝑋 → (⟨𝑋, 𝑋⟩ · 𝑦) = (⟨𝑋, 𝑋⟩ · 𝑋))
15	14	oveqd 6667	. . . . . . . . 9 ⊢ (𝑦 = 𝑋 → (𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔))
16	15	eqeq1d 2624	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → ((𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓 ↔ (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓))
17	13, 16	raleqbidv 3152	. . . . . . 7 ⊢ (𝑦 = 𝑋 → (∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓 ↔ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓))
18	12, 17	anbi12d 747	. . . . . 6 ⊢ (𝑦 = 𝑋 → ((∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) ↔ (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)))
19	18	rspcv 3305	. . . . 5 ⊢ (𝑋 ∈ 𝐵 → (∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)))
20	5, 19	syl 17	. . . 4 ⊢ (𝜑 → (∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)))
21	20	ralrimivw 2967	. . 3 ⊢ (𝜑 → ∀𝑔 ∈ (𝑋𝐻𝑋)(∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)))
22		an3 868	. . . . . . 7 ⊢ (((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓))
23		oveq2 6658	. . . . . . . . . 10 ⊢ (𝑓 = ℎ → (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ))
24		id 22	. . . . . . . . . 10 ⊢ (𝑓 = ℎ → 𝑓 = ℎ)
25	23, 24	eqeq12d 2637	. . . . . . . . 9 ⊢ (𝑓 = ℎ → ((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ))
26	25	rspcv 3305	. . . . . . . 8 ⊢ (ℎ ∈ (𝑋𝐻𝑋) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 → (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ))
27		oveq1 6657	. . . . . . . . . 10 ⊢ (𝑓 = 𝑔 → (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ))
28		id 22	. . . . . . . . . 10 ⊢ (𝑓 = 𝑔 → 𝑓 = 𝑔)
29	27, 28	eqeq12d 2637	. . . . . . . . 9 ⊢ (𝑓 = 𝑔 → ((𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓 ↔ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔))
30	29	rspcv 3305	. . . . . . . 8 ⊢ (𝑔 ∈ (𝑋𝐻𝑋) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓 → (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔))
31	26, 30	im2anan9r 881	. . . . . . 7 ⊢ ((𝑔 ∈ (𝑋𝐻𝑋) ∧ ℎ ∈ (𝑋𝐻𝑋)) → ((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓) → ((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ ∧ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔)))
32		eqtr2 2642	. . . . . . . 8 ⊢ (((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ ∧ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔) → ℎ = 𝑔)
33	32	equcomd 1946	. . . . . . 7 ⊢ (((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = ℎ ∧ (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑔) → 𝑔 = ℎ)
34	22, 31, 33	syl56 36	. . . . . 6 ⊢ ((𝑔 ∈ (𝑋𝐻𝑋) ∧ ℎ ∈ (𝑋𝐻𝑋)) → (((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → 𝑔 = ℎ))
35	34	rgen2a 2977	. . . . 5 ⊢ ∀𝑔 ∈ (𝑋𝐻𝑋)∀ℎ ∈ (𝑋𝐻𝑋)(((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → 𝑔 = ℎ)
36	35	a1i 11	. . . 4 ⊢ (𝜑 → ∀𝑔 ∈ (𝑋𝐻𝑋)∀ℎ ∈ (𝑋𝐻𝑋)(((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → 𝑔 = ℎ))
37		oveq1 6657	. . . . . . . 8 ⊢ (𝑔 = ℎ → (𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = (ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓))
38	37	eqeq1d 2624	. . . . . . 7 ⊢ (𝑔 = ℎ → ((𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ (ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓))
39	38	ralbidv 2986	. . . . . 6 ⊢ (𝑔 = ℎ → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ↔ ∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓))
40		oveq2 6658	. . . . . . . 8 ⊢ (𝑔 = ℎ → (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ))
41	40	eqeq1d 2624	. . . . . . 7 ⊢ (𝑔 = ℎ → ((𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓 ↔ (𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓))
42	41	ralbidv 2986	. . . . . 6 ⊢ (𝑔 = ℎ → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓 ↔ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓))
43	39, 42	anbi12d 747	. . . . 5 ⊢ (𝑔 = ℎ → ((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ↔ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)))
44	43	rmo4 3399	. . . 4 ⊢ (∃*𝑔 ∈ (𝑋𝐻𝑋)(∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ↔ ∀𝑔 ∈ (𝑋𝐻𝑋)∀ℎ ∈ (𝑋𝐻𝑋)(((∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) ∧ (∀𝑓 ∈ (𝑋𝐻𝑋)(ℎ(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)ℎ) = 𝑓)) → 𝑔 = ℎ))
45	36, 44	sylibr 224	. . 3 ⊢ (𝜑 → ∃*𝑔 ∈ (𝑋𝐻𝑋)(∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓))
46		rmoim 3407	. . 3 ⊢ (∀𝑔 ∈ (𝑋𝐻𝑋)(∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) → (∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓)) → (∃*𝑔 ∈ (𝑋𝐻𝑋)(∀𝑓 ∈ (𝑋𝐻𝑋)(𝑔(⟨𝑋, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑋)(𝑓(⟨𝑋, 𝑋⟩ · 𝑋)𝑔) = 𝑓) → ∃*𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓)))
47	21, 45, 46	sylc 65	. 2 ⊢ (𝜑 → ∃*𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓))
48		reu5 3159	. 2 ⊢ (∃!𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) ↔ (∃𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓) ∧ ∃*𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓)))
49	6, 47, 48	sylanbrc 698	1 ⊢ (𝜑 → ∃!𝑔 ∈ (𝑋𝐻𝑋)∀𝑦 ∈ 𝐵 (∀𝑓 ∈ (𝑦𝐻𝑋)(𝑔(⟨𝑦, 𝑋⟩ · 𝑋)𝑓) = 𝑓 ∧ ∀𝑓 ∈ (𝑋𝐻𝑦)(𝑓(⟨𝑋, 𝑋⟩ · 𝑦)𝑔) = 𝑓))

Syntax hints:   → wi 4   ∧ wa 384   = wceq 1483   ∈ wcel 1990  ∀wral 2912  ∃wrex 2913  ∃!wreu 2914  ∃*wrmo 2915  ⟨cop 4183  ‘cfv 5888  (class class class)co 6650  Basecbs 15857  Hom chom 15952  compcco 15953  Catccat 16325

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-nul 4789

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-nul 3916  df-if 4087  df-sn 4178  df-pr 4180  df-op 4184  df-uni 4437  df-br 4654  df-iota 5851  df-fv 5896  df-ov 6653  df-cat 16329

This theorem is referenced by:  catidd  16341  catidcl  16343  catlid  16344  catrid  16345