
00001 !DIR$ ID "@(#)mpi/include/mpif.h 31.2 09/12/97 11:38:27" 00002 00003 ! Copyright (C) 1997, Silicon Graphics, Inc. 00004 ! All Rights Reserved 00005 ! 00006 ! Copyright Notice 00007 ! + 1993 University of Chicago 00008 ! + 1993 Mississippi State University 00009 00010 integer MPI_VERSION 00011 integer MPI_SUBVERSION 00012 00013 parameter (MPI_VERSION = 1) 00014 parameter (MPI_SUBVERSION = 2) 00015 00016 ! MPI_Status 00017 00018 integer MPI_SOURCE 00019 integer MPI_TAG 00020 integer MPI_ERROR 00021 integer MPI_STATUS_SIZE 00022 00023 parameter (MPI_SOURCE = 1) 00024 parameter (MPI_TAG = 2) 00025 parameter (MPI_ERROR = 3) 00026 parameter (MPI_STATUS_SIZE = 6) 00027 00028 ! MPI_Comm 00029 00030 integer MPI_COMM_NULL 00031 integer MPI_COMM_WORLD 00032 integer MPI_COMM_SELF 00033 00034 parameter (MPI_COMM_NULL = 0) 00035 parameter (MPI_COMM_WORLD = 1) 00036 parameter (MPI_COMM_SELF = 2) 00037 00038 ! MPI_Errhandler 00039 00040 integer MPI_ERRHANDLER_NULL 00041 integer MPI_ERRORS_ARE_FATAL 00042 integer MPI_ERRORS_RETURN 00043 00044 parameter (MPI_ERRHANDLER_NULL = 0) 00045 parameter (MPI_ERRORS_ARE_FATAL = 1) 00046 parameter (MPI_ERRORS_RETURN = 2) 00047 00048 ! MPI_Group 00049 00050 integer MPI_GROUP_NULL 00051 integer MPI_GROUP_EMPTY 00052 00053 parameter (MPI_GROUP_NULL = 0) 00054 parameter (MPI_GROUP_EMPTY = 1) 00055 00056 ! MPI_Request 00057 00058 integer MPI_REQUEST_NULL 00059 00060 parameter (MPI_REQUEST_NULL = 0) 00061 00062 ! MPI_Op 00063 00064 integer MPI_OP_NULL 00065 integer MPI_MAX 00066 integer MPI_MIN 00067 integer MPI_SUM 00068 integer MPI_PROD 00069 integer MPI_LAND 00070 integer MPI_BAND 00071 integer MPI_LOR 00072 integer MPI_BOR 00073 integer MPI_LXOR 00074 integer MPI_BXOR 00075 integer MPI_MAXLOC 00076 integer MPI_MINLOC 00077 00078 parameter (MPI_OP_NULL = 0) 00079 parameter (MPI_MAX = 1) 00080 parameter (MPI_MIN = 2) 00081 parameter (MPI_SUM = 3) 00082 parameter (MPI_PROD = 4) 00083 parameter (MPI_LAND = 5) 00084 parameter (MPI_BAND = 6) 00085 parameter (MPI_LOR = 7) 00086 parameter (MPI_BOR = 8) 00087 parameter (MPI_LXOR = 9) 00088 parameter (MPI_BXOR = 10) 00089 parameter (MPI_MAXLOC = 11) 00090 parameter (MPI_MINLOC = 12) 00091 00092 ! MPI_Datatype 00093 00094 integer MPI_DATATYPE_NULL 00095 00096 integer MPI_CHAR 00097 integer MPI_SHORT 00098 integer MPI_INT 00099 integer MPI_LONG 00100 integer MPI_UNSIGNED_CHAR 00101 integer MPI_UNSIGNED_SHORT 00102 integer MPI_UNSIGNED 00103 integer MPI_UNSIGNED_LONG 00104 integer MPI_FLOAT 00105 integer MPI_DOUBLE 00106 integer MPI_LONG_DOUBLE 00107 integer MPI_LONG_LONG 00108 integer MPI_LONG_LONG_INT 00109 00110 integer MPI_INTEGER 00111 integer MPI_REAL 00112 integer MPI_DOUBLE_PRECISION 00113 integer MPI_COMPLEX 00114 integer MPI_DOUBLE_COMPLEX 00115 integer MPI_LOGICAL 00116 integer MPI_CHARACTER 00117 integer MPI_INTEGER1 00118 integer MPI_INTEGER2 00119 integer MPI_INTEGER4 00120 integer MPI_INTEGER8 00121 integer MPI_REAL4 00122 integer MPI_REAL8 00123 integer MPI_REAL16 00124 00125 integer MPI_BYTE 00126 integer MPI_PACKED 00127 integer MPI_UB 00128 integer MPI_LB 00129 00130 integer MPI_FLOAT_INT 00131 integer MPI_DOUBLE_INT 00132 integer MPI_LONG_INT 00133 integer MPI_2INT 00134 integer MPI_SHORT_INT 00135 integer MPI_LONG_DOUBLE_INT 00136 00137 integer MPI_2REAL 00138 integer MPI_2DOUBLE_PRECISION 00139 integer MPI_2INTEGER 00140 00141 parameter (MPI_DATATYPE_NULL = 0) 00142 00143 parameter (MPI_CHAR = 1) 00144 parameter (MPI_SHORT = 2) 00145 parameter (MPI_INT = 3) 00146 parameter (MPI_LONG = 4) 00147 parameter (MPI_UNSIGNED_CHAR = 5) 00148 parameter (MPI_UNSIGNED_SHORT = 6) 00149 parameter (MPI_UNSIGNED = 7) 00150 parameter (MPI_UNSIGNED_LONG = 8) 00151 parameter (MPI_FLOAT = 9) 00152 parameter (MPI_DOUBLE = 10) 00153 parameter (MPI_LONG_DOUBLE = 11) 00154 parameter (MPI_LONG_LONG = 12) 00155 parameter (MPI_LONG_LONG_INT = 12) 00156 00157 parameter (MPI_INTEGER = 13) 00158 parameter (MPI_REAL = 14) 00159 parameter (MPI_DOUBLE_PRECISION = 15) 00160 parameter (MPI_COMPLEX = 16) 00161 parameter (MPI_DOUBLE_COMPLEX = 17) 00162 parameter (MPI_LOGICAL = 18) 00163 parameter (MPI_CHARACTER = 19) 00164 parameter (MPI_INTEGER1 = 20) 00165 parameter (MPI_INTEGER2 = 21) 00166 parameter (MPI_INTEGER4 = 22) 00167 parameter (MPI_INTEGER8 = 23) 00168 parameter (MPI_REAL4 = 24) 00169 parameter (MPI_REAL8 = 25) 00170 parameter (MPI_REAL16 = 26) 00171 00172 parameter (MPI_BYTE = 27) 00173 parameter (MPI_PACKED = 28) 00174 parameter (MPI_UB = 29) 00175 parameter (MPI_LB = 30) 00176 00177 parameter (MPI_FLOAT_INT = 31) 00178 parameter (MPI_DOUBLE_INT = 32) 00179 parameter (MPI_LONG_INT = 33) 00180 parameter (MPI_2INT = 34) 00181 parameter (MPI_SHORT_INT = 35) 00182 parameter (MPI_LONG_DOUBLE_INT = 36) 00183 00184 parameter (MPI_2REAL = 37) 00185 parameter (MPI_2DOUBLE_PRECISION= 38) 00186 parameter (MPI_2INTEGER = 39) 00187 00188 ! Error codes and classes 00189 00190 integer MPI_SUCCESS 00191 integer MPI_ERR_BUFFER 00192 integer MPI_ERR_COUNT 00193 integer MPI_ERR_TYPE 00194 integer MPI_ERR_TAG 00195 integer MPI_ERR_COMM 00196 integer MPI_ERR_RANK 00197 integer MPI_ERR_REQUEST 00198 integer MPI_ERR_ROOT 00199 integer MPI_ERR_GROUP 00200 integer MPI_ERR_OP 00201 integer MPI_ERR_TOPOLOGY 00202 integer MPI_ERR_DIMS 00203 integer MPI_ERR_ARG 00204 integer MPI_ERR_UNKNOWN 00205 integer MPI_ERR_TRUNCATE 00206 integer MPI_ERR_OTHER 00207 integer MPI_ERR_INTERN 00208 integer MPI_ERR_IN_STATUS 00209 integer MPI_ERR_PENDING 00210 integer MPI_ERR_LASTCODE 00211 00212 parameter (MPI_SUCCESS = 0) 00213 parameter (MPI_ERR_BUFFER = 1) 00214 parameter (MPI_ERR_COUNT = 2) 00215 parameter (MPI_ERR_TYPE = 3) 00216 parameter (MPI_ERR_TAG = 4) 00217 parameter (MPI_ERR_COMM = 5) 00218 parameter (MPI_ERR_RANK = 6) 00219 parameter (MPI_ERR_REQUEST = 7) 00220 parameter (MPI_ERR_ROOT = 8) 00221 parameter (MPI_ERR_GROUP = 9) 00222 parameter (MPI_ERR_OP = 10) 00223 parameter (MPI_ERR_TOPOLOGY = 11) 00224 parameter (MPI_ERR_DIMS = 12) 00225 parameter (MPI_ERR_ARG = 13) 00226 parameter (MPI_ERR_UNKNOWN = 14) 00227 parameter (MPI_ERR_TRUNCATE = 15) 00228 parameter (MPI_ERR_OTHER = 16) 00229 parameter (MPI_ERR_INTERN = 17) 00230 parameter (MPI_ERR_IN_STATUS = 18) 00231 parameter (MPI_ERR_PENDING = 19) 00232 parameter (MPI_ERR_LASTCODE = 31) 00233 00234 ! Permanent keyvals 00235 00236 integer MPI_KEYVAL_INVALID 00237 integer MPI_TAG_UB 00238 integer MPI_HOST 00239 integer MPI_IO 00240 integer MPI_WTIME_IS_GLOBAL 00241 00242 parameter (MPI_KEYVAL_INVALID = 0) 00243 parameter (MPI_TAG_UB = 5) 00244 parameter (MPI_HOST = 6) 00245 parameter (MPI_IO = 7) 00246 parameter (MPI_WTIME_IS_GLOBAL = 8) 00247 00248 ! Results of the compare operations 00249 00250 integer MPI_IDENT 00251 integer MPI_CONGRUENT 00252 integer MPI_SIMILAR 00253 integer MPI_UNEQUAL 00254 00255 parameter (MPI_IDENT = 0) 00256 parameter (MPI_CONGRUENT = 1) 00257 parameter (MPI_SIMILAR = 2) 00258 parameter (MPI_UNEQUAL = 3) 00259 00260 ! Topology types 00261 00262 integer MPI_GRAPH 00263 integer MPI_CART 00264 00265 parameter (MPI_GRAPH = 1) 00266 parameter (MPI_CART = 2) 00267 00268 ! Misc constants 00269 00270 integer MPI_MAX_PROCESSOR_NAME 00271 parameter (MPI_MAX_PROCESSOR_NAME = 256) 00272 00273 integer MPI_MAX_ERROR_STRING 00274 parameter (MPI_MAX_ERROR_STRING = 256) 00275 00276 integer MPI_BSEND_OVERHEAD 00277 parameter (MPI_BSEND_OVERHEAD = 32) 00278 00279 integer MPI_UNDEFINED 00280 parameter (MPI_UNDEFINED = -3) 00281 00282 integer MPI_ANY_SOURCE 00283 parameter (MPI_ANY_SOURCE = -2) 00284 00285 integer MPI_PROC_NULL 00286 parameter (MPI_PROC_NULL = -1) 00287 00288 integer MPI_ANY_TAG 00289 parameter (MPI_ANY_TAG = -1) 00290 00291 ! Misc Fortran declarations 00292 00293 integer MPI_BOTTOM 00294 pointer (MPI_BOTTOM_PTR, MPI_BOTTOM) 00295 data MPI_BOTTOM_PTR / 0 / 00296 00297 external MPI_NULL_COPY_FN, MPI_NULL_DELETE_FN, MPI_DUP_FN 00298 00299 double precision MPI_WTIME, MPI_WTICK 00300 external MPI_WTIME, MPI_WTICK 00301 00302 ! MPI-2 00303 00304 ! integer MPI_INFO_NULL 00305 ! parameter (MPI_INFO_NULL = 0) 00306 00307 integer MPI_FUNDAMENTAL 00308 parameter (MPI_FUNDAMENTAL = -1)
1.5.5