-- Types are not required, but useful
avg :: [Int] -> Int
avg xs = div (sum xs) (length xs)
-- Factorial is pretty simple to write
factorial n = product [1..n]
-- Can also use infix operator.
average xs = sum xs `div` length xs