Changing constant to explicit double precision (gfortran -pedantic complains)