4 lines
70 B
Text
4 lines
70 B
Text
(let (i 1024)
|
|
(while (> i 0)
|
|
(println i)
|
|
(setq i (/ i 2))))
|