read-nums
    digits
    binary #(list to num)
m2
product
256
+
binary #(num to list)
tail
extract-array