Replace the federal income tax deduction of state income taxes with block grants for states with below-average per capita income. Such "equalization grants" work well in Canada and Australia.