:: deftheorem defines -positive REALALG2:def 8 :
for R being preordered Ring
for P being Preordering of R
for a being Element of R holds
( a is P -positive iff a in P \ {(0. R)} );