Scieneer Common Lisp 1.3.9 online documentation

signum number[Function]

If number is zero, return number, else return (/ number (abs number)).