theorem Th21: :: POLYDIFF:21
for L being non empty ZeroStr
for x being Element of L
for f being the carrier of b1 -valued Function
for a being object holds Support (f +* (a,x)) c= (Support f) \/ {a}