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

6 lines
108 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
(define my-num 123)
(cond
((positive? my-num) 'positive)
((negative? my-num) 'negative)
(else 'zero))