在Fortran中读取大文件

时间:2017-03-30 10:55:47

标签: fortran text-files

以下代码成功读取了30x30(7Kb)和100x100(69Kb)矩阵的1和0值的txt文件。这里有一个3x3矩阵的例子。 txt文件" MyTxtFile.txt"内容如下。

1 0 1
1 0 0
1 1 1

代码如下所示。

Integer,dimension(3,3):: ReadMatrix
Integer::row,col
open(12, file="MyTxtFile.txt")
do row=1,3
  read(12,*) (ReadMatrix(row,col),col=1,3)
end do
print*, ReadMatrix (1,:) !Print first row to check

作为输出,我获得以下

1 0 1

但是,当我尝试使用1000x1000矩阵(3186 Kb)时,出现了以下错误:

At line 8 of file C:\Users\...\...\...  (unit=12, file='Matrix1000.txt')
Fortran runtime error: End of file

实际发生了什么,我的选择是什么?

0 个答案:

没有答案