我必须编写用于作业分配的Fortran程序。当我编译它时,我得到了这个:
At line 36 of file projetfinal2.f90 (Unit 10 "PARAM.dat")
Traceback: not available, compile with -ftrace=frame or -ftrace=full
Fortran runtime error: Bad integer for item 1 in list input
我不了解此错误,请您帮我解决这个问题吗?
'''这是使用.dat文件的程序的一部分'''
SUBROUTINE initialisation(r,l_clear,f,it_max,densite)
TYPE(ROUTE),INTENT(INOUT) :: r
REAL,INTENT(OUT) :: f
INTEGER,INTENT(OUT):: it_max
LOGICAL,INTENT(OUT) :: l_clear
INTEGER::ios
OPEN(UNIT=10,FILE='PARAM.dat',FORM='formatted',ACTION='read',iostat=ios)
IF (ios/=0) STOP 'Erreur'
READ (UNIT=10,FMT=*) r%n_max
READ (UNIT=10,FMT=*) r%v_max
READ (UNIT=10,FMT=*) f
READ (UNIT=10,FMT=*) it_max
READ (UNIT=10,FMT=*) l_clear
CLOSE(UNIT=10)
END SUBROUTINE initialisation
'''这是.dat文件'''
60
3
1
0.3
30
.TRUE.