求助 fortran子函数传值大小超过2200执行报错

yhntgb

program main
INTEGER(8)::N1=10000,M1=50
!EXTERNAL BBBB
!BBBB(N1,M1)
CALL CCCC(N1,M1)
STOP
end program main

SUBROUTINE CCCC(N,M)
INTEGER(8) N,M
!REAL,DIMENSION(:,:),ALLOCATABLE F
!ALLOCATE(F(N,M))
DIMENSION F(N,M)
RETURN
END

!FUNCTION BBBB(N,M)
!INTEGER(8) N,M
!END



将N1改为2200可以正常运行N1是从文件读出来的必须要用变量 F要根据N读取文件的值后面涉及到大量的程序 此处为简化版
查阅各种资料不知道是什么问题

yhntgb

这个是N1值为10000时的报错截图 2200以内可以正常运行

topmad

栈溢出了
这个程序  我在linux下运行成功 应该是你编译器的问题

yhntgb

topmad 发表于 2020-7-10 16:32
栈溢出了
这个程序  我在linux下运行成功 应该是你编译器的问题

感谢大神 提供了新思路 已经使用linux系统的机制解决该问题