WMA link
ClearAttributes
SetAttributes[f, Flat]
Attributes[f]
ClearAttributes[f, Flat]
Attributes that are not even set are simply ignored:
ClearAttributes[{f}, {Flat}]