t3x.org / sketchy / library / positivep.html
SketchyLISP
Reference
  Copyright (C) 2006
Nils M Holm

positive?

Conformance: R5RS

Purpose: Check whether a number is positive.

Arguments:
X - number

Implementation:

(define (positive? x)
  (eq? (or (negative? x) (zero? x)) #f))

Example:

(positive? 567) 
=> #t

See also:
digits, negative?, zero?, abs.