Added type consistency for (expt _ 0)

(expt 3M 0) should return 1M
(expt 3N 0) should return 1N