compound ket fn: has-suffix

has-suffix:
    description:
        has-suffix["str"] ket
        returns |yes> if the ket has the given suffix

    examples:
        has-suffix["day"] |Tuesday>
            |yes>

        has-suffix["str"] |Tuesday>
            |no>
    see also:
        has-prefix, remove-suffix, remove-prefix