Re: 用FORTRAN90最大可以开多大的数组？

作者：zhaozj
发表时间：2020-12-23 10:39
来源：未知

发信人: peach1 (烦恼), 信区: NumComp标题: Re: 用FORTRAN90最大可以开多大的数组？发信站: BBS 水木清华站 (Sun Aug 15 13:21:39 2004), 站内

这个程序可以检测你的机器本身能够开多大数组你看有没有用吧

Program Tarray implicit none integer::size,error=0 integer,parameter::one_mb=1024*1024 character,allocatable::a(:) write(*,*) size,error open(unit=9,file='result.txt',status='unknown')

do while(.true.) size=size+one_mb allocate(a(size),stat=error) if(error.ne.0)then exit end if write(9,"('allocate',I10,'byte')")size write(9,"(F10.2,'MB used')")real(size)/real(one_mb) write(9,"(F10.2,'MW used')") real(size)/(real(one_mb)*16.0) deallocate(a) end do stop 【在 hhsy (河海水妖) 的大作中提到: 】: 用FORTRAN90最大可以开多大的数组？我用1.5G内存的机子，一维单精度实型数组开到3.8亿个就开不下了。理论上讲应该是可以开到21亿左右的吧，就是2^32。有没有其它朋友在这方面有经验的？

※ 来源:·BBS 水木清华站 smth.org·[FROM: 166.111.26.*]