fortran数组大小溢出

starbinbin_csu

我利用以下语句读取一个文件
大概要生成两个数组，大小为686*3。
可是读取的过程中发现无法实现，个人感觉可能是数组太大，无法实现，可是感觉这个数组不是很大啊？
我用的是fortran workstation 4.0编译器
需要读取的文件见附件。
请大家不吝指教一二啊！

1. open(12,file="7_7_7cell.txt",status='old')
   
2.         read(12,*)a
   
3.         read(12,*)m1
   
4.         allocate(s1(m1,3))
   
5.         do i=1,m1
   
6.                 read(12,*) (s1(i,j),j=1,3)
   
7.     end do
   
8.         read(12,*)m2
   
9.         allocate(s2(m2,3))
   
10.         do i=1,m2
    
11.                 read(12,*) (s2(i,j),j=1,3)
    
12.         end do
    
13. close(12)

复制代码