NAME

shmem_init, start_pes - Allocates a block of memory from the symmetric heap.

SYNOPSIS

C or C++:

void shmem_init(void);
void start_pes(int npes);

Fortran:

CALL SHMEM_INIT()
CALL START_PES(npes)

DESCRIPTION

The start_pes routine should be the first statement in a SHMEM parallel program.

The start_pes routine accepts the following argument:

npes

Unused. Should be set to 0.

This routine initializes the SHMEM API, therefore it must be called before calling any other SHMEM routine. This routine is responsible inter alia for setting up the symmetric heap on the calling PE, and the creation of the virtual PE numbers. Upon successful return from this routine, the calling PE will be able to communicate with and transfer data to other PEs.

Multiple calls to this function are not allowed.

For an overview of programming with SHMEM communication routines, example SHMEM programs, and instructions for compiling SHMEM programs, see the intro_shmem(3) man page.

EXAMPLES

This is a simple program that calls shmem_integer_put(3):

PROGRAM PUT


  INCLUDE "mpp/shmem.fh"


  INTEGER TARG, SRC, RECEIVER, BAR


  COMMON /T/ TARG


  PARAMETER (RECEIVER=1)


  CALL SHMEM_INIT()


  IF (MY_PE() .EQ. 0) THEN


    SRC = 33


    CALL SHMEM_INTEGER_PUT(TARG, SRC, 1, RECEIVER)


  ENDIF


  CALL SHMEM_BARRIER_ALL ! SYNCHRONIZES SENDER AND RECEIVER


  IF (MY_PE() .EQ. RECEIVER) THEN


    PRINT *,'PE ', MY_PE(),' TARG=',TARG,' (expect 33)'


  ENDIF
END

NOTES

If the start_pes call is not the first statement in a program, unexpected results may occur on some architectures.

SEE ALSO

intro_shmem(3), shmem_barrier(3), shmem_barrier_all(3), shmem_put(3), my_pe(3I), shmem_n_pes(3I)