Fabrice,

i do not fully understand the root cause of this error, and you might want to ask Intel folks to comment on that.

that being said, and since this compiler does support fortran 2008, i strongly encourage you to
use mpi_f08
instead of
use mpi

a happy feature/side effect is that your program compiles and runs just fine if you use mpi_f08 module (!)

Cheers,

Gilles


On 9/24/2015 1:00 AM, Fabrice Roy wrote:
program testmpi
    use mpi
    implicit none

    integer :: pid
    integer :: ierr
    integer :: tok

    call mpi_init(ierr)
    call mpi_comm_rank(mpi_comm_world, pid,ierr)
    if(pid==0) then
       tok = 1
    else
       tok = 0
    end if
    call mpi_bcast(tok,1,mpi_integer,0,mpi_comm_world,ierr)
    call mpi_finalize(ierr)
end program testmpi

Reply via email to