Anonymous user
Anagrams: Difference between revisions
→{{header|Haskell}}: make more clear
(→{{header|Haskell}}: make more clear) |
|||
Line 31:
f <- readFile "./../Puzzels/Rosetta/unixdict.txt"
let words = lines f
wix = groupBy (groupon fst) . sort $
mxl =
print . map (map snd) . filter ((==mxl).length) $ wix
| |||