line-mode
pop
1504505597
4
base #(num to list)
inits
    sum
m1
extract-array
swap
16
inc
100
crange
extract-array