DOKK / manpages / debian 12 / openmpi-doc / shmem_short_iput.openmpi.3.en
SHMEM_IPUT(3) Open MPI SHMEM_IPUT(3)

shmem_complex_iput(3), shmem_double_iput(3), shmem_float_iput(3), shmem_int_iput(3), shmem_integer_iput(3), shmem_iput4(3), shmem_iput8(3), shmem_iput32(3), shmem_iput64(3), shmem_iput128(3), shmem_logical_iput(3), shmem_long_iput(3), shmem_longdouble_iput(3), shmem_longlong_iput(3), shmem_real_iput(3), shmem_short_iput(3) - Transfer strided data to a specified processing element (PE).

C or C++:

#include <mpp/shmem.h>
void shmem_double_iput(double *target, const double *source,


  ptrdiff_t tst, ptrdiff_t sst, size_t len, int pe);
void shmem_float_iput(float *target, const float *source,


  ptrdiff_t tst, ptrdiff_t sst, size_t len, int pe);
void shmem_int_iput(int *target, const int *source,


  ptrdiff_t tst, ptrdiff_t sst, size_t len, int pe);
void shmem_iput32(void *target, const void *source,


  ptrdiff_t tst, ptrdiff_t sst, size_t len, int pe);
void shmem_iput64(void *target, const void *source,


  ptrdiff_t tst, ptrdiff_t sst, size_t len, int pe);
void shmem_iput128(void *target, const void *source,


  ptrdiff_t tst, ptrdiff_t sst, size_t len, int pe);
void shmem_long_iput(long *target, const long *source,


  ptrdiff_t tst, ptrdiff_t sst, size_t len, int pe);
void shmem_longdouble_iput(long double *target,


  const long double *source, ptrdiff_t tst, ptrdiff_t sst,


  size_t len, int pe);
void shmem_longlong_iput(long long *target,


  const long long *source, ptrdiff_t tst, ptrdiff_t sst,


  size_t len, int pe);
void shmem_short_iput(short *target, const short *source,


  ptrdiff_t tst, ptrdiff_t sst, size_t len, int pe);

Fortran:

INCLUDE "mpp/shmem.fh"
INTEGER tst, sst, len, pe
CALL SHMEM_COMPLEX_IPUT(target, source, tst, sst, len,
& pe)
CALL SHMEM_DOUBLE_IPUT(target, source, tst, sst, len,
& pe)
CALL SHMEM_INTEGER_IPUT(target, source, tst, sst, len,
& pe)
CALL SHMEM_IPUT4(target, source, tst, sst, len, pe)
CALL SHMEM_IPUT8(target, source, tst, sst, len, pe)
CALL SHMEM_IPUT32(target, source, tst, sst, len, pe)
CALL SHMEM_IPUT64(target, source, tst, sst, len, pe)
CALL SHMEM_IPUT128(target, source, tst, sst, len, pe)
CALL SHMEM_LOGICAL_IPUT(target, source, tst, sst, len,
& pe)
CALL SHMEM_REAL_IPUT(target, source, tst, sst, len, pe)

The shmem_iput routines read the elements of a local array (source) and write them to a remote array (target) on the PE indicated by pe. These routines return when the data has been copied out of the source array on the local PE but not necessarily before the data has been delivered to the remote data object.

The arguments are as follows:

Array to be updated on the remote PE. This data object must be remotely accessible.
Array containing the data to be copied.
The stride between consecutive elements of the target array. The stride is scaled by the element size of the target array. A value of 1 indicates contiguous data. tst must be of type integer. If you are using Fortran, it must be a default integer value.
The stride between consecutive elements of the source array. The stride is scaled by the element size of the source array. A value of 1 indicates contiguous data. sst must be of type integer. If you are using Fortran, it must be a default integer value.
Number of elements in the target and source arrays. len must be of type integer. If you are using Fortran, it must be a constant, variable, or array element of default integer type.
PE number of the remote PE. pe must be of type integer. If you are using Fortran, it must be a constant, variable, or array element of default integer type.

The target and source data objects must conform to typing constraints, which are as follows:

to 32 bits.
to 64 bits.

If you are using Fortran, data types must be of default size. For example, a real variable must be declared as REAL, REAL*4 or REAL(KIND=4).

See intro_shmem(3) for a definition of the term remotely accessible.

Consider the following simple shmem_long_iput example for C/C++ programs.

#include <mpp/shmem.h>
main()
{


  short source[10] = { 1, 2, 3, 4, 5,


  6, 7, 8, 9, 10 };


  static short target[10];


  shmem_init();


  if (shmem_my_pe() == 0) {


    /* put 10 words into target on PE 1 */


    shmem_short_iput(target, source, 1, 2, 5, 1);


  }


  shmem_barrier_all(); /* sync sender and receiver */


  if (shmem_my_pe() == 1) {


    shmem_udcflush(); /* not required on IRIX systems */


    printf("target on PE %d is %d %d %d %d %d0, shmem_my_pe(),


    (int)target[0], (int)target[1], (int)target[2],


    (int)target[3], (int)target[4] );


  }


  shmem_barrier_all(); /* sync before exiting */
}

intro_shmem(3), shmem_iget(3), shmem_put(3), shmem_quiet(3)

May 26, 2022 4.1.4