line-mode
read-nums
pairwise
    extract-array
    ^
    popcnt
    1
    =
m5
product