change dimension

double precision to dp