A5: for a, b being object of st F3(a) = F3(b) holds
a = b by A2;
A6: for a, b being object of st <^a,b^> <> {} holds
for f, g being Morphism of , st F4(a,b,f) = F4(a,b,g) holds
f = g by A3;
A7: for a, b being object of st <^a,b^> <> {} holds
for f being Morphism of , ex c, d being object of ex g being Morphism of , st
( a = F3(c) & b = F3(d) & <^c,d^> <> {} & f = F4(c,d,g) ) by A4;
consider F being covariant Functor of F1(),F2() such that
A8: for a being object of holds F . a = F3(a) and
A9: for a, b being object of st <^a,b^> <> {} holds
for f being Morphism of , holds F . f = F4(a,b,f) by A1;
take F ; :: according to FUNCTOR0:def 40 :: thesis: ( F is bijective & F is covariant )
thus F is bijective from YELLOW18:sch 10(A8, A9, A5, A6, A7); :: thesis: F is covariant
thus F is covariant ; :: thesis: verum