在FORTRAN 77中阅读带注释的输入

Question

我有一个带注释的简单输入文件（以＃开头的行）。示例数据如下所示：

#NDIM
 1
#NX   NY   NZ
 3001 1    1
#I_RXN
 2

我想告诉代码，每次我遇到行开头的字符＃跳过该行并继续前进到下一行。我必须在FORTRAN 77中这样做。

Answer 1

您可以将这些行读入字符串，然后测试第一个字符是否为“＃”。如果没有，请使用“内部读取”来读取字符串中的数值。此前已有关于此技术的答案，例如Reading comment lines correctly in an input file using Fortran 90