read-nums
extract-array
pop-a
range1
m:
    2
    range
    64
    times #(list)
    drop
    push-a
    take
    unwords
    show-line