let I be set ; :: thesis: for A being ObjectsFamily of I,(EnsCat {{}})
for o being Object of (EnsCat {{}})
for P being MorphismsFamily of A,o st P = I --> {} holds
( P is feasible & P is coprojection-morphisms )

let A be ObjectsFamily of I,(EnsCat {{}}); :: thesis: for o being Object of (EnsCat {{}})
for P being MorphismsFamily of A,o st P = I --> {} holds
( P is feasible & P is coprojection-morphisms )

let o be Object of (EnsCat {{}}); :: thesis: for P being MorphismsFamily of A,o st P = I --> {} holds
( P is feasible & P is coprojection-morphisms )

let P be MorphismsFamily of A,o; :: thesis: ( P = I --> {} implies ( P is feasible & P is coprojection-morphisms ) )
assume A1: P = I --> {} ; :: thesis: ( P is feasible & P is coprojection-morphisms )
thus P is feasible :: thesis: P is coprojection-morphisms
proof
let i be set ; :: according to ALTCAT_6:def 3 :: thesis: ( i in I implies ex o being Object of (EnsCat {{}}) st
( o = A . i & P . i in <^o,o^> ) )

assume A2: i in I ; :: thesis: ex o being Object of (EnsCat {{}}) st
( o = A . i & P . i in <^o,o^> )

then reconsider I = I as non empty set ;
reconsider i = i as Element of I by A2;
reconsider A = A as ObjectsFamily of I,(EnsCat {{}}) ;
P . i = {} by A1;
then P . i in <^(A . i),o^> by Lm3;
hence ex o being Object of (EnsCat {{}}) st
( o = A . i & P . i in <^o,o^> ) ; :: thesis: verum
end;
let Y be Object of (EnsCat {{}}); :: according to ALTCAT_6:def 5 :: thesis: for F being MorphismsFamily of A,Y st F is feasible holds
ex f being Morphism of o,Y st
( f in <^o,Y^> & ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f * Pi ) ) & ( for f1 being Morphism of o,Y st ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f1 * Pi ) ) holds
f = f1 ) )

let F be MorphismsFamily of A,Y; :: thesis: ( F is feasible implies ex f being Morphism of o,Y st
( f in <^o,Y^> & ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f * Pi ) ) & ( for f1 being Morphism of o,Y st ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f1 * Pi ) ) holds
f = f1 ) ) )

assume F is feasible ; :: thesis: ex f being Morphism of o,Y st
( f in <^o,Y^> & ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f * Pi ) ) & ( for f1 being Morphism of o,Y st ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f1 * Pi ) ) holds
f = f1 ) )

reconsider f = {} as Morphism of o,Y by Lm3;
take f ; :: thesis: ( f in <^o,Y^> & ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f * Pi ) ) & ( for f1 being Morphism of o,Y st ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f1 * Pi ) ) holds
f = f1 ) )

thus f in <^o,Y^> by Lm3; :: thesis: ( ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f * Pi ) ) & ( for f1 being Morphism of o,Y st ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f1 * Pi ) ) holds
f = f1 ) )

thus for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f * Pi ) :: thesis: for f1 being Morphism of o,Y st ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f1 * Pi ) ) holds
f = f1
proof
let i be set ; :: thesis: ( i in I implies ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f * Pi ) )

assume A3: i in I ; :: thesis: ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f * Pi )

then reconsider I = I as non empty set ;
reconsider j = i as Element of I by A3;
reconsider M = {} as Morphism of o,o by Lm3;
reconsider A1 = A as ObjectsFamily of I,(EnsCat {{}}) ;
reconsider F1 = F as MorphismsFamily of A1,Y ;
take o ; :: thesis: ex Pi being Morphism of o,o st
( o = A . i & Pi = P . i & F . i = f * Pi )

take M ; :: thesis: ( o = A . i & M = P . i & F . i = f * M )
A1 . j = {} by Lm1, TARSKI:def 1;
hence o = A . i by Lm5; :: thesis: ( M = P . i & F . i = f * M )
thus M = P . i by A1; :: thesis: F . i = f * M
( F1 . j is Morphism of o,Y & f * M is Morphism of o,Y ) by Lm5;
hence F . i = f * M by Lm6; :: thesis: verum
end;
thus for f1 being Morphism of o,Y st ( for i being set st i in I holds
ex si being Object of (EnsCat {{}}) ex Pi being Morphism of si,o st
( si = A . i & Pi = P . i & F . i = f1 * Pi ) ) holds
f = f1 by Lm4; :: thesis: verum