m:
    dup
    is-lower
    5
    shift-left
    -