HTML version of Scripted Foils prepared 11 November 1996

Foil 4 Fortran example:Blocking Receive MPI_RECV

From CPS615-Completion of MPI foilset and Application to Jacobi Iteration in 2D Delivered Lectures of CPS615 Basic Simulation Track for Computational Science -- 7 November 96. by Geoffrey C. Fox *
Secs 171.3
1 integer status(MPI_STATUS_SIZE) An array to store status
2 integer mpierr, count, datatype, source, tag, comm
3 integer recvbuf(100)
4 count=100
5 datatype=MPI_REAL
6 comm=MPI_COMM_WORLD
7 source=MPI_ANY_SOURCE accept any source processor
8 tag=MPI_ANY_TAG accept anmy message tag
9 call MPI_RECV (recvbuf,count,datatype,source,tag,comm,status,mpierr)
10 Note source and tag can be wild-carded

Table Font Size


© 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 Fri Aug 15 1997