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