:: deftheorem Def4 defines Support POLYNOM1:def 4 :
for X being non empty set
for S being non empty ZeroStr
for f being Function of X,S
for b4 being Subset of X holds
( b4 = Support f iff for x being Element of X holds
( x in b4 iff f . x <> 0. S ) );