Abbreviations, automatic: Difference between revisions
Content deleted Content added
→{{header|Haskell}}: Slightly simplified do expression for legibility |
|||
| Line 1,106: | Line 1,106: | ||
in head $ dropWhile ((< n) . length) $ nub <$> transpose (inits <$> xs) |
in head $ dropWhile ((< n) . length) $ nub <$> transpose (inits <$> xs) |
||
-- TEST ------------------------------------------------- |
-- TEST --------------------------------------------------- |
||
main :: IO () |
main :: IO () |
||
main = do |
main = do |
||