fixed two warnings from gfortran