Theorem fuco22natlem2 48910

Description: Lemma for fuco22nat 48913. The commutative square of natural transformation 𝐵 in category 𝐸, combined with the commutative square of fuco22natlem1 48909. (Contributed by Zhi Wang, 30-Sep-2025.)

Hypotheses

Ref	Expression
fuco22natlem1.x	⊢ (𝜑 → 𝑋 ∈ (Base‘𝐶))
fuco22natlem1.y	⊢ (𝜑 → 𝑌 ∈ (Base‘𝐶))
fuco22natlem1.a	⊢ (𝜑 → 𝐴 ∈ (⟨𝐹, 𝐺⟩(𝐶 Nat 𝐷)⟨𝑀, 𝑁⟩))
fuco22natlem1.h	⊢ (𝜑 → 𝐻 ∈ (𝑋(Hom ‘𝐶)𝑌))
fuco22natlem2.b	⊢ (𝜑 → 𝐵 ∈ (⟨𝐾, 𝐿⟩(𝐷 Nat 𝐸)⟨𝑅, 𝑆⟩))

Assertion

Ref	Expression
fuco22natlem2	⊢ (𝜑 → (((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑌)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻))) = ((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((𝐵‘(𝑀‘𝑋))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑋)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))

Proof of Theorem fuco22natlem2

Step	Hyp	Ref	Expression
1		eqid 2737	. . 3 ⊢ (Base‘𝐸) = (Base‘𝐸)
2		eqid 2737	. . 3 ⊢ (Hom ‘𝐸) = (Hom ‘𝐸)
3		eqid 2737	. . 3 ⊢ (comp‘𝐸) = (comp‘𝐸)
4		eqid 2737	. . . . 5 ⊢ (𝐷 Nat 𝐸) = (𝐷 Nat 𝐸)
5		fuco22natlem2.b	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ (⟨𝐾, 𝐿⟩(𝐷 Nat 𝐸)⟨𝑅, 𝑆⟩))
6	4, 5	natrcl2 48870	. . . 4 ⊢ (𝜑 → 𝐾(𝐷 Func 𝐸)𝐿)
7	6	funcrcl3 48838	. . 3 ⊢ (𝜑 → 𝐸 ∈ Cat)
8		eqid 2737	. . . . 5 ⊢ (Base‘𝐷) = (Base‘𝐷)
9	8, 1, 6	funcf1 17926	. . . 4 ⊢ (𝜑 → 𝐾:(Base‘𝐷)⟶(Base‘𝐸))
10		eqid 2737	. . . . . 6 ⊢ (Base‘𝐶) = (Base‘𝐶)
11		eqid 2737	. . . . . . 7 ⊢ (𝐶 Nat 𝐷) = (𝐶 Nat 𝐷)
12		fuco22natlem1.a	. . . . . . 7 ⊢ (𝜑 → 𝐴 ∈ (⟨𝐹, 𝐺⟩(𝐶 Nat 𝐷)⟨𝑀, 𝑁⟩))
13	11, 12	natrcl2 48870	. . . . . 6 ⊢ (𝜑 → 𝐹(𝐶 Func 𝐷)𝐺)
14	10, 8, 13	funcf1 17926	. . . . 5 ⊢ (𝜑 → 𝐹:(Base‘𝐶)⟶(Base‘𝐷))
15		fuco22natlem1.x	. . . . 5 ⊢ (𝜑 → 𝑋 ∈ (Base‘𝐶))
16	14, 15	ffvelcdmd 7112	. . . 4 ⊢ (𝜑 → (𝐹‘𝑋) ∈ (Base‘𝐷))
17	9, 16	ffvelcdmd 7112	. . 3 ⊢ (𝜑 → (𝐾‘(𝐹‘𝑋)) ∈ (Base‘𝐸))
18		fuco22natlem1.y	. . . . 5 ⊢ (𝜑 → 𝑌 ∈ (Base‘𝐶))
19	14, 18	ffvelcdmd 7112	. . . 4 ⊢ (𝜑 → (𝐹‘𝑌) ∈ (Base‘𝐷))
20	9, 19	ffvelcdmd 7112	. . 3 ⊢ (𝜑 → (𝐾‘(𝐹‘𝑌)) ∈ (Base‘𝐸))
21	11, 12	natrcl3 48871	. . . . . 6 ⊢ (𝜑 → 𝑀(𝐶 Func 𝐷)𝑁)
22	10, 8, 21	funcf1 17926	. . . . 5 ⊢ (𝜑 → 𝑀:(Base‘𝐶)⟶(Base‘𝐷))
23	22, 18	ffvelcdmd 7112	. . . 4 ⊢ (𝜑 → (𝑀‘𝑌) ∈ (Base‘𝐷))
24	9, 23	ffvelcdmd 7112	. . 3 ⊢ (𝜑 → (𝐾‘(𝑀‘𝑌)) ∈ (Base‘𝐸))
25		eqid 2737	. . . . 5 ⊢ (Hom ‘𝐷) = (Hom ‘𝐷)
26	8, 25, 2, 6, 16, 19	funcf2 17928	. . . 4 ⊢ (𝜑 → ((𝐹‘𝑋)𝐿(𝐹‘𝑌)):((𝐹‘𝑋)(Hom ‘𝐷)(𝐹‘𝑌))⟶((𝐾‘(𝐹‘𝑋))(Hom ‘𝐸)(𝐾‘(𝐹‘𝑌))))
27		eqid 2737	. . . . . 6 ⊢ (Hom ‘𝐶) = (Hom ‘𝐶)
28	10, 27, 25, 13, 15, 18	funcf2 17928	. . . . 5 ⊢ (𝜑 → (𝑋𝐺𝑌):(𝑋(Hom ‘𝐶)𝑌)⟶((𝐹‘𝑋)(Hom ‘𝐷)(𝐹‘𝑌)))
29		fuco22natlem1.h	. . . . 5 ⊢ (𝜑 → 𝐻 ∈ (𝑋(Hom ‘𝐶)𝑌))
30	28, 29	ffvelcdmd 7112	. . . 4 ⊢ (𝜑 → ((𝑋𝐺𝑌)‘𝐻) ∈ ((𝐹‘𝑋)(Hom ‘𝐷)(𝐹‘𝑌)))
31	26, 30	ffvelcdmd 7112	. . 3 ⊢ (𝜑 → (((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻)) ∈ ((𝐾‘(𝐹‘𝑋))(Hom ‘𝐸)(𝐾‘(𝐹‘𝑌))))
32	8, 25, 2, 6, 19, 23	funcf2 17928	. . . 4 ⊢ (𝜑 → ((𝐹‘𝑌)𝐿(𝑀‘𝑌)):((𝐹‘𝑌)(Hom ‘𝐷)(𝑀‘𝑌))⟶((𝐾‘(𝐹‘𝑌))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑌))))
33	11, 12, 10, 25, 18	natcl 18017	. . . 4 ⊢ (𝜑 → (𝐴‘𝑌) ∈ ((𝐹‘𝑌)(Hom ‘𝐷)(𝑀‘𝑌)))
34	32, 33	ffvelcdmd 7112	. . 3 ⊢ (𝜑 → (((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌)) ∈ ((𝐾‘(𝐹‘𝑌))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑌))))
35	4, 5	natrcl3 48871	. . . . 5 ⊢ (𝜑 → 𝑅(𝐷 Func 𝐸)𝑆)
36	8, 1, 35	funcf1 17926	. . . 4 ⊢ (𝜑 → 𝑅:(Base‘𝐷)⟶(Base‘𝐸))
37	36, 23	ffvelcdmd 7112	. . 3 ⊢ (𝜑 → (𝑅‘(𝑀‘𝑌)) ∈ (Base‘𝐸))
38	4, 5, 8, 2, 23	natcl 18017	. . 3 ⊢ (𝜑 → (𝐵‘(𝑀‘𝑌)) ∈ ((𝐾‘(𝑀‘𝑌))(Hom ‘𝐸)(𝑅‘(𝑀‘𝑌))))
39	1, 2, 3, 7, 17, 20, 24, 31, 34, 37, 38	catass 17740	. 2 ⊢ (𝜑 → (((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑌)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻))) = ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻)))))
40	15, 18, 12, 29, 6	fuco22natlem1 48909	. . 3 ⊢ (𝜑 → ((((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻))) = ((((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))))
41	40	oveq2d 7454	. 2 ⊢ (𝜑 → ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻)))) = ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))
42	22, 15	ffvelcdmd 7112	. . . . 5 ⊢ (𝜑 → (𝑀‘𝑋) ∈ (Base‘𝐷))
43	10, 27, 25, 21, 15, 18	funcf2 17928	. . . . . 6 ⊢ (𝜑 → (𝑋𝑁𝑌):(𝑋(Hom ‘𝐶)𝑌)⟶((𝑀‘𝑋)(Hom ‘𝐷)(𝑀‘𝑌)))
44	43, 29	ffvelcdmd 7112	. . . . 5 ⊢ (𝜑 → ((𝑋𝑁𝑌)‘𝐻) ∈ ((𝑀‘𝑋)(Hom ‘𝐷)(𝑀‘𝑌)))
45	4, 5, 8, 25, 3, 42, 23, 44	nati 18019	. . . 4 ⊢ (𝜑 → ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝑀‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))) = ((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝑀‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(𝐵‘(𝑀‘𝑋))))
46	45	oveq1d 7453	. . 3 ⊢ (𝜑 → (((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝑀‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))) = (((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝑀‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(𝐵‘(𝑀‘𝑋)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))))
47	9, 42	ffvelcdmd 7112	. . . 4 ⊢ (𝜑 → (𝐾‘(𝑀‘𝑋)) ∈ (Base‘𝐸))
48	8, 25, 2, 6, 16, 42	funcf2 17928	. . . . 5 ⊢ (𝜑 → ((𝐹‘𝑋)𝐿(𝑀‘𝑋)):((𝐹‘𝑋)(Hom ‘𝐷)(𝑀‘𝑋))⟶((𝐾‘(𝐹‘𝑋))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑋))))
49	11, 12, 10, 25, 15	natcl 18017	. . . . 5 ⊢ (𝜑 → (𝐴‘𝑋) ∈ ((𝐹‘𝑋)(Hom ‘𝐷)(𝑀‘𝑋)))
50	48, 49	ffvelcdmd 7112	. . . 4 ⊢ (𝜑 → (((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)) ∈ ((𝐾‘(𝐹‘𝑋))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑋))))
51	8, 25, 2, 6, 42, 23	funcf2 17928	. . . . 5 ⊢ (𝜑 → ((𝑀‘𝑋)𝐿(𝑀‘𝑌)):((𝑀‘𝑋)(Hom ‘𝐷)(𝑀‘𝑌))⟶((𝐾‘(𝑀‘𝑋))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑌))))
52	51, 44	ffvelcdmd 7112	. . . 4 ⊢ (𝜑 → (((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻)) ∈ ((𝐾‘(𝑀‘𝑋))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑌))))
53	1, 2, 3, 7, 17, 47, 24, 50, 52, 37, 38	catass 17740	. . 3 ⊢ (𝜑 → (((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝑀‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))) = ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))
54	36, 42	ffvelcdmd 7112	. . . 4 ⊢ (𝜑 → (𝑅‘(𝑀‘𝑋)) ∈ (Base‘𝐸))
55	4, 5, 8, 2, 42	natcl 18017	. . . 4 ⊢ (𝜑 → (𝐵‘(𝑀‘𝑋)) ∈ ((𝐾‘(𝑀‘𝑋))(Hom ‘𝐸)(𝑅‘(𝑀‘𝑋))))
56	8, 25, 2, 35, 42, 23	funcf2 17928	. . . . 5 ⊢ (𝜑 → ((𝑀‘𝑋)𝑆(𝑀‘𝑌)):((𝑀‘𝑋)(Hom ‘𝐷)(𝑀‘𝑌))⟶((𝑅‘(𝑀‘𝑋))(Hom ‘𝐸)(𝑅‘(𝑀‘𝑌))))
57	56, 44	ffvelcdmd 7112	. . . 4 ⊢ (𝜑 → (((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻)) ∈ ((𝑅‘(𝑀‘𝑋))(Hom ‘𝐸)(𝑅‘(𝑀‘𝑌))))
58	1, 2, 3, 7, 17, 47, 54, 50, 55, 37, 57	catass 17740	. . 3 ⊢ (𝜑 → (((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝑀‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(𝐵‘(𝑀‘𝑋)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))) = ((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((𝐵‘(𝑀‘𝑋))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑋)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))
59	46, 53, 58	3eqtr3d 2785	. 2 ⊢ (𝜑 → ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))) = ((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((𝐵‘(𝑀‘𝑋))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑋)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))
60	39, 41, 59	3eqtrd 2781	1 ⊢ (𝜑 → (((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑌)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻))) = ((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((𝐵‘(𝑀‘𝑋))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑋)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))

Syntax hints:   → wi 4   = wceq 1539   ∈ wcel 2108  ⟨cop 4640  ‘cfv 6569  (class class class)co 7438  Basecbs 17254  Hom chom 17318  compcco 17319   Nat cnat 18005

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-rep 5288  ax-sep 5305  ax-nul 5315  ax-pow 5374  ax-pr 5441  ax-un 7761

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1542  df-fal 1552  df-ex 1779  df-nf 1783  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-ral 3062  df-rex 3071  df-reu 3381  df-rab 3437  df-v 3483  df-sbc 3795  df-csb 3912  df-dif 3969  df-un 3971  df-in 3973  df-ss 3983  df-nul 4343  df-if 4535  df-pw 4610  df-sn 4635  df-pr 4637  df-op 4641  df-uni 4916  df-iun 5001  df-br 5152  df-opab 5214  df-mpt 5235  df-id 5587  df-xp 5699  df-rel 5700  df-cnv 5701  df-co 5702  df-dm 5703  df-rn 5704  df-res 5705  df-ima 5706  df-iota 6522  df-fun 6571  df-fn 6572  df-f 6573  df-f1 6574  df-fo 6575  df-f1o 6576  df-fv 6577  df-ov 7441  df-oprab 7442  df-mpo 7443  df-1st 8022  df-2nd 8023  df-map 8876  df-ixp 8946  df-cat 17722  df-func 17918  df-nat 18007

This theorem is referenced by:  fuco22natlem3  48911