
19 Dec
2011
19 Dec
'11
11:34 a.m.
On 19.12.2011 19:29, Henning Thielemann wrote:
Shortest and most obfuscating solution I found is:
import Data.Ord (comparing) import Control.Applicative ((<$))
compareLength :: [a] -> [a] -> Ordering compareLength = comparing (()<$)
comparingLength = comparing void It's two character shorter