fortran 运行时错误中的预期索引范围为 0

问题描述

在我的应用程序中,我的代码中有以下内容。我在该特定例程中使用 mpi_f08 来使用函数 MPI_F_SYNC_REG 进行安全同步。似乎使用 mpi_f08 会触发问题。

 use mpi_f08,only: MPI_F_SYNC_REG
 do I = 1,noblocks
 ncell = geom(I)% ncell
 allocate(buf(ncell,6))
 call MPI_IBCAST(buf,root,ncell*6,request,mpi_comm_world,mopier)
 call mpi_wait(request,mpier)
 ptr = buf(:,6)
 deallocate(buf)
 enddo

使用 openmpi 和 gfortran 运行时,出现以下运行时错误

Fortran 运行时错误:数组“buf”的第 2 维索引“6” 超出预期范围 (0:5)

我正在使用 gcc 10.1.0 和 openmpi 4.1.0。重新创建这个问题很困难,我正在寻求建议或提示,如果之前有任何方式可能遇到过这样的问题。这可能是什么?因为很明显我在第 2 个维度上明确分配了 6 个元素,而且我不明白为什么 gfortran 突然切换到基于 0 的索引

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)