raise the internal error in gfortran