maximum $ filter (< maximum xs) xs

or like the Ruby one, but with better error semantics

    (`atMay` 1) . reverse . sort

since we don't know that there exists such a column.