let expt n d = d