Theorem fuco22natlem2 50558

Description: Lemma for fuco22nat 50561. The commutative square of natural transformation 𝐵 in category 𝐸, combined with the commutative square of fuco22natlem1 50557. (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 2760	. . 3 ⊢ (Base‘𝐸) = (Base‘𝐸)
2		eqid 2760	. . 3 ⊢ (Hom ‘𝐸) = (Hom ‘𝐸)
3		eqid 2760	. . 3 ⊢ (comp‘𝐸) = (comp‘𝐸)
4		eqid 2760	. . . . 5 ⊢ (𝐷 Nat 𝐸) = (𝐷 Nat 𝐸)
5		fuco22natlem2.b	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ (⟨𝐾, 𝐿⟩(𝐷 Nat 𝐸)⟨𝑅, 𝑆⟩))
6	4, 5	natrcl2 50433	. . . 4 ⊢ (𝜑 → 𝐾(𝐷 Func 𝐸)𝐿)
7	6	funcrcl3 50287	. . 3 ⊢ (𝜑 → 𝐸 ∈ Cat)
8		eqid 2760	. . . . 5 ⊢ (Base‘𝐷) = (Base‘𝐷)
9	8, 1, 6	funcf1 18046	. . . 4 ⊢ (𝜑 → 𝐾:(Base‘𝐷)⟶(Base‘𝐸))
10		eqid 2760	. . . . . 6 ⊢ (Base‘𝐶) = (Base‘𝐶)
11		eqid 2760	. . . . . . 7 ⊢ (𝐶 Nat 𝐷) = (𝐶 Nat 𝐷)
12		fuco22natlem1.a	. . . . . . 7 ⊢ (𝜑 → 𝐴 ∈ (⟨𝐹, 𝐺⟩(𝐶 Nat 𝐷)⟨𝑀, 𝑁⟩))
13	11, 12	natrcl2 50433	. . . . . 6 ⊢ (𝜑 → 𝐹(𝐶 Func 𝐷)𝐺)
14	10, 8, 13	funcf1 18046	. . . . 5 ⊢ (𝜑 → 𝐹:(Base‘𝐶)⟶(Base‘𝐷))
15		fuco22natlem1.x	. . . . 5 ⊢ (𝜑 → 𝑋 ∈ (Base‘𝐶))
16	14, 15	ffvelcdmd 7085	. . . 4 ⊢ (𝜑 → (𝐹‘𝑋) ∈ (Base‘𝐷))
17	9, 16	ffvelcdmd 7085	. . 3 ⊢ (𝜑 → (𝐾‘(𝐹‘𝑋)) ∈ (Base‘𝐸))
18		fuco22natlem1.y	. . . . 5 ⊢ (𝜑 → 𝑌 ∈ (Base‘𝐶))
19	14, 18	ffvelcdmd 7085	. . . 4 ⊢ (𝜑 → (𝐹‘𝑌) ∈ (Base‘𝐷))
20	9, 19	ffvelcdmd 7085	. . 3 ⊢ (𝜑 → (𝐾‘(𝐹‘𝑌)) ∈ (Base‘𝐸))
21	11, 12	natrcl3 50434	. . . . . 6 ⊢ (𝜑 → 𝑀(𝐶 Func 𝐷)𝑁)
22	10, 8, 21	funcf1 18046	. . . . 5 ⊢ (𝜑 → 𝑀:(Base‘𝐶)⟶(Base‘𝐷))
23	22, 18	ffvelcdmd 7085	. . . 4 ⊢ (𝜑 → (𝑀‘𝑌) ∈ (Base‘𝐷))
24	9, 23	ffvelcdmd 7085	. . 3 ⊢ (𝜑 → (𝐾‘(𝑀‘𝑌)) ∈ (Base‘𝐸))
25		eqid 2760	. . . . 5 ⊢ (Hom ‘𝐷) = (Hom ‘𝐷)
26	8, 25, 2, 6, 16, 19	funcf2 18048	. . . 4 ⊢ (𝜑 → ((𝐹‘𝑋)𝐿(𝐹‘𝑌)):((𝐹‘𝑋)(Hom ‘𝐷)(𝐹‘𝑌))⟶((𝐾‘(𝐹‘𝑋))(Hom ‘𝐸)(𝐾‘(𝐹‘𝑌))))
27		eqid 2760	. . . . . 6 ⊢ (Hom ‘𝐶) = (Hom ‘𝐶)
28	10, 27, 25, 13, 15, 18	funcf2 18048	. . . . 5 ⊢ (𝜑 → (𝑋𝐺𝑌):(𝑋(Hom ‘𝐶)𝑌)⟶((𝐹‘𝑋)(Hom ‘𝐷)(𝐹‘𝑌)))
29		fuco22natlem1.h	. . . . 5 ⊢ (𝜑 → 𝐻 ∈ (𝑋(Hom ‘𝐶)𝑌))
30	28, 29	ffvelcdmd 7085	. . . 4 ⊢ (𝜑 → ((𝑋𝐺𝑌)‘𝐻) ∈ ((𝐹‘𝑋)(Hom ‘𝐷)(𝐹‘𝑌)))
31	26, 30	ffvelcdmd 7085	. . 3 ⊢ (𝜑 → (((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻)) ∈ ((𝐾‘(𝐹‘𝑋))(Hom ‘𝐸)(𝐾‘(𝐹‘𝑌))))
32	8, 25, 2, 6, 19, 23	funcf2 18048	. . . 4 ⊢ (𝜑 → ((𝐹‘𝑌)𝐿(𝑀‘𝑌)):((𝐹‘𝑌)(Hom ‘𝐷)(𝑀‘𝑌))⟶((𝐾‘(𝐹‘𝑌))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑌))))
33	11, 12, 10, 25, 18	natcl 18136	. . . 4 ⊢ (𝜑 → (𝐴‘𝑌) ∈ ((𝐹‘𝑌)(Hom ‘𝐷)(𝑀‘𝑌)))
34	32, 33	ffvelcdmd 7085	. . 3 ⊢ (𝜑 → (((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌)) ∈ ((𝐾‘(𝐹‘𝑌))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑌))))
35	4, 5	natrcl3 50434	. . . . 5 ⊢ (𝜑 → 𝑅(𝐷 Func 𝐸)𝑆)
36	8, 1, 35	funcf1 18046	. . . 4 ⊢ (𝜑 → 𝑅:(Base‘𝐷)⟶(Base‘𝐸))
37	36, 23	ffvelcdmd 7085	. . 3 ⊢ (𝜑 → (𝑅‘(𝑀‘𝑌)) ∈ (Base‘𝐸))
38	4, 5, 8, 2, 23	natcl 18136	. . 3 ⊢ (𝜑 → (𝐵‘(𝑀‘𝑌)) ∈ ((𝐾‘(𝑀‘𝑌))(Hom ‘𝐸)(𝑅‘(𝑀‘𝑌))))
39	1, 2, 3, 7, 17, 20, 24, 31, 34, 37, 38	catass 17865	. 2 ⊢ (𝜑 → (((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑌)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻))) = ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻)))))
40	15, 18, 12, 29, 6	fuco22natlem1 50557	. . 3 ⊢ (𝜑 → ((((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻))) = ((((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))))
41	40	oveq2d 7436	. 2 ⊢ (𝜑 → ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻)))) = ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))
42	22, 15	ffvelcdmd 7085	. . . . 5 ⊢ (𝜑 → (𝑀‘𝑋) ∈ (Base‘𝐷))
43	10, 27, 25, 21, 15, 18	funcf2 18048	. . . . . 6 ⊢ (𝜑 → (𝑋𝑁𝑌):(𝑋(Hom ‘𝐶)𝑌)⟶((𝑀‘𝑋)(Hom ‘𝐷)(𝑀‘𝑌)))
44	43, 29	ffvelcdmd 7085	. . . . 5 ⊢ (𝜑 → ((𝑋𝑁𝑌)‘𝐻) ∈ ((𝑀‘𝑋)(Hom ‘𝐷)(𝑀‘𝑌)))
45	4, 5, 8, 25, 3, 42, 23, 44	nati 18138	. . . 4 ⊢ (𝜑 → ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝑀‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))) = ((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝑀‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(𝐵‘(𝑀‘𝑋))))
46	45	oveq1d 7435	. . 3 ⊢ (𝜑 → (((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝑀‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))) = (((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝑀‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(𝐵‘(𝑀‘𝑋)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))))
47	9, 42	ffvelcdmd 7085	. . . 4 ⊢ (𝜑 → (𝐾‘(𝑀‘𝑋)) ∈ (Base‘𝐸))
48	8, 25, 2, 6, 16, 42	funcf2 18048	. . . . 5 ⊢ (𝜑 → ((𝐹‘𝑋)𝐿(𝑀‘𝑋)):((𝐹‘𝑋)(Hom ‘𝐷)(𝑀‘𝑋))⟶((𝐾‘(𝐹‘𝑋))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑋))))
49	11, 12, 10, 25, 15	natcl 18136	. . . . 5 ⊢ (𝜑 → (𝐴‘𝑋) ∈ ((𝐹‘𝑋)(Hom ‘𝐷)(𝑀‘𝑋)))
50	48, 49	ffvelcdmd 7085	. . . 4 ⊢ (𝜑 → (((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)) ∈ ((𝐾‘(𝐹‘𝑋))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑋))))
51	8, 25, 2, 6, 42, 23	funcf2 18048	. . . . 5 ⊢ (𝜑 → ((𝑀‘𝑋)𝐿(𝑀‘𝑌)):((𝑀‘𝑋)(Hom ‘𝐷)(𝑀‘𝑌))⟶((𝐾‘(𝑀‘𝑋))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑌))))
52	51, 44	ffvelcdmd 7085	. . . 4 ⊢ (𝜑 → (((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻)) ∈ ((𝐾‘(𝑀‘𝑋))(Hom ‘𝐸)(𝐾‘(𝑀‘𝑌))))
53	1, 2, 3, 7, 17, 47, 24, 50, 52, 37, 38	catass 17865	. . 3 ⊢ (𝜑 → (((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝑀‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))) = ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))
54	36, 42	ffvelcdmd 7085	. . . 4 ⊢ (𝜑 → (𝑅‘(𝑀‘𝑋)) ∈ (Base‘𝐸))
55	4, 5, 8, 2, 42	natcl 18136	. . . 4 ⊢ (𝜑 → (𝐵‘(𝑀‘𝑋)) ∈ ((𝐾‘(𝑀‘𝑋))(Hom ‘𝐸)(𝑅‘(𝑀‘𝑋))))
56	8, 25, 2, 35, 42, 23	funcf2 18048	. . . . 5 ⊢ (𝜑 → ((𝑀‘𝑋)𝑆(𝑀‘𝑌)):((𝑀‘𝑋)(Hom ‘𝐷)(𝑀‘𝑌))⟶((𝑅‘(𝑀‘𝑋))(Hom ‘𝐸)(𝑅‘(𝑀‘𝑌))))
57	56, 44	ffvelcdmd 7085	. . . 4 ⊢ (𝜑 → (((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻)) ∈ ((𝑅‘(𝑀‘𝑋))(Hom ‘𝐸)(𝑅‘(𝑀‘𝑌))))
58	1, 2, 3, 7, 17, 47, 54, 50, 55, 37, 57	catass 17865	. . 3 ⊢ (𝜑 → (((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝑀‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(𝐵‘(𝑀‘𝑋)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋))) = ((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((𝐵‘(𝑀‘𝑋))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑋)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))
59	46, 53, 58	3eqtr3d 2803	. 2 ⊢ (𝜑 → ((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((((𝑀‘𝑋)𝐿(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝐾‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))) = ((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((𝐵‘(𝑀‘𝑋))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑋)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))
60	39, 41, 59	3eqtrd 2799	1 ⊢ (𝜑 → (((𝐵‘(𝑀‘𝑌))(⟨(𝐾‘(𝐹‘𝑌)), (𝐾‘(𝑀‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑌)𝐿(𝑀‘𝑌))‘(𝐴‘𝑌)))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝐹‘𝑌))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))(((𝐹‘𝑋)𝐿(𝐹‘𝑌))‘((𝑋𝐺𝑌)‘𝐻))) = ((((𝑀‘𝑋)𝑆(𝑀‘𝑌))‘((𝑋𝑁𝑌)‘𝐻))(⟨(𝐾‘(𝐹‘𝑋)), (𝑅‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑌)))((𝐵‘(𝑀‘𝑋))(⟨(𝐾‘(𝐹‘𝑋)), (𝐾‘(𝑀‘𝑋))⟩(comp‘𝐸)(𝑅‘(𝑀‘𝑋)))(((𝐹‘𝑋)𝐿(𝑀‘𝑋))‘(𝐴‘𝑋)))))

This proof depends on syntax axioms:   → wi 4   = wceq 1569   ∈ wcel 2144  ⟨cop 4834  ‘cfv 6538  (class class class)co 7420  Basecbs 17392  Hom chom 17444  compcco 17445   Nat cnat 18124

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-id 5545  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-ov 7423  df-oprab 7424  df-mpo 7425  df-1st 8001  df-2nd 8002  df-map 8852  df-ixp 8929  df-cat 17847  df-func 18038  df-nat 18126

This theorem is used by:  fuco22natlem3  50559