let a be Domain-Sequence; :: thesis: for d, d' being BinOp of product a st ( for f, g being Element of product a
for i being Element of dom a holds (d . f,g) . i = (d' . f,g) . i ) holds
d = d'
let d, d' be BinOp of product a; :: thesis: ( ( for f, g being Element of product a
for i being Element of dom a holds (d . f,g) . i = (d' . f,g) . i ) implies d = d' )
assume A1: for f, g being Element of product a
for i being Element of dom a holds (d . f,g) . i = (d' . f,g) . i ; :: thesis: d = d'

now

let f, g be Element of product a; :: thesis: d . f,g = d' . f,g
A2: ( dom (d . f,g) = dom a & dom (d' . f,g) = dom a ) by CARD_3:18;
for x being set st x in dom a holds
(d . f,g) . x = (d' . f,g) . x by A1;
hence d . f,g = d' . f,g by A2, FUNCT_1:9; :: thesis: verum

end;

hence d = d' by BINOP_1:2; :: thesis: verum