f_positive_p      198 complex.c      #define f_positive_p(x) (!f_negative_p(x))
f_positive_p      170 rational.c     #define f_positive_p(x) (!f_negative_p(x))