Negative

Negative[x] returns True if x is positive.

Attributes[Negative] := {Listable, Protected}

Simple examples

In[1]:= Map[Negative, {1, 0, -1, a}]
Out[1]= {False, False, True, Negative[a]}