9. template_fix construct

The template_fix construct defines the size and distribution of an unfixed template. It is also used when a distributed array is allocated at runtime.

• XMP/C program

#pragma xmp nodes p[4]
#pragma xmp template t[:]
#pragma xmp distribute t[block] onto p
double *a;
#pragma xmp align a[i] with t[i]

int n = 100;
#pragma xmp template_fix t[n]
a = xmp_malloc(xmp_desc_of(a), n);

• XMP/Fortran program

!$xmp nodes p(4)
!$xmp template t(:)
!$xmp distribute t(block) onto p
real, allocatable :: a(:)
integer :: n
!$xmp align a(i) with t(i)

n = 100
!$xmp template_fix t(n)
allocate(a(n))

First, declare a template the size of which is undefined using the ”:” notation. Second, align a pointer in XMP/C and an allocatable array in XMP/Fortran with the template. Third, fix the size of the template with a template_fix construct. Finally, allocate the array with the xmp_malloc() builtin function in XMP/C and the allocate statement in XMP/Fortran.

Note

template_fix constructs can be applied to a template only once.

The template_fix construct can also be used to define a mapping array of a template that is distributed in “gblock(*)” at declaration.

• XMP/C program

#pragma xmp nodes p[4]
#pragma xmp template t[:]
#pragma xmp distribute t[gblock(*)] onto p
double *a;
#pragma xmp align a[i] with t[i]

int n = 100;
int m[] = {40,30,20,10};

#pragma xmp template_fix[gblock(m)] t[n]
a = xmp_malloc(xmp_desc_of(a), n);

• XMP/Fortran program

!$xmp nodes p(4)
!$xmp template t(:)
!$xmp distribute t(gblock) onto p
real, allocatable :: a(:)
integer :: n, m(4)
!$xmp align a(i) with t(i)

n = 100
m(:) = (/40,30,20,10/)
!$xmp template_fix(gblock(m)) t(n)
allocate(a(n))