:: deftheorem ProdDef defines prodnorm FUZNORM1:def 8 :
for b1 being BinOp of [.0,1.] holds
( b1 = prodnorm iff for a, b being Element of [.0,1.] holds b1 . (a,b) = a * b );