:: deftheorem defadd defines addemb FIELD_2:def 4 :
for R being Ring
for S being b1 -monomorphic Ring
for f being Monomorphism of R,S
for b4 being BinOp of (carr f) holds
( b4 = addemb f iff for a, b being Element of carr f holds b4 . (a,b) = addemb (f,a,b) );