m:
    dup
    is-upper
    f:
        32
        dup
        rot
        |