m:
    ( "\\{}$&\\#^_\\ \\\\~%" )
    index
    inc
    13
    @1
    is-alpha
    -
    logical-or
    dec
    show-line