1INTROF(2) LAM FORTRAN LIBRARY INTROF(2)
2
3
4
6 INTROF - introduction to LAM Fortran programming routines
7
9 Name Appears Description
10 on Page
11
12 *FTTIME FTTIME.3 Get timer value in seconds.
13 #F4LTOT TTOL.3 Convert REAL*4 (local to LAM).
14 #F4MLTT TTOL.3 Convert REAL*4 array (local to LAM).
15 #F4MTTL TTOL.3 Convert REAL*4 array (LAM to local).
16 #F4TTOL TTOL.3 Convert REAL*4 (LAM to local).
17 #F8LTOT TTOL.3 Convert REAL*8 (local to LAM).
18 #F8MLTT TTOL.3 Convert REAL*8 array (local to LAM).
19 #F8MTTL TTOL.3 Convert REAL*8 array (LAM to local).
20 #F8TTOL TTOL.3 Convert REAL*8 (LAM to local).
21 #GALL GNODES.3 Get all nodeids.
22 #GCASTS GNODES.3 Get all castids.
23 #GCOMPS GNODES.3 Get all compute nodeids.
24 #GJONES GNODES.3 Get all neighbouring nodeids.
25 #GNODES GNODES.3 Get array of type matching nodeids.
26 #GOTBS GNODES.3 Get all OTB nodeids.
27 *IGNALL IGNTP.2 Get total number of nodes.
28 *IGNCMP IGNTP.2 Get number of compute nodes.
29 *IGNDID IGNTP.2 Get local node ID.
30 *IGNDTP IGNTP.2 Get local node type.
31 *IGNJON IGNTP.2 Get number of neighbouring nodes.
32 *IGNOTB IGNTP.2 Get number of OTB nodes.
33 *IGNTP IGNTP.2 Get number of type matching nodes.
34 *IGORGN IGNTP.2 Get origin node ID.
35 *IGRTP IGNTP.2 Get remote node type.
36 #I2LTOT TTOL.3 Convert INTEGER*2 (local to LAM).
37 #I2MLTT TTOL.3 Convert INTEGER*2 array (local to LAM).
38 #I2MTTL TTOL.3 Convert INTEGER*2 array (LAM to local).
39 #I2TTOL TTOL.3 Convert INTEGER*2 (LAM to local).
40 #I4LTOT TTOL.3 Convert INTEGER*4 (local to LAM).
41 #I4MLTT TTOL.3 Convert INTEGER*4 array (local to LAM).
42 #I4MTTL TTOL.3 Convert INTEGER*4 array (LAM to local).
43 #I4TTOL TTOL.3 Convert INTEGER*4 (LAM to local).
44 #KENTR KENTR.2 Register self process.
45 #KXIT KXIT.2 Terminate self with cleanup.
46 #NPROB NPROB.2 Probe receivable messages.
47 #NRCV NSND.2 Receive network message.
48 #NSND NSND.2 Send network message.
49 #PRCV PSND.2 Receive message (physical layer).
50 #PRCVC PSND.2 Close receiver physical channel.
51 #PRCVO PSND.2 Open receiver physical channel.
52 #PSND PSND.2 Send message (physical layer).
53 #PSNDC PSND.2 Close sender physical channel.
54 #PSNDO PSND.2 Open sender physical channel.
55 #RPLDGO RPLDGO.2 Load and run a program on a node.
56 #RPWT RPWT.2 Wait for a child process to exit.
57 #lamf_rfclose lamf_rfopen.2 Close file.
58 #lamf_rfopen lamf_rfopen.2 Open file.
59 #lamf_rfread lamf_rfread.2 Read file.
60 #TRCV TSND.2 Receive message (transport layer).
61 #TRROR TRROR.3 Print most recent error message.
62 #TSND TSND.2 Send message (transport layer).
63 #lamf_rfwrite lamf_rfread.2 Write file.
64 #MPI_SPAWN MPI_Spawn.2 Create processes.
65
66 LAM/MPI Extensions
67
68 Name Appears Description
69 on Page
70
71 #MPIL_COMM_GPS MPIL_Comm_id.2 Get LAM coordinates for MPI process.
72 #MPIL_COMM_ID MPIL_Comm_id.2 Get communicator ID.
73 #MPIL_COMM_PARENT MPIL_Spawn.2 Get parent intercommunicator.
74 #MPIL_SIGNAL MPIL_Signal.2 Deliver a signal.
75 #MPIL_SPAWN MPIL_Spawn.2 Create processes.
76 #MPIL_TRACE_ON MPIL_Trace_on.2 Enable trace collection.
77 #MPIL_TRACE_OFF MPIL_Trace_on.2 Disable trace collection.
78 #MPIL_TYPE_ID MPIL_Comm_id.2 Get datatype ID.
79 #MPIL_UNIVERSE_SIZE MPIL_Spawn.2 Get number of nodes.
80
82 All names marked by a "#" are subroutine calls and have as their last
83 parameter ierror which returns the error code in case of an unsuccess‐
84 ful call. It is therefore recommended to check for the value of ierror
85 immediately after subroutine calls. All names marked by a "*" are
86 function calls and return some useful value other than ierror.
87
88 Simple rules for creating FORTRAN subroutine/function names from C
89 functions are listed below.
90
91 Mappings from substrings in C functions onto shorter substrings or sin‐
92 gle letters in FORTRAN wrappers:
93
94 C --> FORTRAN
95 TRY T
96 GET G
97 NODE ND
98 TYPE TP
99
100 All functions that return an integer or short integer are prefixed with
101 the letter "I". All functions that return a single precision or double
102 precision floating point value are prefixed with the letter "F". This
103 is to minimize the necessity of declaring functions. However functions
104 that return a short integer or a double precision floating point number
105 still have to be declared.
106
107 If after applying the above two rules, the FORTRAN name still exceeds
108 six characters in length, it is compressed to six by dropping the least
109 essential vowels.
110
111
112
113LAM 7.1.2 March, 2006 INTROF(2)