-- |Takes the third largest element of a list, without doing any safety checks.
third :: Ord a => [a] -> a
third = head. tail . tail . reverse . sort
third :: Ord a => [a] -> a
third = head. tail . tail . reverse . sort
third = head. tail . tail . reverse . sort