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

hbzhang

把虚拟内存设大些就应该没问题了
缺省是1M

liangbingche

谢谢，我的机器太滥！我将程序的垂向层数减小了，现在可以对付着运算。

tonggang

兄弟運用的版本如何