デフォルトのコミュニケーターの名前は MPI_COMM_WORLD です。プログラムで mpicomm にしたい。コミュニケーターを希望の名前に設定するにはどうすればよいですか?
私のプログラムは既にこの変数名 'mpicomm' を使用して動作していることに注意してください。MPI_COMM_WORLD の値は 0 で、プログラムを実行すると 'mpicomm' になると思います。しかし、まぐれのためにこれが機能することを望んでいません。
例えば：
program main
use mpi
implicit none
integer :: mpierr, mpicomm, rank
call MPI_Init(mpierr)
call MPI_Comm_rank(mpicomm,rank,mpierr)
call MPI_Finalize(mpierr)
end program main
これは機能し、ランクは正しい値になります。ただし、MPI_COMM_WORLD がたまたまゼロ以外の値である場合、これは機能しないと思います。