
19 Dec
2011
19 Dec
'11
10:29 a.m.
Shortest and most obfuscating solution I found is: import Data.Ord (comparing) import Control.Applicative ((<$)) compareLength :: [a] -> [a] -> Ordering compareLength = comparing (()<$) :-)

19 Dec
19 Dec
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

12:16 p.m.
Hahaha, sweet! Had a good laugh with Henning's version. Alexey's one isn't as funny =). -- Felipe.
4902
Age (days ago)
4902
Last active (days ago)
2 comments
3 participants
participants (3)
-
Alexey Khudyakov
-
Felipe Almeida Lessa
-
Henning Thielemann