let i 1024
while i > 0
  println i
  let i (i / 2)
endwhile