Program Main
Implicit None
Integer, Parameter:: Num_All=7000000, Num_List=40,Num_File=15000
Integer I10,I11,I12,J10,K0,Num_Data
Character*8 Filename(Num_File)
Double Precision Num_Total(Num_All, Num_List)
K0=1
Open(Unit=10,File='D:\File.txt')
Do I10=1,Num_File
Read(10,*)Filename(I10)
End Do
Close(10)
Do I11=1,Num_File
Open(Unit=11,file='d:\File\'//Filename(I11)//'.txt')
Read(11,*)Num_Data
Do I12=1,Num_Data
Read(11,*)(Num_Total(K0,J10),J10=1,Num_List)
K0=K0+1
End Do
Close(11)
End Do
End Program Main
vvt 发表于 2017-3-3 22:39
在我这里,错误提示是:The size of the array dimension is too large, and overflow occurred when compu ...
vvt 发表于 2017-3-4 08:39
要使用64位编译器,你必须保证:
1.你的CPU是64位的
2.你的操作系统(windows,linux)是64位的。
QQ.png (13.05 KB, 下载次数: 317)
vvt 发表于 2017-3-4 22:04
请问您在主楼说:
在debug x64/win32下编译均顺利通过
error1.png (18.13 KB, 下载次数: 318)
win32下出现2个错误。
error2.png (16.94 KB, 下载次数: 284)
vvt 发表于 2017-3-5 09:26
改成动态数组吧,这的确是 windows 的内存限定。
详询:https://software.intel.com/en-us/forums/intel-v ...
欢迎光临 Fortran Coder (http://bbs.fcode.cn/) | Powered by Discuz! X3.2 |