blob: abd3b7b579c6c53b1950ebf3c9267978ef10b85f (
plain)
1
2
3
4
5
6
7
8
9
10
|
{-# LANGUAGE MonadComprehensions, ParallelListComp #-}
-- !!! Parallel list comprehensions
module Main where
f xs = [ (x,y) | x <- xs, x>3 | y <- xs ]
main = print (f [0..10])
|