|
|
[求助]
测井 用Fortran编写的自动分层程序挂接到forward中,运行过程出现问题
用Fortran编写的程序挂接到forward中,但是运行过程中出现问题,求各位大神帮忙看看。
代码如下:
CALL INDATA
IF((RT.NE.-9999.AND.RI.NE.-9999).OR.(RT.NE.-9999.AND.RI.NE.-9999)
& .AND.RXO.NE.-9999) THEN
GOTO 1094
ELSE IF(RT.EQ.-9999..AND.RILD.EQ.-9999.)THEN
WRITE(*,1091)
1091 FORMAT(1X,'RT OR RILD NOT IN FILE')
STOP
运行结果如下:
![测井 用Fortran编写的自动分层程序挂接到forward中,运行过程出现问题]()
运行1.png
![测井 用Fortran编写的自动分层程序挂接到forward中,运行过程出现问题-1]()
运行2.png |
|