Fixed improper Fortran exit command