fortran的这个程序年份到2013 时可以运行，换成2015就不行了，为什么

捌布

PARAMETER (ix=480,iy=241)
  dimension h700(ix,iy,1979:2013)
       integer iyear(1979:2013)
      

       open(11,file='E:\zhou\shuju\data\z700mbsummer.bin',form='binary')
           do k=1979,2013
read(11)((h700(i,j,k),i=1,ix),j=1,iy)
    enddo

  
open(44,file='D:\zhou\z_700mb_springweaker.bin',
     &form='binary')
     
  write(44)((h700(i,j,1985),i=1,ix),j=1,iy)
write(44)((h700(i,j,1989),i=1,ix),j=1,iy)
write(44)((h700(i,j,1991),i=1,ix),j=1,iy)
write(44)((h700(i,j,1992),i=1,ix),j=1,iy)
write(44)((h700(i,j,1993),i=1,ix),j=1,iy)
write(44)((h700(i,j,1994),i=1,ix),j=1,iy)
write(44)((h700(i,j,1995),i=1,ix),j=1,iy)
write(44)((h700(i,j,1996),i=1,ix),j=1,iy)
write(44)((h700(i,j,1997),i=1,ix),j=1,iy)
write(44)((h700(i,j,1998),i=1,ix),j=1,iy)
write(44)((h700(i,j,1999),i=1,ix),j=1,iy)
write(44)((h700(i,j,2000),i=1,ix),j=1,iy)
write(44)((h700(i,j,2001),i=1,ix),j=1,iy)
write(44)((h700(i,j,2004),i=1,ix),j=1,iy)
write(44)((h700(i,j,2005),i=1,ix),j=1,iy)
write(44)((h700(i,j,2007),i=1,ix),j=1,iy)
write(44)((h700(i,j,2008),i=1,ix),j=1,iy)
write(44)((h700(i,j,2010),i=1,ix),j=1,iy)
write(44)((h700(i,j,2012),i=1,ix),j=1,iy)
write(44)((h700(i,j,2013),i=1,ix),j=1,iy)
write(44)((h700(i,j,2014),i=1,ix),j=1,iy)



end
这个程序2013会出来bin文件，换成2015为什么出不来，运行时都没错，2015就是出不来，什么原因呢，谢谢各位了

四叶草

出不来是什么意思？没有生成这个文件？文件没有写入数据？

捌布

四叶草 发表于 2016-7-19 10:00
出不来是什么意思？没有生成这个文件？文件没有写入数据？

没有生成bin文件，运行也没错，2015年生不成bin文件

捌布

四叶草 发表于 2016-7-19 10:00
出不来是什么意思？没有生成这个文件？文件没有写入数据？

运行完2015年，下面显示的是：Loaded symbols for 'E:\我\grads\intera~1\choose~1.exe'
The program 'E:\我\grads\interanual\choose_year_stronger.exe' has exited with code 1 (0x1).
运行2013年的时候：Loaded symbols for 'E:\我\grads\intera~1\choose~1.exe'
The program 'E:\我\grads\interanual\choose_year_stronger.exe' has exited with code 0 (0x0).

四叶草

捌布 发表于 2016-7-19 10:51
运行完2015年，下面显示的是：Loaded symbols for 'E:\我\grads\intera~1\choose~1.exe'
The program 'E ...

bin这个文件肯定要有生成才对。显示的信息搞不懂是什么意思。另外，你的程序为什么只有open，没有close？我也凌乱啦

捌布

四叶草 发表于 2016-7-19 11:08
bin这个文件肯定要有生成才对。显示的信息搞不懂是什么意思。另外，你的程序为什么只有open，没有close？ ...

我也是乱，不过还是谢谢啦

风之精灵

程序声明部分你定义的h700(ix,iy,1979:2013)不是已经决定了 h700数组的大小是2013*iy*ix了吗
在读取数据环节，你也只是给它最多赋值到2013年，最后你输出数据时却要求它输出2014(及其以后)的年份数据，可能吗

捌布

风之精灵 发表于 2016-7-19 11:51
程序声明部分你定义的h700(ix,iy,1979:2013)不是已经决定了 h700数组的大小是2013*iy*ix了吗
在读取数据环 ...

不是的，我运行的时候把2013改成2015运行的，不行。但是换成小于2013的都可以运行，不知道为什么

风之精灵

会不会是数组越界了？