在Fortran中逐行读取逗号分隔的文本文件

时间:2011-06-24 22:29:50

标签: text file-io fortran

我是Fortran新手。我希望能够读取文本文件并将其内容保存在单个变量中。我找到了一个非常有用的Fortran教程(http://www.math.hawaii.edu/~hile/fortran/fort7.htm#read),我试着按照那里列出的一个例子。具体来说,我创建了一个名为 data.txt 的文本文件,其中包含以下文本:

1.23, 4.56, 7.89
11, 13, "Sally"

我已将此文本文件保存在当前目录中。然后,我创建了一个文件 test.f90 (也将其保存在我当前的目录中),其中包含以下代码:

PROGRAM test
  IMPLICIT NONE

  REAL :: x, y, z
  INTEGER :: m, n
  CHARACTER first*20

  OPEN(UNIT = 7, FILE = "data.txt")
  READ(7,*) x, y, z
  READ(7,*) m, n, first

  PRINT *, x
  PRINT *, y
  PRINT *, z
  PRINT *, m
  PRINT *, n
  PRINT *, first
END PROGRAM test

我正在使用GNU Fortran编译器,我认为它包括至少包括Fortran95在内的功能。上面的代码似乎编译好了,至少使用默认设置)。但是,当我运行生成的可执行文件时,我收到此错误消息:

At line 10 of file test.f90 (unit = 7, file = 'data.txt')
Fortran runtime error: End of file

第10行是 READ(7,*)m,n,第一行。你可以帮助我看看我在上面的代码中做错了吗?

3 个答案:

答案 0 :(得分:3)

当我的示例程序,您的样本数据,它工作!恭喜!输出是:

   1.2300000    
   4.5599999    
   7.8899999    
          11
          13
 Sally 

为了猜测它不适合你的可能原因,有时Fortran可执行文件可能对行结尾敏感,要求为操作系统提供正确的行终止符,包括在数据文件的最后一行。相反,许多编辑将默默地转换行结尾。我经常遇到由Microsoft程序编写的文件的问题。

答案 1 :(得分:3)

我可以重现您的确切错误消息和正确的输出。我在Windows上使用gfortran,用记事本创建数据文件 如果使用行尾字符终止第二个数据行(通过按Enter键),程序将显示正确的输出;如果你没有终止它,它将在执行期间显示错误。

基本上,运行时尝试读取一行,但在到达行尾之前遇到文件结束符。

答案 2 :(得分:2)

对于某些编译器,在数据的最后一行之后添加一个新行很重要。例如,gfortran是一个需要它的编译器,它是非常合乎逻辑的。 Sun(Oracle)编译器不需要它。