Drastically improved efficiency

(x^2 + x)/2 is much better than sum[1..x] the way I'm generating the
lists.
Efficiency