:: deftheorem defines comp VECTSP_1:def 12 :
for F being non empty addLoopStr
for b2 being UnOp of the carrier of F holds
( b2 = comp F iff for x being Element of F holds b2 . x = - x );