RosettaCodeData/Task/Conditional-structures/Slope/conditional-structures-6.slope

6 lines
108 B
Plaintext

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