(define my-num 123)
(cond
  ((positive? my-num) 'positive)
  ((negative? my-num) 'negative)
  (else 'zero))