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