Metamath Proof Explorer


Theorem postcofcl

Description: The post-composition functor as a curry of the functor composition bifunctor is a functor. (Contributed by Zhi Wang, 11-Oct-2025)

Ref Expression
Hypotheses postcofval.q Q = C FuncCat D
postcofval.r R = D FuncCat E
postcofval.o No typesetting found for |- .o. = ( <. R , Q >. curryF ( <. C , D >. o.F E ) ) with typecode |-
postcofval.f φ F D Func E
postcofval.c φ C Cat
postcofval.k No typesetting found for |- K = ( ( 1st ` .o. ) ` F ) with typecode |-
postcofcl.s S = C FuncCat E
Assertion postcofcl φ K Q Func S

Proof

Step Hyp Ref Expression
1 postcofval.q Q = C FuncCat D
2 postcofval.r R = D FuncCat E
3 postcofval.o Could not format .o. = ( <. R , Q >. curryF ( <. C , D >. o.F E ) ) : No typesetting found for |- .o. = ( <. R , Q >. curryF ( <. C , D >. o.F E ) ) with typecode |-
4 postcofval.f φ F D Func E
5 postcofval.c φ C Cat
6 postcofval.k Could not format K = ( ( 1st ` .o. ) ` F ) : No typesetting found for |- K = ( ( 1st ` .o. ) ` F ) with typecode |-
7 postcofcl.s S = C FuncCat E
8 2 fucbas D Func E = Base R
9 4 func1st2nd φ 1 st F D Func E 2 nd F
10 9 funcrcl2 φ D Cat
11 9 funcrcl3 φ E Cat
12 2 10 11 fuccat φ R Cat
13 1 5 10 fuccat φ Q Cat
14 2 1 oveq12i R × c Q = D FuncCat E × c C FuncCat D
15 14 7 5 10 11 fucofunca Could not format ( ph -> ( <. C , D >. o.F E ) e. ( ( R Xc. Q ) Func S ) ) : No typesetting found for |- ( ph -> ( <. C , D >. o.F E ) e. ( ( R Xc. Q ) Func S ) ) with typecode |-
16 eqid Base Q = Base Q
17 3 8 12 13 15 16 4 6 curf1cl φ K Q Func S