发信人: 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.*]
再分享一下我老师大神的人工智能教程吧。零基础!通俗易懂!风趣幽默!还带黄段子!希望你也加入到我们人工智能的队伍中来!https://blog.csdn.net/jiangjunshow