fork(2) download
  1. main = print $ mysum [1,2]
  2.  
  3. mysum :: Num a => [a] => a -- Notice => after the list [a]
  4. mysum [] = 0
  5. mysum (x:xs) = x + mysum xs
Success #stdin #stdout 0s 6268KB
stdin
Standard input is empty
stdout
3