import Data.List (tails) main = print $ map (take 3) (take 3 (tails [1,2,3,4,5]))
Standard input is empty
[[1,2,3],[2,3,4],[3,4,5]]
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!