fork download
  1. import Data.List (tails)
  2.  
  3. main = print $ map (take 3) (take 3 (tails [1,2,3,4,5]))
Success #stdin #stdout 0s 8388607KB
stdin
Standard input is empty
stdout
[[1,2,3],[2,3,4],[3,4,5]]