Separate HTML for Basic Foil 47 Advanced Mapping Directives -- Allocatable arrays and pointers

Basic HTML version of Foils prepared 17 Sept 1996

Foil 47 Advanced Mapping Directives -- Allocatable arrays and pointers

From New CPS615HPF and Fortran90 Discussion Sept 17 96 Basic Simulation Track for Computational Science CPS615 -- Fall Semester 96. by Geoffrey C. Fox, Tom Haupt

SUBROUTINE SUB(N,M)
REAL, ALLOCATABLE, DIMENSION(:) :: A,B
REAL, POINTER :: P(:)

!HPF$ PROCESSORS Q(64)

!HPF$ ALIGN B(I) WITH A(I+N)

!HPF$ DISTRIBUTE A(BLOCK(M))

!HPF$ DISTRIBUTE(BLOCK), DYNAMIC :: P

...
ALLOCATE(A(128))
ALLOCATE(B(64))
ALLOCATE(P(1024))
...

!HPF$ REDISTRIBUTE P(CYCLIC)

...
RETURN
END