for f, g being Function of [:A,A:],A st ( for x, y being object st x in A & y in A holds
f . (x,y) = H1(x,y) ) & ( for x, y being object st x in A & y in A holds
g . (x,y) = H1(x,y) ) holds
f = g from NOMIN_4:sch 3();
hence for b1, b2 being Function of [:A,A:],A st ( for x, y being object st x in A & y in A holds
b1 . (x,y) = addition (x,y) ) & ( for x, y being object st x in A & y in A holds
b2 . (x,y) = addition (x,y) ) holds
b1 = b2 ; :: thesis: verum