fortran 调试

liangbingche

各位兄弟姐妹，我用134*134大小数组时
当我调试model时出现了如下错误信息：
warning LNK4084: total image size 439930880 exceeds max (268435456); image may not run
但是，当我用97*49大小数组时并没有出现这种情况
原因为何？
内存：128M
还有一个问题不知是不是遇上一个问题同一原因。我打算将2进制文件转化成ascii文件，该文件是载有134*134个调和常数
我遇到的错误信息是：input record too long
这个子程序我也附在下面：
      PARAMETER (ny = 134,nx=134)
      PARAMETER (mxy = 41000)
      PARAMETER (mw = 4)
      COMMON /PARA/ w(mw), f(mw), uu(mw), vv(mw)
      CHARACTER*2 fhead(mw)
      DIMENSION Zamp(mxy), Zpha(mxy)
      DIMENSION Uamp(mxy), Upha(mxy)
      DIMENSION Vamp(mxy), Vpha(mxy)
      CHARACTER*20 FileName, FileType*3,filename1, FileTypee*3
      data filetype/'ykg'/
      DATA fhead / 'M2', 'S2', 'K1', 'O1' /
data filetypee/'dat'/
      DATA rad / 0.017453293 /
      nw = 4
      ierr = 10
      DO k = 1, 4
        FileName = fhead(k) // '.' // FileType
        FileName1 = fhead(k) // '.' // FileTypee
       PRINT *, FileName8
        OPEN (1, FILE =filename, STATUS = 'OLD',form= 'UNFORMATTED')
        OPEN (2, FILE = filenamee, STATUS = 'new')
        CALL ReadFile (Zamp, Zpha, nx, ny)
        CALL ReadFile (Uamp, Upha, nx, ny)
        CALL ReadFile (Vamp, Vpha, nx, ny)
       write(2,11) (uamp(j),j=1,134*134)
11    format(134f9.3)
      ENDDO
      ierr = 0

      END
      SUBROUTINE ReadFile (amp, pha, nx, ny)
      DIMENSION amp(nx*ny), pha(nx*ny)
      DATA rad / 0.017453293 /
      READ (1) amp
      READ (1) pha
      DO i = 1, nx * ny
        pha(i) = rad * pha(i)
      ENDDO
      RETURN
      END

iceArcher

windows下的fortran编译器最多支持256兆内存。你开的数组太大了。不过，好像也只是警告罢了，还是可以跑的。如果用linux/unix的编译器，就不会有问题。
第二个问题，我想，如果程序没错（不好意思，没看完），就是文件有问题。

liangbingche

谢谢icearcher，我机器的内存太小，跑不了。不过我将垂向层数间小一半就可以了，不过这样办有点欠妥。第二个问题，我将程序用一个脚本的方法解决了。在此，谢谢各位的相助