line-mode
inits
10
drop
@2
tails
cartesian-product
        read-nums
        sum
    m2
    extract-array
    =
f4
head
"|"
join