Users' Mathboxes Mathbox for Zhi Wang < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  fthcomf Structured version   Visualization version   GIF version

Theorem fthcomf 50097
Description: Source categories of a faithful functor have the same base, hom-sets and composition operation if the composition is compatible in images of the functor. (Contributed by Zhi Wang, 10-Nov-2025.)
Hypotheses
Ref Expression
fthcomf.1 (𝜑𝐹(𝐴 Faith 𝐶)𝐺)
fthcomf.2 (𝜑𝐹(𝐵 Func 𝐷)𝐺)
fthcomf.3 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (((𝑦𝐺𝑧)‘𝑔)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐶)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑓)) = (((𝑦𝐺𝑧)‘𝑔)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐷)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑓)))
Assertion
Ref Expression
fthcomf (𝜑 → (compf𝐴) = (compf𝐵))
Distinct variable groups:   𝐴,𝑓,𝑔,𝑥,𝑦,𝑧   𝐵,𝑓,𝑔,𝑥,𝑦,𝑧   𝜑,𝑓,𝑔,𝑥,𝑦,𝑧
Allowed substitution hints:   𝐶(𝑥, 𝑦, 𝑧, 𝑓, 𝑔)   𝐷(𝑥, 𝑦, 𝑧, 𝑓, 𝑔)   𝐹(𝑥, 𝑦, 𝑧, 𝑓, 𝑔)   𝐺(𝑥, 𝑦, 𝑧, 𝑓, 𝑔)

Proof of Theorem fthcomf
StepHypRef Expression
1 fthcomf.3 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (((𝑦𝐺𝑧)‘𝑔)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐶)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑓)) = (((𝑦𝐺𝑧)‘𝑔)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐷)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑓)))
2 eqid 2760 . . . . . . 7 (Base‘𝐴) = (Base‘𝐴)
3 eqid 2760 . . . . . . 7 (Hom ‘𝐴) = (Hom ‘𝐴)
4 eqid 2760 . . . . . . 7 (comp‘𝐴) = (comp‘𝐴)
5 eqid 2760 . . . . . . 7 (comp‘𝐶) = (comp‘𝐶)
6 fthcomf.1 . . . . . . . . 9 (𝜑𝐹(𝐴 Faith 𝐶)𝐺)
76ad2antrr 739 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝐹(𝐴 Faith 𝐶)𝐺)
8 fthfunc 18020 . . . . . . . . 9 (𝐴 Faith 𝐶) ⊆ (𝐴 Func 𝐶)
98ssbri 5150 . . . . . . . 8 (𝐹(𝐴 Faith 𝐶)𝐺𝐹(𝐴 Func 𝐶)𝐺)
107, 9syl 18 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝐹(𝐴 Func 𝐶)𝐺)
11 simplr1 1234 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑥 ∈ (Base‘𝐴))
12 simplr2 1235 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑦 ∈ (Base‘𝐴))
13 simplr3 1236 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑧 ∈ (Base‘𝐴))
14 simprl 783 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦))
15 simprr 785 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))
162, 3, 4, 5, 10, 11, 12, 13, 14, 15funcco 17982 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → ((𝑥𝐺𝑧)‘(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐴)𝑧)𝑓)) = (((𝑦𝐺𝑧)‘𝑔)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐶)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑓)))
17 eqid 2760 . . . . . . 7 (Base‘𝐵) = (Base‘𝐵)
18 eqid 2760 . . . . . . 7 (Hom ‘𝐵) = (Hom ‘𝐵)
19 eqid 2760 . . . . . . 7 (comp‘𝐵) = (comp‘𝐵)
20 eqid 2760 . . . . . . 7 (comp‘𝐷) = (comp‘𝐷)
21 fthcomf.2 . . . . . . . 8 (𝜑𝐹(𝐵 Func 𝐷)𝐺)
2221ad2antrr 739 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝐹(𝐵 Func 𝐷)𝐺)
236, 9syl 18 . . . . . . . . . . 11 (𝜑𝐹(𝐴 Func 𝐶)𝐺)
2423, 21funchomf 50037 . . . . . . . . . 10 (𝜑 → (Homf𝐴) = (Homf𝐵))
2524homfeqbas 17806 . . . . . . . . 9 (𝜑 → (Base‘𝐴) = (Base‘𝐵))
2625ad2antrr 739 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (Base‘𝐴) = (Base‘𝐵))
2711, 26eleqtrd 2862 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑥 ∈ (Base‘𝐵))
2812, 26eleqtrd 2862 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑦 ∈ (Base‘𝐵))
2913, 26eleqtrd 2862 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑧 ∈ (Base‘𝐵))
3024ad2antrr 739 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (Homf𝐴) = (Homf𝐵))
312, 3, 18, 30, 11, 12homfeqval 17807 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (𝑥(Hom ‘𝐴)𝑦) = (𝑥(Hom ‘𝐵)𝑦))
3214, 31eleqtrd 2862 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑓 ∈ (𝑥(Hom ‘𝐵)𝑦))
332, 3, 18, 30, 12, 13homfeqval 17807 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (𝑦(Hom ‘𝐴)𝑧) = (𝑦(Hom ‘𝐵)𝑧))
3415, 33eleqtrd 2862 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝑔 ∈ (𝑦(Hom ‘𝐵)𝑧))
3517, 18, 19, 20, 22, 27, 28, 29, 32, 34funcco 17982 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → ((𝑥𝐺𝑧)‘(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓)) = (((𝑦𝐺𝑧)‘𝑔)(⟨(𝐹𝑥), (𝐹𝑦)⟩(comp‘𝐷)(𝐹𝑧))((𝑥𝐺𝑦)‘𝑓)))
361, 16, 353eqtr4d 2805 . . . . 5 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → ((𝑥𝐺𝑧)‘(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐴)𝑧)𝑓)) = ((𝑥𝐺𝑧)‘(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓)))
37 eqid 2760 . . . . . 6 (Hom ‘𝐶) = (Hom ‘𝐶)
3823funcrcl2 50019 . . . . . . . 8 (𝜑𝐴 ∈ Cat)
3938ad2antrr 739 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝐴 ∈ Cat)
402, 3, 4, 39, 11, 12, 13, 14, 15catcocl 17795 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐴)𝑧)𝑓) ∈ (𝑥(Hom ‘𝐴)𝑧))
4121funcrcl2 50019 . . . . . . . . 9 (𝜑𝐵 ∈ Cat)
4241ad2antrr 739 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → 𝐵 ∈ Cat)
4317, 18, 19, 42, 27, 28, 29, 32, 34catcocl 17795 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓) ∈ (𝑥(Hom ‘𝐵)𝑧))
442, 3, 18, 30, 11, 13homfeqval 17807 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (𝑥(Hom ‘𝐴)𝑧) = (𝑥(Hom ‘𝐵)𝑧))
4543, 44eleqtrrd 2863 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓) ∈ (𝑥(Hom ‘𝐴)𝑧))
462, 3, 37, 7, 11, 13, 40, 45fthi 18031 . . . . 5 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (((𝑥𝐺𝑧)‘(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐴)𝑧)𝑓)) = ((𝑥𝐺𝑧)‘(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓)) ↔ (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐴)𝑧)𝑓) = (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓)))
4736, 46mpbid 235 . . . 4 (((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) ∧ (𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦) ∧ 𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧))) → (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐴)𝑧)𝑓) = (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓))
4847ralrimivva 3205 . . 3 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐴) ∧ 𝑦 ∈ (Base‘𝐴) ∧ 𝑧 ∈ (Base‘𝐴))) → ∀𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦)∀𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧)(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐴)𝑧)𝑓) = (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓))
4948ralrimivvva 3208 . 2 (𝜑 → ∀𝑥 ∈ (Base‘𝐴)∀𝑦 ∈ (Base‘𝐴)∀𝑧 ∈ (Base‘𝐴)∀𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦)∀𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧)(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐴)𝑧)𝑓) = (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓))
50 eqidd 2761 . . 3 (𝜑 → (Base‘𝐴) = (Base‘𝐴))
514, 19, 3, 50, 25, 24comfeq 17816 . 2 (𝜑 → ((compf𝐴) = (compf𝐵) ↔ ∀𝑥 ∈ (Base‘𝐴)∀𝑦 ∈ (Base‘𝐴)∀𝑧 ∈ (Base‘𝐴)∀𝑓 ∈ (𝑥(Hom ‘𝐴)𝑦)∀𝑔 ∈ (𝑦(Hom ‘𝐴)𝑧)(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐴)𝑧)𝑓) = (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐵)𝑧)𝑓)))
5249, 51mpbird 260 1 (𝜑 → (compf𝐴) = (compf𝐵))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wa 401  w3a 1103   = wceq 1570  wcel 2145  wral 3076  cop 4590   class class class wbr 5103  cfv 6534  (class class class)co 7415  Basecbs 17323  Hom chom 17375  compcco 17376  Catccat 17774  Homf chomf 17776  compfccomf 17777   Func cfunc 17965   Faith cfth 18016
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7738
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  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 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-id 5550  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-iota 6490  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-ov 7418  df-oprab 7419  df-mpo 7420  df-1st 7988  df-2nd 7989  df-map 8832  df-ixp 8909  df-cat 17778  df-homf 17780  df-comf 17781  df-func 17969  df-fth 18018
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator