Anagrams: Difference between revisions

← Older editNewer edit →
Content deleted Content added
→‎{{header|Haskell}}: make more clear
→‎{{header|Haskell}}: modified last line for formatted output
Line 33:
wix = groupBy (groupon fst) . sort $ zip (map sort words) words
mxl = maximum $ map length wix
mapM_ (print . map (map snd) . filter ((==mxl).length) $ wix
 
</pre>
Retrieved from "https://rosettacode.org/wiki/Anagrams"