pen-mpi.org [mailto:users-boun...@open-mpi.org] On
Behalf Of Reuti
Sent: Thursday, April 04, 2013 7:13 AM
To: Open MPI Users
Subject: Re: [OMPI users] Confused on simple MPI/OpenMP program
Hi,
Am 04.04.2013 um 04:35 schrieb Ed Blosch:
> Consider this Fortran program snippet:
>
> p
Hi,
Am 04.04.2013 um 04:35 schrieb Ed Blosch:
> Consider this Fortran program snippet:
>
> program test
use omp_lib
include 'mpif.h'
might be missing.
> ! everybody except rank=0 exits.
> call mpi_init(ierr)
> call mpi_comm_rank(MPI_COMM_WORLD,irank,ierr)
> if (irank /= 0) then
>call
Consider this Fortran program snippet:
program test
! everybody except rank=0 exits.
call mpi_init(ierr)
call mpi_comm_rank(MPI_COMM_WORLD,irank,ierr)
if (irank /= 0) then
call mpi_finalize(ierr)
stop
endif
! rank 0 tries to set number of OpenMP threads to 4
call omp_set_nu