let C, B, D be Category; :: thesis: for S1 being Functor of C,B
for S2 being Contravariant_Functor of B,D holds S2 * S1 is Contravariant_Functor of C,D
let S1 be Functor of C,B; :: thesis: for S2 being Contravariant_Functor of B,D holds S2 * S1 is Contravariant_Functor of C,D
let S2 be Contravariant_Functor of B,D; :: thesis: S2 * S1 is Contravariant_Functor of C,D
*' S1 is Contravariant_Functor of C opp ,B by Th58;
then S2 * (*' S1) is Functor of C opp ,D by Th36;
then /* (S2 * (*' S1)) is Contravariant_Functor of C,D by Th35;
then S2 * (/* (*' S1)) is Contravariant_Functor of C,D by Lm15;
hence S2 * S1 is Contravariant_Functor of C,D by Th48; :: thesis: verum