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(:)
1
!HPF$ PROCESSORS Q(64)
2
!HPF$ ALIGN B(I) WITH A(I+N)
3
!HPF$ DISTRIBUTE A(BLOCK(M))
4
!HPF$ DISTRIBUTE(BLOCK), DYNAMIC :: P
...
ALLOCATE(A(128))
ALLOCATE(B(64))
ALLOCATE(P(1024))
...
5
!HPF$ REDISTRIBUTE P(CYCLIC)
...
RETURN
END
in Table To:
©
on Tue Oct 7 1997
