square n = [x * x | x <- [1..n]]