compound ket fn: is-greater-than

is-greater-than:
    description:
        is-greater-than[value] ket
        returns yes/no if the value in ket > value

    examples:
        is-greater-than[5] |7>
            |yes>

        is-greater-than[3] |price: 3.50>
            |yes>

        is-greater-than[26] |number: 25>
            |no>

        -- if the ket has no float value then return the empty ket |>
        is-greater-than[13] |the cat>
            |>

    see also:
        is-less-than, is-less-equal-than, is-equal, is-greater-equal-than, is-in-range