(var i 1024)

(while (> i 1)
  (print i)
  (var i (// i 2)))