旧的fortran代码并使用GNU获得OPEN语句错误 [英] Old fortran code and getting an OPEN statement error using GNU

问题描述

我正在尝试编译非常旧的代码，但是在编译代码时遇到此错误

I'm trying to compile a very old code but I get this error while compiling the code

   Error: Syntax error in OPEN statement at (1)

代码:

      WRITE(LUTTO,'('' TYPE NAME OF FILE CONTAINING INPUT   : '',$)')
C      READ (LUTTI,'(Q,A)') NCHAR,FILNAM
      READ (LUTTI,'(A)') FILNAM
      NCHAR = len_trim(FILNAM)
C                                             ----- OPEN DATA FILE -----
      print *, "NCHAR"
      OPEN( UNIT           = LUINP, NAME  = FILNAM(1:NCHAR),
     $      STATUS         = 'OLD', RECL  =             80 ,
     $      CARRIAGECONTROL= 'LIST', ERR   =           9900 )

推荐答案

name = ...在打开的语句中无效

name=... in the open statement is invalid

尝试file = ...代替

try file=... instead

这篇关于旧的fortran代码并使用GNU获得OPEN语句错误的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！