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

Question

在我的应用程序中，我的代码中有以下内容。我正在使用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 运行。重新创建这个问题很困难，我正在寻求建议或提示，如果以前有任何方法可能遇到过这样的问题。这可能是什么？因为很明显我在第二维上明确分配了 6 个元素，我不明白为什么 gfortran 突然切换到基于 0 的索引

标签： fortranmpigfortranopenmpi