How Progressive is the Canadian Personal Income Tax? A Buffett Curve Analysis