Metamath Proof Explorer


Theorem termccofix

Description: Post-composition by an object-fixing endofunctor leaves a functor with terminal source literally unchanged. (Contributed by Zhi Wang, 14-Sep-2026)

Ref Expression
Hypotheses termcfunc1eq.c No typesetting found for |- ( ph -> C e. TermCat ) with typecode |-
termcfunc1eq.f ⊢ φ → F ∈ C Func D
termccofix.s ⊢ φ → S ∈ D Func D
termccofix.i ⊢ φ → 1 st ⁡ S = I ↾ A
Assertion termccofix ⊢ φ → S ∘ func F = F

Proof

Step Hyp Ref Expression
1 termcfunc1eq.c Could not format ( ph -> C e. TermCat ) : No typesetting found for |- ( ph -> C e. TermCat ) with typecode |-
2 termcfunc1eq.f ⊢ φ → F ∈ C Func D
3 termccofix.s ⊢ φ → S ∈ D Func D
4 termccofix.i ⊢ φ → 1 st ⁡ S = I ↾ A
5 2 3 cofucl ⊢ φ → S ∘ func F ∈ C Func D
6 eqid ⊢ Base C = Base C
7 1 6 termco ⊢ φ → ⋃ Base C ∈ Base C
8 6 2 3 7 cofu1 ⊢ φ → 1 st ⁡ S ∘ func F ⁡ ⋃ Base C = 1 st ⁡ S ⁡ 1 st ⁡ F ⁡ ⋃ Base C
9 4 fveq1d ⊢ φ → 1 st ⁡ S ⁡ 1 st ⁡ F ⁡ ⋃ Base C = I ↾ A ⁡ 1 st ⁡ F ⁡ ⋃ Base C
10 eqid ⊢ Base D = Base D
11 2 func1st2nd ⊢ φ → 1 st ⁡ F C Func D 2 nd ⁡ F
12 6 10 11 funcf1 ⊢ φ → 1 st ⁡ F : Base C ⟶ Base D
13 12 7 ffvelcdmd ⊢ φ → 1 st ⁡ F ⁡ ⋃ Base C ∈ Base D
14 4 dmeqd ⊢ φ → dom ⁡ 1 st ⁡ S = dom ⁡ I ↾ A
15 dmresi ⊢ dom ⁡ I ↾ A = A
16 14 15 eqtrdi ⊢ φ → dom ⁡ 1 st ⁡ S = A
17 3 func1st2nd ⊢ φ → 1 st ⁡ S D Func D 2 nd ⁡ S
18 10 10 17 funcf1 ⊢ φ → 1 st ⁡ S : Base D ⟶ Base D
19 18 fdmd ⊢ φ → dom ⁡ 1 st ⁡ S = Base D
20 16 19 eqtr3d ⊢ φ → A = Base D
21 13 20 eleqtrrd ⊢ φ → 1 st ⁡ F ⁡ ⋃ Base C ∈ A
22 fvresi ⊢ 1 st ⁡ F ⁡ ⋃ Base C ∈ A → I ↾ A ⁡ 1 st ⁡ F ⁡ ⋃ Base C = 1 st ⁡ F ⁡ ⋃ Base C
23 21 22 syl ⊢ φ → I ↾ A ⁡ 1 st ⁡ F ⁡ ⋃ Base C = 1 st ⁡ F ⁡ ⋃ Base C
24 8 9 23 3eqtrd ⊢ φ → 1 st ⁡ S ∘ func F ⁡ ⋃ Base C = 1 st ⁡ F ⁡ ⋃ Base C
25 1 5 6 2 7 24 termcfunc1eq ⊢ φ → S ∘ func F = F