let C be Cocartesian_category; :: thesis: C is with_finite_coproduct
A1:
[0] C is initial
by Def27;
for a, b being Object of C ex c being Object of C ex i1, i2 being Morphism of C st
( dom i1 = a & dom i2 = b & cod i1 = c & cod i2 = c & c is_a_coproduct_wrt i1,i2 )
proof
let a,
b be
Object of
C;
:: thesis: ex c being Object of C ex i1, i2 being Morphism of C st
( dom i1 = a & dom i2 = b & cod i1 = c & cod i2 = c & c is_a_coproduct_wrt i1,i2 )
take
a + b
;
:: thesis: ex i1, i2 being Morphism of C st
( dom i1 = a & dom i2 = b & cod i1 = a + b & cod i2 = a + b & a + b is_a_coproduct_wrt i1,i2 )
take
in1 a,
b
;
:: thesis: ex i2 being Morphism of C st
( dom (in1 a,b) = a & dom i2 = b & cod (in1 a,b) = a + b & cod i2 = a + b & a + b is_a_coproduct_wrt in1 a,b,i2 )
take
in2 a,
b
;
:: thesis: ( dom (in1 a,b) = a & dom (in2 a,b) = b & cod (in1 a,b) = a + b & cod (in2 a,b) = a + b & a + b is_a_coproduct_wrt in1 a,b, in2 a,b )
thus
(
dom (in1 a,b) = a &
dom (in2 a,b) = b &
cod (in1 a,b) = a + b &
cod (in2 a,b) = a + b &
a + b is_a_coproduct_wrt in1 a,
b,
in2 a,
b )
by Def27, Th64, Th65;
:: thesis: verum
end;
hence
C is with_finite_coproduct
by A1, Th46; :: thesis: verum