lines
empty-list
itemize
split
m:
    length
    @0
        read-nums
    m1
    2dup
    transpose
    drop
    cartesian-product
        transpose
            product
        m1
        sum
    m4
    chunks
        unwords
        new-line
    m2
    new-line