fork(1) download
  1. acumular :: [Int] -> Int
  2. acumular [] = 0
  3. acumular (x:xs) = x + acumular xs
  4.  
  5. main = do
  6. print( acumular [5,6,7] )
Success #stdin #stdout 0s 4684KB
stdin
Standard input is empty
stdout
18