fix some problem for lower version of gfortran

fix