line-mode
inits
tail
m:
    right-uncons
    swap
    space
    diff #(list-list)
    length
    16
    =
    f:
        printable-ascii
        index
        @0
        logical-or