
19 Dec
2011
19 Dec
'11
3:29 p.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
4:34 p.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

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