deffunc H1( Element of BoundedLinearOperators (X,X), Element of BoundedLinearOperators (X,X)) -> Element of BoundedLinearOperators (X,X) = $1 * $2;
consider F being BinOp of (BoundedLinearOperators (X,X)) such that
A1:
for x, y being Element of BoundedLinearOperators (X,X) holds F . (x,y) = H1(x,y)
from BINOP_1:sch 4();
take
F
; for f, g being Element of BoundedLinearOperators (X,X) holds F . (f,g) = f * g
let f, g be Element of BoundedLinearOperators (X,X); F . (f,g) = f * g
thus
F . (f,g) = f * g
by A1; verum