Basic HTML version of Foils prepared August 7 98

Foil 38 Example of HPF_LOCAL
EXTRINSIC(F77_LOCAL)

From DoD HPF Training -- 3. Parallel Constructs in HPF DoD Training and Others -- 1995-98. by Chuck Koelbel -- Rice University
HPF_LOCAL requires a Fortran 90 interface to the local subroutine with assumed-shape arrays
  • - Many libraries do not use assumed-shape arrays
  • - Thus was born the need for F77_LOCAL
On the caller (HPF) side:
  • EXTRINSIC(HPF_LOCAL) REAL FUNCTION foo(x)
  • REAL x(:)
  • !HPF$ DISTRIBUTE x(BLOCK)
On the callee side:
  • - Implicit interface (FORTRAN 77 doesn't have explicit interfaces)

© Northeast Parallel Architectures Center, Syracuse University, npac@npac.syr.edu

If you have any comments about this server, send e-mail to webmaster@npac.syr.edu.

Page produced by wwwfoil on Sun Aug 9 1998