fork download
  1. main :: IO ()
  2. foo :: [Int] -> [Int]
  3. foo a = [y | y<-a, y `mod` 3 == 0]
  4. main = print $ foo [2,3,9,6,8,0]
Success #stdin #stdout 0.01s 5288KB
stdin
Standard input is empty
stdout
[3,9,6,0]