deffunc H1( Element of {0 ,1,2}, Element of {0 ,1,2}) -> Element of {0 ,1,2} = $1 * $2;
ex o being BinOp of {0 ,1,2} st
for a, b being Element of {0 ,1,2} holds o . a,b = H1(a,b) from BINOP_1:sch 4();
hence ex b1 being BinOp of {0 ,1,2} st
for a, b being Element of {0 ,1,2} holds b1 . a,b = a * b ; :: thesis: verum