[comp.sys.transputer] A "General Purpose" harness for parallel Fortran on the Meiko

RJA@dlgm.daresbury.ac.UK ("R.J. ALLAN") (09/07/88)

Over the last year at Daresbury we felt the need for, inspired by several
million lines of existing Fortran application code developed over the
last 15 years, and developed an Occam harness program to facilitate fairly
general blocked communications between Fortran processes running on nodes
of the Meiko Computing Surface.
     Facilities provided in an I/O library which is called from the user's
sequential codes (split up into master and slaves) are:
CHECK check that a processor is ready to receive
WAIT  wait until a check message is received - to block
SEND  send message to a waiting processor
RECEVE receive message
READ  read from a host file or keyboard
WRITE write to a host file or screen
STOP  toggle activity for debugging purposes
DEBUG toggle debugging messages
STATS print out information about messages sent or pending
CPU   access T clock
SUPER access supervisor bus
+ others.....
     Access to the address of each node is provided so that messages
may be sent anywhere in the network, and constructs of the type
IF(INODE.EQ.PROCN)THEN.... are possible. Buffering of messages, and diagnostic
 
analysis is provided.
     I do not know os any othere harness which does as much as this. For 
further information and a FREE copy of the code (VAX or SUN host versions
are available) please contact the Sheffield National Transputer Centre
(Roger England) or myself - RJA @ UK.AC.DL.DLGM on JANET or
RJA AT UKACRL on BITNET.
     Robert J. Allan, Daresbury Laboratory, Advanced Research Computing
Group, Daresbury, Warrington, WA4 4AD, U.K.