evlfcllem - Metamath Proof Explorer

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

Theorem evlfcllem 17855

Description: Lemma for evlfcl 17856. (Contributed by Mario Carneiro, 12-Jan-2017.)

**Hypotheses**
Ref	Expression
evlfcl.e	⊢ 𝐸 = (𝐶 eval_F 𝐷)
evlfcl.q	⊢ 𝑄 = (𝐶 FuncCat 𝐷)
evlfcl.c	⊢ (𝜑 → 𝐶 ∈ Cat)
evlfcl.d	⊢ (𝜑 → 𝐷 ∈ Cat)
evlfcl.n	⊢ 𝑁 = (𝐶 Nat 𝐷)
evlfcl.f	⊢ (𝜑 → (𝐹 ∈ (𝐶 Func 𝐷) ∧ 𝑋 ∈ (Base‘𝐶)))
evlfcl.g	⊢ (𝜑 → (𝐺 ∈ (𝐶 Func 𝐷) ∧ 𝑌 ∈ (Base‘𝐶)))
evlfcl.h	⊢ (𝜑 → (𝐻 ∈ (𝐶 Func 𝐷) ∧ 𝑍 ∈ (Base‘𝐶)))
evlfcl.a	⊢ (𝜑 → (𝐴 ∈ (𝐹𝑁𝐺) ∧ 𝐾 ∈ (𝑋(Hom ‘𝐶)𝑌)))
evlfcl.b	⊢ (𝜑 → (𝐵 ∈ (𝐺𝑁𝐻) ∧ 𝐿 ∈ (𝑌(Hom ‘𝐶)𝑍)))

**Assertion**
Ref	Expression
evlfcllem	⊢ (𝜑 → ((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘(⟨𝐵, 𝐿⟩(⟨⟨𝐹, 𝑋⟩, ⟨𝐺, 𝑌⟩⟩(comp‘(𝑄 ×_c 𝐶))⟨𝐻, 𝑍⟩)⟨𝐴, 𝐾⟩)) = (((⟨𝐺, 𝑌⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘⟨𝐵, 𝐿⟩)(⟨((1^st ‘𝐸)‘⟨𝐹, 𝑋⟩), ((1^st ‘𝐸)‘⟨𝐺, 𝑌⟩)⟩(comp‘𝐷)((1^st ‘𝐸)‘⟨𝐻, 𝑍⟩))((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐺, 𝑌⟩)‘⟨𝐴, 𝐾⟩)))

**Proof of Theorem evlfcllem**
Step	Hyp	Ref	Expression
1		evlfcl.e	. . . 4 ⊢ 𝐸 = (𝐶 eval_F 𝐷)
2		evlfcl.c	. . . 4 ⊢ (𝜑 → 𝐶 ∈ Cat)
3		evlfcl.d	. . . 4 ⊢ (𝜑 → 𝐷 ∈ Cat)
4		eqid 2738	. . . 4 ⊢ (Base‘𝐶) = (Base‘𝐶)
5		eqid 2738	. . . 4 ⊢ (Hom ‘𝐶) = (Hom ‘𝐶)
6		eqid 2738	. . . 4 ⊢ (comp‘𝐷) = (comp‘𝐷)
7		evlfcl.n	. . . 4 ⊢ 𝑁 = (𝐶 Nat 𝐷)
8		evlfcl.f	. . . . 5 ⊢ (𝜑 → (𝐹 ∈ (𝐶 Func 𝐷) ∧ 𝑋 ∈ (Base‘𝐶)))
9	8	simpld 494	. . . 4 ⊢ (𝜑 → 𝐹 ∈ (𝐶 Func 𝐷))
10		evlfcl.h	. . . . 5 ⊢ (𝜑 → (𝐻 ∈ (𝐶 Func 𝐷) ∧ 𝑍 ∈ (Base‘𝐶)))
11	10	simpld 494	. . . 4 ⊢ (𝜑 → 𝐻 ∈ (𝐶 Func 𝐷))
12	8	simprd 495	. . . 4 ⊢ (𝜑 → 𝑋 ∈ (Base‘𝐶))
13	10	simprd 495	. . . 4 ⊢ (𝜑 → 𝑍 ∈ (Base‘𝐶))
14		eqid 2738	. . . 4 ⊢ (⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩) = (⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)
15		evlfcl.q	. . . . 5 ⊢ 𝑄 = (𝐶 FuncCat 𝐷)
16		eqid 2738	. . . . 5 ⊢ (comp‘𝑄) = (comp‘𝑄)
17		evlfcl.a	. . . . . 6 ⊢ (𝜑 → (𝐴 ∈ (𝐹𝑁𝐺) ∧ 𝐾 ∈ (𝑋(Hom ‘𝐶)𝑌)))
18	17	simpld 494	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ (𝐹𝑁𝐺))
19		evlfcl.b	. . . . . 6 ⊢ (𝜑 → (𝐵 ∈ (𝐺𝑁𝐻) ∧ 𝐿 ∈ (𝑌(Hom ‘𝐶)𝑍)))
20	19	simpld 494	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ (𝐺𝑁𝐻))
21	15, 7, 16, 18, 20	fuccocl 17598	. . . 4 ⊢ (𝜑 → (𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴) ∈ (𝐹𝑁𝐻))
22		eqid 2738	. . . . 5 ⊢ (comp‘𝐶) = (comp‘𝐶)
23		evlfcl.g	. . . . . 6 ⊢ (𝜑 → (𝐺 ∈ (𝐶 Func 𝐷) ∧ 𝑌 ∈ (Base‘𝐶)))
24	23	simprd 495	. . . . 5 ⊢ (𝜑 → 𝑌 ∈ (Base‘𝐶))
25	17	simprd 495	. . . . 5 ⊢ (𝜑 → 𝐾 ∈ (𝑋(Hom ‘𝐶)𝑌))
26	19	simprd 495	. . . . 5 ⊢ (𝜑 → 𝐿 ∈ (𝑌(Hom ‘𝐶)𝑍))
27	4, 5, 22, 2, 12, 24, 13, 25, 26	catcocl 17311	. . . 4 ⊢ (𝜑 → (𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾) ∈ (𝑋(Hom ‘𝐶)𝑍))
28	1, 2, 3, 4, 5, 6, 7, 9, 11, 12, 13, 14, 21, 27	evlf2val 17853	. . 3 ⊢ (𝜑 → ((𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴)(⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾)) = (((𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴)‘𝑍)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑋(2^nd ‘𝐹)𝑍)‘(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾))))
29	15, 7, 4, 6, 16, 18, 20, 13	fuccoval 17597	. . . 4 ⊢ (𝜑 → ((𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴)‘𝑍) = ((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍)))
30	29	oveq1d 7270	. . 3 ⊢ (𝜑 → (((𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴)‘𝑍)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑋(2^nd ‘𝐹)𝑍)‘(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾))) = (((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑋(2^nd ‘𝐹)𝑍)‘(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾))))
31		relfunc 17493	. . . . . . 7 ⊢ Rel (𝐶 Func 𝐷)
32		1st2ndbr 7856	. . . . . . 7 ⊢ ((Rel (𝐶 Func 𝐷) ∧ 𝐹 ∈ (𝐶 Func 𝐷)) → (1^st ‘𝐹)(𝐶 Func 𝐷)(2^nd ‘𝐹))
33	31, 9, 32	sylancr 586	. . . . . 6 ⊢ (𝜑 → (1^st ‘𝐹)(𝐶 Func 𝐷)(2^nd ‘𝐹))
34	4, 5, 22, 6, 33, 12, 24, 13, 25, 26	funcco 17502	. . . . 5 ⊢ (𝜑 → ((𝑋(2^nd ‘𝐹)𝑍)‘(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾)) = (((𝑌(2^nd ‘𝐹)𝑍)‘𝐿)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐹)‘𝑍))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾)))
35	34	oveq2d 7271	. . . 4 ⊢ (𝜑 → (((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑋(2^nd ‘𝐹)𝑍)‘(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾))) = (((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(((𝑌(2^nd ‘𝐹)𝑍)‘𝐿)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐹)‘𝑍))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾))))
36	7, 18	nat1st2nd 17583	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ (⟨(1^st ‘𝐹), (2^nd ‘𝐹)⟩𝑁⟨(1^st ‘𝐺), (2^nd ‘𝐺)⟩))
37	7, 36, 4, 5, 6, 24, 13, 26	nati 17587	. . . . . . . 8 ⊢ (𝜑 → ((𝐴‘𝑍)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑍))((𝑌(2^nd ‘𝐹)𝑍)‘𝐿)) = (((𝑌(2^nd ‘𝐺)𝑍)‘𝐿)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑍))(𝐴‘𝑌)))
38	37	oveq2d 7271	. . . . . . 7 ⊢ (𝜑 → ((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝐴‘𝑍)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑍))((𝑌(2^nd ‘𝐹)𝑍)‘𝐿))) = ((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(((𝑌(2^nd ‘𝐺)𝑍)‘𝐿)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑍))(𝐴‘𝑌))))
39		eqid 2738	. . . . . . . 8 ⊢ (Base‘𝐷) = (Base‘𝐷)
40		eqid 2738	. . . . . . . 8 ⊢ (Hom ‘𝐷) = (Hom ‘𝐷)
41	4, 39, 33	funcf1 17497	. . . . . . . . 9 ⊢ (𝜑 → (1^st ‘𝐹):(Base‘𝐶)⟶(Base‘𝐷))
42	41, 24	ffvelrnd 6944	. . . . . . . 8 ⊢ (𝜑 → ((1^st ‘𝐹)‘𝑌) ∈ (Base‘𝐷))
43	41, 13	ffvelrnd 6944	. . . . . . . 8 ⊢ (𝜑 → ((1^st ‘𝐹)‘𝑍) ∈ (Base‘𝐷))
44	23	simpld 494	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺 ∈ (𝐶 Func 𝐷))
45		1st2ndbr 7856	. . . . . . . . . . 11 ⊢ ((Rel (𝐶 Func 𝐷) ∧ 𝐺 ∈ (𝐶 Func 𝐷)) → (1^st ‘𝐺)(𝐶 Func 𝐷)(2^nd ‘𝐺))
46	31, 44, 45	sylancr 586	. . . . . . . . . 10 ⊢ (𝜑 → (1^st ‘𝐺)(𝐶 Func 𝐷)(2^nd ‘𝐺))
47	4, 39, 46	funcf1 17497	. . . . . . . . 9 ⊢ (𝜑 → (1^st ‘𝐺):(Base‘𝐶)⟶(Base‘𝐷))
48	47, 13	ffvelrnd 6944	. . . . . . . 8 ⊢ (𝜑 → ((1^st ‘𝐺)‘𝑍) ∈ (Base‘𝐷))
49	4, 5, 40, 33, 24, 13	funcf2 17499	. . . . . . . . 9 ⊢ (𝜑 → (𝑌(2^nd ‘𝐹)𝑍):(𝑌(Hom ‘𝐶)𝑍)⟶(((1^st ‘𝐹)‘𝑌)(Hom ‘𝐷)((1^st ‘𝐹)‘𝑍)))
50	49, 26	ffvelrnd 6944	. . . . . . . 8 ⊢ (𝜑 → ((𝑌(2^nd ‘𝐹)𝑍)‘𝐿) ∈ (((1^st ‘𝐹)‘𝑌)(Hom ‘𝐷)((1^st ‘𝐹)‘𝑍)))
51	7, 36, 4, 40, 13	natcl 17585	. . . . . . . 8 ⊢ (𝜑 → (𝐴‘𝑍) ∈ (((1^st ‘𝐹)‘𝑍)(Hom ‘𝐷)((1^st ‘𝐺)‘𝑍)))
52		1st2ndbr 7856	. . . . . . . . . . 11 ⊢ ((Rel (𝐶 Func 𝐷) ∧ 𝐻 ∈ (𝐶 Func 𝐷)) → (1^st ‘𝐻)(𝐶 Func 𝐷)(2^nd ‘𝐻))
53	31, 11, 52	sylancr 586	. . . . . . . . . 10 ⊢ (𝜑 → (1^st ‘𝐻)(𝐶 Func 𝐷)(2^nd ‘𝐻))
54	4, 39, 53	funcf1 17497	. . . . . . . . 9 ⊢ (𝜑 → (1^st ‘𝐻):(Base‘𝐶)⟶(Base‘𝐷))
55	54, 13	ffvelrnd 6944	. . . . . . . 8 ⊢ (𝜑 → ((1^st ‘𝐻)‘𝑍) ∈ (Base‘𝐷))
56	7, 20	nat1st2nd 17583	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ (⟨(1^st ‘𝐺), (2^nd ‘𝐺)⟩𝑁⟨(1^st ‘𝐻), (2^nd ‘𝐻)⟩))
57	7, 56, 4, 40, 13	natcl 17585	. . . . . . . 8 ⊢ (𝜑 → (𝐵‘𝑍) ∈ (((1^st ‘𝐺)‘𝑍)(Hom ‘𝐷)((1^st ‘𝐻)‘𝑍)))
58	39, 40, 6, 3, 42, 43, 48, 50, 51, 55, 57	catass 17312	. . . . . . 7 ⊢ (𝜑 → (((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐹)𝑍)‘𝐿)) = ((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝐴‘𝑍)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑍))((𝑌(2^nd ‘𝐹)𝑍)‘𝐿))))
59	47, 24	ffvelrnd 6944	. . . . . . . 8 ⊢ (𝜑 → ((1^st ‘𝐺)‘𝑌) ∈ (Base‘𝐷))
60	7, 36, 4, 40, 24	natcl 17585	. . . . . . . 8 ⊢ (𝜑 → (𝐴‘𝑌) ∈ (((1^st ‘𝐹)‘𝑌)(Hom ‘𝐷)((1^st ‘𝐺)‘𝑌)))
61	4, 5, 40, 46, 24, 13	funcf2 17499	. . . . . . . . 9 ⊢ (𝜑 → (𝑌(2^nd ‘𝐺)𝑍):(𝑌(Hom ‘𝐶)𝑍)⟶(((1^st ‘𝐺)‘𝑌)(Hom ‘𝐷)((1^st ‘𝐺)‘𝑍)))
62	61, 26	ffvelrnd 6944	. . . . . . . 8 ⊢ (𝜑 → ((𝑌(2^nd ‘𝐺)𝑍)‘𝐿) ∈ (((1^st ‘𝐺)‘𝑌)(Hom ‘𝐷)((1^st ‘𝐺)‘𝑍)))
63	39, 40, 6, 3, 42, 59, 48, 60, 62, 55, 57	catass 17312	. . . . . . 7 ⊢ (𝜑 → (((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑌)) = ((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(((𝑌(2^nd ‘𝐺)𝑍)‘𝐿)(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑍))(𝐴‘𝑌))))
64	38, 58, 63	3eqtr4d 2788	. . . . . 6 ⊢ (𝜑 → (((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐹)𝑍)‘𝐿)) = (((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑌)))
65	64	oveq1d 7270	. . . . 5 ⊢ (𝜑 → ((((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐹)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾)) = ((((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑌))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾)))
66	41, 12	ffvelrnd 6944	. . . . . 6 ⊢ (𝜑 → ((1^st ‘𝐹)‘𝑋) ∈ (Base‘𝐷))
67	4, 5, 40, 33, 12, 24	funcf2 17499	. . . . . . 7 ⊢ (𝜑 → (𝑋(2^nd ‘𝐹)𝑌):(𝑋(Hom ‘𝐶)𝑌)⟶(((1^st ‘𝐹)‘𝑋)(Hom ‘𝐷)((1^st ‘𝐹)‘𝑌)))
68	67, 25	ffvelrnd 6944	. . . . . 6 ⊢ (𝜑 → ((𝑋(2^nd ‘𝐹)𝑌)‘𝐾) ∈ (((1^st ‘𝐹)‘𝑋)(Hom ‘𝐷)((1^st ‘𝐹)‘𝑌)))
69	39, 40, 6, 3, 43, 48, 55, 51, 57	catcocl 17311	. . . . . 6 ⊢ (𝜑 → ((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍)) ∈ (((1^st ‘𝐹)‘𝑍)(Hom ‘𝐷)((1^st ‘𝐻)‘𝑍)))
70	39, 40, 6, 3, 66, 42, 43, 68, 50, 55, 69	catass 17312	. . . . 5 ⊢ (𝜑 → ((((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐹)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾)) = (((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(((𝑌(2^nd ‘𝐹)𝑍)‘𝐿)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐹)‘𝑍))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾))))
71	39, 40, 6, 3, 59, 48, 55, 62, 57	catcocl 17311	. . . . . 6 ⊢ (𝜑 → ((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿)) ∈ (((1^st ‘𝐺)‘𝑌)(Hom ‘𝐷)((1^st ‘𝐻)‘𝑍)))
72	39, 40, 6, 3, 66, 42, 59, 68, 60, 55, 71	catass 17312	. . . . 5 ⊢ (𝜑 → ((((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑌), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑌))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾)) = (((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝐴‘𝑌)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑌))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾))))
73	65, 70, 72	3eqtr3d 2786	. . . 4 ⊢ (𝜑 → (((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(((𝑌(2^nd ‘𝐹)𝑍)‘𝐿)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐹)‘𝑍))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾))) = (((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝐴‘𝑌)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑌))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾))))
74	35, 73	eqtrd 2778	. . 3 ⊢ (𝜑 → (((𝐵‘𝑍)(⟨((1^st ‘𝐹)‘𝑍), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))(𝐴‘𝑍))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑋(2^nd ‘𝐹)𝑍)‘(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾))) = (((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝐴‘𝑌)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑌))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾))))
75	28, 30, 74	3eqtrd 2782	. 2 ⊢ (𝜑 → ((𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴)(⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾)) = (((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝐴‘𝑌)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑌))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾))))
76		eqid 2738	. . . . 5 ⊢ (𝑄 ×_c 𝐶) = (𝑄 ×_c 𝐶)
77	15	fucbas 17593	. . . . 5 ⊢ (𝐶 Func 𝐷) = (Base‘𝑄)
78	15, 7	fuchom 17594	. . . . 5 ⊢ 𝑁 = (Hom ‘𝑄)
79		eqid 2738	. . . . 5 ⊢ (comp‘(𝑄 ×_c 𝐶)) = (comp‘(𝑄 ×_c 𝐶))
80	76, 77, 4, 78, 5, 9, 12, 44, 24, 16, 22, 79, 11, 13, 18, 25, 20, 26	xpcco2 17820	. . . 4 ⊢ (𝜑 → (⟨𝐵, 𝐿⟩(⟨⟨𝐹, 𝑋⟩, ⟨𝐺, 𝑌⟩⟩(comp‘(𝑄 ×_c 𝐶))⟨𝐻, 𝑍⟩)⟨𝐴, 𝐾⟩) = ⟨(𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴), (𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾)⟩)
81	80	fveq2d 6760	. . 3 ⊢ (𝜑 → ((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘(⟨𝐵, 𝐿⟩(⟨⟨𝐹, 𝑋⟩, ⟨𝐺, 𝑌⟩⟩(comp‘(𝑄 ×_c 𝐶))⟨𝐻, 𝑍⟩)⟨𝐴, 𝐾⟩)) = ((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘⟨(𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴), (𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾)⟩))
82		df-ov 7258	. . 3 ⊢ ((𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴)(⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾)) = ((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘⟨(𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴), (𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾)⟩)
83	81, 82	eqtr4di 2797	. 2 ⊢ (𝜑 → ((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘(⟨𝐵, 𝐿⟩(⟨⟨𝐹, 𝑋⟩, ⟨𝐺, 𝑌⟩⟩(comp‘(𝑄 ×_c 𝐶))⟨𝐻, 𝑍⟩)⟨𝐴, 𝐾⟩)) = ((𝐵(⟨𝐹, 𝐺⟩(comp‘𝑄)𝐻)𝐴)(⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)(𝐿(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑍)𝐾)))
84		df-ov 7258	. . . . . 6 ⊢ (𝐹(1^st ‘𝐸)𝑋) = ((1^st ‘𝐸)‘⟨𝐹, 𝑋⟩)
85	1, 2, 3, 4, 9, 12	evlf1 17854	. . . . . 6 ⊢ (𝜑 → (𝐹(1^st ‘𝐸)𝑋) = ((1^st ‘𝐹)‘𝑋))
86	84, 85	eqtr3id 2793	. . . . 5 ⊢ (𝜑 → ((1^st ‘𝐸)‘⟨𝐹, 𝑋⟩) = ((1^st ‘𝐹)‘𝑋))
87		df-ov 7258	. . . . . 6 ⊢ (𝐺(1^st ‘𝐸)𝑌) = ((1^st ‘𝐸)‘⟨𝐺, 𝑌⟩)
88	1, 2, 3, 4, 44, 24	evlf1 17854	. . . . . 6 ⊢ (𝜑 → (𝐺(1^st ‘𝐸)𝑌) = ((1^st ‘𝐺)‘𝑌))
89	87, 88	eqtr3id 2793	. . . . 5 ⊢ (𝜑 → ((1^st ‘𝐸)‘⟨𝐺, 𝑌⟩) = ((1^st ‘𝐺)‘𝑌))
90	86, 89	opeq12d 4809	. . . 4 ⊢ (𝜑 → ⟨((1^st ‘𝐸)‘⟨𝐹, 𝑋⟩), ((1^st ‘𝐸)‘⟨𝐺, 𝑌⟩)⟩ = ⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐺)‘𝑌)⟩)
91		df-ov 7258	. . . . 5 ⊢ (𝐻(1^st ‘𝐸)𝑍) = ((1^st ‘𝐸)‘⟨𝐻, 𝑍⟩)
92	1, 2, 3, 4, 11, 13	evlf1 17854	. . . . 5 ⊢ (𝜑 → (𝐻(1^st ‘𝐸)𝑍) = ((1^st ‘𝐻)‘𝑍))
93	91, 92	eqtr3id 2793	. . . 4 ⊢ (𝜑 → ((1^st ‘𝐸)‘⟨𝐻, 𝑍⟩) = ((1^st ‘𝐻)‘𝑍))
94	90, 93	oveq12d 7273	. . 3 ⊢ (𝜑 → (⟨((1^st ‘𝐸)‘⟨𝐹, 𝑋⟩), ((1^st ‘𝐸)‘⟨𝐺, 𝑌⟩)⟩(comp‘𝐷)((1^st ‘𝐸)‘⟨𝐻, 𝑍⟩)) = (⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍)))
95		df-ov 7258	. . . 4 ⊢ (𝐵(⟨𝐺, 𝑌⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)𝐿) = ((⟨𝐺, 𝑌⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘⟨𝐵, 𝐿⟩)
96		eqid 2738	. . . . 5 ⊢ (⟨𝐺, 𝑌⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩) = (⟨𝐺, 𝑌⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)
97	1, 2, 3, 4, 5, 6, 7, 44, 11, 24, 13, 96, 20, 26	evlf2val 17853	. . . 4 ⊢ (𝜑 → (𝐵(⟨𝐺, 𝑌⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)𝐿) = ((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿)))
98	95, 97	eqtr3id 2793	. . 3 ⊢ (𝜑 → ((⟨𝐺, 𝑌⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘⟨𝐵, 𝐿⟩) = ((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿)))
99		df-ov 7258	. . . 4 ⊢ (𝐴(⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐺, 𝑌⟩)𝐾) = ((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐺, 𝑌⟩)‘⟨𝐴, 𝐾⟩)
100		eqid 2738	. . . . 5 ⊢ (⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐺, 𝑌⟩) = (⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐺, 𝑌⟩)
101	1, 2, 3, 4, 5, 6, 7, 9, 44, 12, 24, 100, 18, 25	evlf2val 17853	. . . 4 ⊢ (𝜑 → (𝐴(⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐺, 𝑌⟩)𝐾) = ((𝐴‘𝑌)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑌))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾)))
102	99, 101	eqtr3id 2793	. . 3 ⊢ (𝜑 → ((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐺, 𝑌⟩)‘⟨𝐴, 𝐾⟩) = ((𝐴‘𝑌)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑌))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾)))
103	94, 98, 102	oveq123d 7276	. 2 ⊢ (𝜑 → (((⟨𝐺, 𝑌⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘⟨𝐵, 𝐿⟩)(⟨((1^st ‘𝐸)‘⟨𝐹, 𝑋⟩), ((1^st ‘𝐸)‘⟨𝐺, 𝑌⟩)⟩(comp‘𝐷)((1^st ‘𝐸)‘⟨𝐻, 𝑍⟩))((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐺, 𝑌⟩)‘⟨𝐴, 𝐾⟩)) = (((𝐵‘𝑍)(⟨((1^st ‘𝐺)‘𝑌), ((1^st ‘𝐺)‘𝑍)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝑌(2^nd ‘𝐺)𝑍)‘𝐿))(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐺)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐻)‘𝑍))((𝐴‘𝑌)(⟨((1^st ‘𝐹)‘𝑋), ((1^st ‘𝐹)‘𝑌)⟩(comp‘𝐷)((1^st ‘𝐺)‘𝑌))((𝑋(2^nd ‘𝐹)𝑌)‘𝐾))))
104	75, 83, 103	3eqtr4d 2788	1 ⊢ (𝜑 → ((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘(⟨𝐵, 𝐿⟩(⟨⟨𝐹, 𝑋⟩, ⟨𝐺, 𝑌⟩⟩(comp‘(𝑄 ×_c 𝐶))⟨𝐻, 𝑍⟩)⟨𝐴, 𝐾⟩)) = (((⟨𝐺, 𝑌⟩(2^nd ‘𝐸)⟨𝐻, 𝑍⟩)‘⟨𝐵, 𝐿⟩)(⟨((1^st ‘𝐸)‘⟨𝐹, 𝑋⟩), ((1^st ‘𝐸)‘⟨𝐺, 𝑌⟩)⟩(comp‘𝐷)((1^st ‘𝐸)‘⟨𝐻, 𝑍⟩))((⟨𝐹, 𝑋⟩(2^nd ‘𝐸)⟨𝐺, 𝑌⟩)‘⟨𝐴, 𝐾⟩)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1539 ∈ wcel 2108 ⟨cop 4564 class class class wbr 5070 Rel wrel 5585 ‘cfv 6418 (class class class)co 7255 1^st c1st 7802 2^nd c2nd 7803 Basecbs 16840 Hom chom 16899 compcco 16900 Catccat 17290 Func cfunc 17485 Nat cnat 17573 FuncCat cfuc 17574 ×_c cxpc 17801 eval_F cevlf 17843

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1799 ax-4 1813 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2110 ax-9 2118 ax-10 2139 ax-11 2156 ax-12 2173 ax-ext 2709 ax-rep 5205 ax-sep 5218 ax-nul 5225 ax-pow 5283 ax-pr 5347 ax-un 7566 ax-cnex 10858 ax-resscn 10859 ax-1cn 10860 ax-icn 10861 ax-addcl 10862 ax-addrcl 10863 ax-mulcl 10864 ax-mulrcl 10865 ax-mulcom 10866 ax-addass 10867 ax-mulass 10868 ax-distr 10869 ax-i2m1 10870 ax-1ne0 10871 ax-1rid 10872 ax-rnegex 10873 ax-rrecex 10874 ax-cnre 10875 ax-pre-lttri 10876 ax-pre-lttrn 10877 ax-pre-ltadd 10878 ax-pre-mulgt0 10879

This theorem depends on definitions: df-bi 206 df-an 396 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1784 df-nf 1788 df-sb 2069 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2817 df-nfc 2888 df-ne 2943 df-nel 3049 df-ral 3068 df-rex 3069 df-reu 3070 df-rab 3072 df-v 3424 df-sbc 3712 df-csb 3829 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3902 df-nul 4254 df-if 4457 df-pw 4532 df-sn 4559 df-pr 4561 df-tp 4563 df-op 4565 df-uni 4837 df-iun 4923 df-br 5071 df-opab 5133 df-mpt 5154 df-tr 5188 df-id 5480 df-eprel 5486 df-po 5494 df-so 5495 df-fr 5535 df-we 5537 df-xp 5586 df-rel 5587 df-cnv 5588 df-co 5589 df-dm 5590 df-rn 5591 df-res 5592 df-ima 5593 df-pred 6191 df-ord 6254 df-on 6255 df-lim 6256 df-suc 6257 df-iota 6376 df-fun 6420 df-fn 6421 df-f 6422 df-f1 6423 df-fo 6424 df-f1o 6425 df-fv 6426 df-riota 7212 df-ov 7258 df-oprab 7259 df-mpo 7260 df-om 7688 df-1st 7804 df-2nd 7805 df-frecs 8068 df-wrecs 8099 df-recs 8173 df-rdg 8212 df-1o 8267 df-er 8456 df-map 8575 df-ixp 8644 df-en 8692 df-dom 8693 df-sdom 8694 df-fin 8695 df-pnf 10942 df-mnf 10943 df-xr 10944 df-ltxr 10945 df-le 10946 df-sub 11137 df-neg 11138 df-nn 11904 df-2 11966 df-3 11967 df-4 11968 df-5 11969 df-6 11970 df-7 11971 df-8 11972 df-9 11973 df-n0 12164 df-z 12250 df-dec 12367 df-uz 12512 df-fz 13169 df-struct 16776 df-slot 16811 df-ndx 16823 df-base 16841 df-hom 16912 df-cco 16913 df-cat 17294 df-func 17489 df-nat 17575 df-fuc 17576 df-xpc 17805 df-evlf 17847

This theorem is referenced by: evlfcl 17856

W3C validator