Basic HTML version of Foils prepared
17 Sept 1996
Foil 44 Example of Distribute Directive with Complex Alignment
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
REAL, DIMENSION(12,16) :: A
REAL, DIMENSION(8,10) :: B
1
CHPF$ PROCESSORS Q(4)
2
CHPF$ TEMPLATE FRED(16,16)
3
CHPF$ ALIGN A(:,:) WITH FRED(:,:)
4
CHPF$ ALIGN B(I,J) WITH FRED(I+2,J+2)
5
CHPF$ DISTRIBUTE FRED(BLOCK,*)
in Table To:
©
on Tue Oct 7 1997