一般是别人的代码有问题,或者你的用法不正确。 (不要轻易怀疑编译器有问题) |
你定义都是正的,还是可能会越界的。 比如 real :: IRLOC(300) integer :: i i = -570 write(*,*) IRLOC(i) |
数组越界。 |
QQ图片20181112095404.gif (29.33 KB, 下载次数: 311)
捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )
GMT+8, 2025-4-20 06:08