格式字符串错误信息

Question

意外结束汇编写在FORTRAN90（不是我）代码时，我得到这个消息

Warning <100>: Unexpected end of format string in format string at <1> 
      write (iout,'(i5,4x,i4,6x,15(a25,1x)') i, ksum, temp (1:isum) 
         1 

几次。这里是一个错误代码的例子：

if (isum > 0) then 
      ksum = ksum + isum 
      write (iout,'(i5,4x,i4,6x,15(a25,1x)') i, ksum, temp (1:isum) 
      if (ksum == NSPECIES - NotPhotographed) go to 5 
     endif 

任何帮助，将不胜感激。我假设1指示错误的位置，但我无法找到如何解决它。

Answer 1

从外观上看，你错过了'之间的右括号。