Question

如何fortran90从文件中读取指定信息输出到另一个文件中

文件很大 行数也不清楚 整个文件中只需要一小部分内容输出到另外一个文件中，求高手解答

Answer 1

行数不清楚的话，可以用如下方法读数据
10 read(1,*,end=50)aa,bb,cc
goto10
50 continue
自动读到文件末尾，然后执行continue语句；读进去后判断指定信息，之后使用write语句输出就行了。