Making fortran reals into doubles