aboutsummaryrefslogtreecommitdiff
path: root/solutions/collatz.slip
blob: e561b170a3a0774a0731976820873a7eb63594fc (plain)
1
2
3
4
5
6

(let x 7)
(if (= (* (/ x 2) 2) x)
  (/ x 2)
  (+ (* 3 x) 1))