最近写了一个程序，里面用了一个大的三维数组p(8800,758,5000)，但是在运行时出现了这个错误insufficient virtual memory。我在网上查，说这个错误是虚拟内存不够，但是没找到解决方法，请大家指点？
program get_projection
implicit none
integer i,j,k
integer,allocatable::p(:,:,
allocate(p(8800,758,5000))
p=0
do i=1,8800
do j=1,758
do k=1,5000
if(i==j.and.j==k) then
p(i,j,k)=1
write(*,*)'test',p,i,j,k
endif
enddo
enddo
enddo
end |
回复此楼
+3/374
