fixed spurious error message inconsistent tign lfn in replay
[wrffire.git] / wrfv2_fire / arch / win_mpif.h
blob4b3ac9bee53868c4db905ec16403eb1de45791c9
1 ! /* -*- Mode: Fortran; -*- */
2 !
3 ! (C) 2001 by Argonne National Laboratory.
4 ! See COPYRIGHT in top-level directory.
5 !
6 ! DO NOT EDIT
7 ! This file created by buildiface
8 !
9 INTEGER MPI_SOURCE, MPI_TAG, MPI_ERROR
10 PARAMETER (MPI_SOURCE=3,MPI_TAG=4,MPI_ERROR=5)
11 INTEGER MPI_STATUS_SIZE
12 PARAMETER (MPI_STATUS_SIZE=5)
13 INTEGER MPI_STATUS_IGNORE(MPI_STATUS_SIZE)
14 INTEGER MPI_STATUSES_IGNORE(MPI_STATUS_SIZE,1)
15 INTEGER MPI_ERRCODES_IGNORE(1)
16 CHARACTER*1 MPI_ARGVS_NULL(1,1)
17 CHARACTER*1 MPI_ARGV_NULL(1)
18 INTEGER MPI_SUCCESS
19 PARAMETER (MPI_SUCCESS=0)
20 INTEGER MPI_ERR_IN_STATUS
21 PARAMETER (MPI_ERR_IN_STATUS=17)
22 INTEGER MPI_ERR_GROUP
23 PARAMETER (MPI_ERR_GROUP=8)
24 INTEGER MPI_ERR_COUNT
25 PARAMETER (MPI_ERR_COUNT=2)
26 INTEGER MPI_ERR_LOCKTYPE
27 PARAMETER (MPI_ERR_LOCKTYPE=47)
28 INTEGER MPI_ERR_BASE
29 PARAMETER (MPI_ERR_BASE=46)
30 INTEGER MPI_ERR_SIZE
31 PARAMETER (MPI_ERR_SIZE=51)
32 INTEGER MPI_ERR_FILE_EXISTS
33 PARAMETER (MPI_ERR_FILE_EXISTS=25)
34 INTEGER MPI_ERR_PORT
35 PARAMETER (MPI_ERR_PORT=38)
36 INTEGER MPI_ERR_ACCESS
37 PARAMETER (MPI_ERR_ACCESS=20)
38 INTEGER MPI_ERR_READ_ONLY
39 PARAMETER (MPI_ERR_READ_ONLY=40)
40 INTEGER MPI_ERR_INTERN
41 PARAMETER (MPI_ERR_INTERN=16)
42 INTEGER MPI_ERR_OP
43 PARAMETER (MPI_ERR_OP=9)
44 INTEGER MPI_ERR_INFO_KEY
45 PARAMETER (MPI_ERR_INFO_KEY=29)
46 INTEGER MPI_ERR_UNSUPPORTED_OPERATION
47 PARAMETER (MPI_ERR_UNSUPPORTED_OPERATION=44)
48 INTEGER MPI_ERR_ARG
49 PARAMETER (MPI_ERR_ARG=12)
50 INTEGER MPI_ERR_LASTCODE
51 PARAMETER (MPI_ERR_LASTCODE=1073741823)
52 INTEGER MPI_ERR_AMODE
53 PARAMETER (MPI_ERR_AMODE=21)
54 INTEGER MPI_ERR_ROOT
55 PARAMETER (MPI_ERR_ROOT=7)
56 INTEGER MPI_ERR_UNKNOWN
57 PARAMETER (MPI_ERR_UNKNOWN=13)
58 INTEGER MPI_ERR_FILE
59 PARAMETER (MPI_ERR_FILE=27)
60 INTEGER MPI_ERR_TAG
61 PARAMETER (MPI_ERR_TAG=4)
62 INTEGER MPI_ERR_CONVERSION
63 PARAMETER (MPI_ERR_CONVERSION=23)
64 INTEGER MPI_ERR_NOT_SAME
65 PARAMETER (MPI_ERR_NOT_SAME=35)
66 INTEGER MPI_ERR_NO_SPACE
67 PARAMETER (MPI_ERR_NO_SPACE=36)
68 INTEGER MPI_ERR_IO
69 PARAMETER (MPI_ERR_IO=32)
70 INTEGER MPI_ERR_DUP_DATAREP
71 PARAMETER (MPI_ERR_DUP_DATAREP=24)
72 INTEGER MPI_ERR_BAD_FILE
73 PARAMETER (MPI_ERR_BAD_FILE=22)
74 INTEGER MPI_ERR_FILE_IN_USE
75 PARAMETER (MPI_ERR_FILE_IN_USE=26)
76 INTEGER MPI_ERR_NAME
77 PARAMETER (MPI_ERR_NAME=33)
78 INTEGER MPI_ERR_TRUNCATE
79 PARAMETER (MPI_ERR_TRUNCATE=14)
80 INTEGER MPI_ERR_COMM
81 PARAMETER (MPI_ERR_COMM=5)
82 INTEGER MPI_ERR_RMA_SYNC
83 PARAMETER (MPI_ERR_RMA_SYNC=50)
84 INTEGER MPI_ERR_INFO_VALUE
85 PARAMETER (MPI_ERR_INFO_VALUE=30)
86 INTEGER MPI_ERR_SPAWN
87 PARAMETER (MPI_ERR_SPAWN=42)
88 INTEGER MPI_ERR_PENDING
89 PARAMETER (MPI_ERR_PENDING=18)
90 INTEGER MPI_ERR_WIN
91 PARAMETER (MPI_ERR_WIN=45)
92 INTEGER MPI_ERR_ASSERT
93 PARAMETER (MPI_ERR_ASSERT=53)
94 INTEGER MPI_ERR_NO_SUCH_FILE
95 PARAMETER (MPI_ERR_NO_SUCH_FILE=37)
96 INTEGER MPI_ERR_KEYVAL
97 PARAMETER (MPI_ERR_KEYVAL=48)
98 INTEGER MPI_ERR_INFO_NOKEY
99 PARAMETER (MPI_ERR_INFO_NOKEY=31)
100 INTEGER MPI_ERR_RANK
101 PARAMETER (MPI_ERR_RANK=6)
102 INTEGER MPI_ERR_NO_MEM
103 PARAMETER (MPI_ERR_NO_MEM=34)
104 INTEGER MPI_ERR_BUFFER
105 PARAMETER (MPI_ERR_BUFFER=1)
106 INTEGER MPI_ERR_DISP
107 PARAMETER (MPI_ERR_DISP=52)
108 INTEGER MPI_ERR_TYPE
109 PARAMETER (MPI_ERR_TYPE=3)
110 INTEGER MPI_ERR_INFO
111 PARAMETER (MPI_ERR_INFO=28)
112 INTEGER MPI_ERR_QUOTA
113 PARAMETER (MPI_ERR_QUOTA=39)
114 INTEGER MPI_ERR_RMA_CONFLICT
115 PARAMETER (MPI_ERR_RMA_CONFLICT=49)
116 INTEGER MPI_ERR_REQUEST
117 PARAMETER (MPI_ERR_REQUEST=19)
118 INTEGER MPI_ERR_OTHER
119 PARAMETER (MPI_ERR_OTHER=15)
120 INTEGER MPI_ERR_SERVICE
121 PARAMETER (MPI_ERR_SERVICE=41)
122 INTEGER MPI_ERR_UNSUPPORTED_DATAREP
123 PARAMETER (MPI_ERR_UNSUPPORTED_DATAREP=43)
124 INTEGER MPI_ERR_TOPOLOGY
125 PARAMETER (MPI_ERR_TOPOLOGY=10)
126 INTEGER MPI_ERR_DIMS
127 PARAMETER (MPI_ERR_DIMS=11)
128 INTEGER MPI_ERRORS_ARE_FATAL
129 PARAMETER (MPI_ERRORS_ARE_FATAL=1409286144)
130 INTEGER MPI_ERRORS_RETURN
131 PARAMETER (MPI_ERRORS_RETURN=1409286145)
132 INTEGER MPI_IDENT
133 PARAMETER (MPI_IDENT=0)
134 INTEGER MPI_CONGRUENT
135 PARAMETER (MPI_CONGRUENT=1)
136 INTEGER MPI_SIMILAR
137 PARAMETER (MPI_SIMILAR=2)
138 INTEGER MPI_UNEQUAL
139 PARAMETER (MPI_UNEQUAL=3)
140 INTEGER MPI_MAX
141 PARAMETER (MPI_MAX=1476395009)
142 INTEGER MPI_MIN
143 PARAMETER (MPI_MIN=1476395010)
144 INTEGER MPI_SUM
145 PARAMETER (MPI_SUM=1476395011)
146 INTEGER MPI_PROD
147 PARAMETER (MPI_PROD=1476395012)
148 INTEGER MPI_LAND
149 PARAMETER (MPI_LAND=1476395013)
150 INTEGER MPI_BAND
151 PARAMETER (MPI_BAND=1476395014)
152 INTEGER MPI_LOR
153 PARAMETER (MPI_LOR=1476395015)
154 INTEGER MPI_BOR
155 PARAMETER (MPI_BOR=1476395016)
156 INTEGER MPI_LXOR
157 PARAMETER (MPI_LXOR=1476395017)
158 INTEGER MPI_BXOR
159 PARAMETER (MPI_BXOR=1476395018)
160 INTEGER MPI_MINLOC
161 PARAMETER (MPI_MINLOC=1476395019)
162 INTEGER MPI_MAXLOC
163 PARAMETER (MPI_MAXLOC=1476395020)
164 INTEGER MPI_REPLACE
165 PARAMETER (MPI_REPLACE=1476395021)
166 INTEGER MPI_COMM_WORLD
167 PARAMETER (MPI_COMM_WORLD=1140850688)
168 INTEGER MPI_COMM_SELF
169 PARAMETER (MPI_COMM_SELF=1140850689)
170 INTEGER MPI_GROUP_EMPTY
171 PARAMETER (MPI_GROUP_EMPTY=1207959552)
172 INTEGER MPI_COMM_NULL
173 PARAMETER (MPI_COMM_NULL=67108864)
174 INTEGER MPI_WIN_NULL
175 PARAMETER (MPI_WIN_NULL=536870912)
176 INTEGER MPI_FILE_NULL
177 PARAMETER (MPI_FILE_NULL=0)
178 INTEGER MPI_GROUP_NULL
179 PARAMETER (MPI_GROUP_NULL=134217728)
180 INTEGER MPI_OP_NULL
181 PARAMETER (MPI_OP_NULL=402653184)
182 INTEGER MPI_DATATYPE_NULL
183 PARAMETER (MPI_DATATYPE_NULL=201326592)
184 INTEGER MPI_REQUEST_NULL
185 PARAMETER (MPI_REQUEST_NULL=738197504)
186 INTEGER MPI_ERRHANDLER_NULL
187 PARAMETER (MPI_ERRHANDLER_NULL=335544320)
188 INTEGER MPI_INFO_NULL
189 PARAMETER (MPI_INFO_NULL=469762048)
190 INTEGER MPI_TAG_UB
191 PARAMETER (MPI_TAG_UB=1681915906)
192 INTEGER MPI_HOST
193 PARAMETER (MPI_HOST=1681915908)
194 INTEGER MPI_IO
195 PARAMETER (MPI_IO=1681915910)
196 INTEGER MPI_WTIME_IS_GLOBAL
197 PARAMETER (MPI_WTIME_IS_GLOBAL=1681915912)
198 INTEGER MPI_UNIVERSE_SIZE
199 PARAMETER (MPI_UNIVERSE_SIZE=1681915914)
200 INTEGER MPI_LASTUSEDCODE
201 PARAMETER (MPI_LASTUSEDCODE=1681915916)
202 INTEGER MPI_APPNUM
203 PARAMETER (MPI_APPNUM=1681915918)
204 INTEGER MPI_WIN_BASE
205 PARAMETER (MPI_WIN_BASE=1711276034)
206 INTEGER MPI_WIN_SIZE
207 PARAMETER (MPI_WIN_SIZE=1711276036)
208 INTEGER MPI_WIN_DISP_UNIT
209 PARAMETER (MPI_WIN_DISP_UNIT=1711276038)
210 INTEGER MPI_MAX_ERROR_STRING
211 PARAMETER (MPI_MAX_ERROR_STRING=511)
212 INTEGER MPI_MAX_NAME_STRING
213 PARAMETER (MPI_MAX_NAME_STRING=62)
214 INTEGER MPI_MAX_PORT_NAME
215 PARAMETER (MPI_MAX_PORT_NAME=255)
216 INTEGER MPI_MAX_OBJECT_NAME
217 PARAMETER (MPI_MAX_OBJECT_NAME=127)
218 INTEGER MPI_MAX_INFO_KEY
219 PARAMETER (MPI_MAX_INFO_KEY=254)
220 INTEGER MPI_MAX_INFO_VAL
221 PARAMETER (MPI_MAX_INFO_VAL=1023)
222 INTEGER MPI_MAX_PROCESSOR_NAME
223 PARAMETER (MPI_MAX_PROCESSOR_NAME=128-1)
224 INTEGER MPI_MAX_DATAREP_STRING
225 PARAMETER (MPI_MAX_DATAREP_STRING=127)
226 INTEGER MPI_UNDEFINED, MPI_UNDEFINED_RANK
227 PARAMETER (MPI_UNDEFINED=(-32766))
228 PARAMETER (MPI_UNDEFINED_RANK=(-32766))
229 INTEGER MPI_KEYVAL_INVALID
230 PARAMETER (MPI_KEYVAL_INVALID=603979776)
231 INTEGER MPI_BSEND_OVERHEAD
232 PARAMETER (MPI_BSEND_OVERHEAD=(95))
233 INTEGER MPI_PROC_NULL
234 PARAMETER (MPI_PROC_NULL=-1)
235 INTEGER MPI_ANY_SOURCE
236 PARAMETER (MPI_ANY_SOURCE=-2)
237 INTEGER MPI_ANY_TAG
238 PARAMETER (MPI_ANY_TAG=-1)
239 INTEGER MPI_ROOT
240 PARAMETER (MPI_ROOT=-3)
241 INTEGER MPI_GRAPH
242 PARAMETER (MPI_GRAPH=1)
243 INTEGER MPI_CART
244 PARAMETER (MPI_CART=2)
245 INTEGER MPI_VERSION
246 PARAMETER (MPI_VERSION=2)
247 INTEGER MPI_SUBVERSION
248 PARAMETER (MPI_SUBVERSION=0)
249 INTEGER MPI_LOCK_EXCLUSIVE
250 PARAMETER (MPI_LOCK_EXCLUSIVE=234)
251 INTEGER MPI_LOCK_SHARED
252 PARAMETER (MPI_LOCK_SHARED=235)
253 INTEGER MPI_COMPLEX
254 PARAMETER (MPI_COMPLEX=1275070494)
255 INTEGER MPI_DOUBLE_COMPLEX
256 PARAMETER (MPI_DOUBLE_COMPLEX=1275072546)
257 INTEGER MPI_LOGICAL
258 PARAMETER (MPI_LOGICAL=1275069469)
259 INTEGER MPI_REAL
260 PARAMETER (MPI_REAL=1275069468)
261 INTEGER MPI_DOUBLE_PRECISION
262 PARAMETER (MPI_DOUBLE_PRECISION=1275070495)
263 INTEGER MPI_INTEGER
264 PARAMETER (MPI_INTEGER=1275069467)
265 INTEGER MPI_2INTEGER
266 PARAMETER (MPI_2INTEGER=1275070496)
267 INTEGER MPI_2COMPLEX
268 PARAMETER (MPI_2COMPLEX=1275072548)
269 INTEGER MPI_2DOUBLE_PRECISION
270 PARAMETER (MPI_2DOUBLE_PRECISION=1275072547)
271 INTEGER MPI_2REAL
272 PARAMETER (MPI_2REAL=1275070497)
273 INTEGER MPI_2DOUBLE_COMPLEX
274 PARAMETER (MPI_2DOUBLE_COMPLEX=1275076645)
275 INTEGER MPI_CHARACTER
276 PARAMETER (MPI_CHARACTER=1275068698)
277 INTEGER MPI_BYTE
278 PARAMETER (MPI_BYTE=1275068685)
279 INTEGER MPI_UB
280 PARAMETER (MPI_UB=1275068433)
281 INTEGER MPI_LB
282 PARAMETER (MPI_LB=1275068432)
283 INTEGER MPI_PACKED
284 PARAMETER (MPI_PACKED=1275068687)
285 INTEGER MPI_INTEGER1
286 PARAMETER (MPI_INTEGER1=1275068717)
287 INTEGER MPI_INTEGER2
288 PARAMETER (MPI_INTEGER2=1275068975)
289 INTEGER MPI_INTEGER4
290 PARAMETER (MPI_INTEGER4=1275069488)
291 INTEGER MPI_INTEGER8
292 PARAMETER (MPI_INTEGER8=1275070513)
293 INTEGER MPI_INTEGER16
294 PARAMETER (MPI_INTEGER16=1275072562)
295 INTEGER MPI_REAL4
296 PARAMETER (MPI_REAL4=1275069479)
297 INTEGER MPI_REAL8
298 PARAMETER (MPI_REAL8=1275070505)
299 INTEGER MPI_REAL16
300 PARAMETER (MPI_REAL16=1275072555)
301 INTEGER MPI_COMPLEX8
302 PARAMETER (MPI_COMPLEX8=1275070504)
303 INTEGER MPI_COMPLEX16
304 PARAMETER (MPI_COMPLEX16=1275072554)
305 INTEGER MPI_COMPLEX32
306 PARAMETER (MPI_COMPLEX32=1275076652)
307 INTEGER MPI_ADDRESS_KIND
308 !DEC$ IF DEFINED (_WIN64)
309 PARAMETER (MPI_ADDRESS_KIND=8)
310 !DEC$ ELSE
311 !DEC$ ENDIF
312 INTEGER MPI_OFFSET_KIND
313 PARAMETER (MPI_OFFSET_KIND=8)
314 INTEGER MPI_COMBINER_NAMED
315 PARAMETER (MPI_COMBINER_NAMED=1)
316 INTEGER MPI_COMBINER_DUP
317 PARAMETER (MPI_COMBINER_DUP=2)
318 INTEGER MPI_COMBINER_CONTIGUOUS
319 PARAMETER (MPI_COMBINER_CONTIGUOUS=3)
320 INTEGER MPI_COMBINER_VECTOR
321 PARAMETER (MPI_COMBINER_VECTOR=4)
322 INTEGER MPI_COMBINER_HVECTOR_INTEGER
323 PARAMETER (MPI_COMBINER_HVECTOR_INTEGER=5)
324 INTEGER MPI_COMBINER_HVECTOR
325 PARAMETER (MPI_COMBINER_HVECTOR=6)
326 INTEGER MPI_COMBINER_INDEXED
327 PARAMETER (MPI_COMBINER_INDEXED=7)
328 INTEGER MPI_COMBINER_HINDEXED_INTEGER
329 PARAMETER (MPI_COMBINER_HINDEXED_INTEGER=8)
330 INTEGER MPI_COMBINER_HINDEXED
331 PARAMETER (MPI_COMBINER_HINDEXED=9)
332 INTEGER MPI_COMBINER_INDEXED_BLOCK
333 PARAMETER (MPI_COMBINER_INDEXED_BLOCK=10)
334 INTEGER MPI_COMBINER_STRUCT_INTEGER
335 PARAMETER (MPI_COMBINER_STRUCT_INTEGER=11)
336 INTEGER MPI_COMBINER_STRUCT
337 PARAMETER (MPI_COMBINER_STRUCT=12)
338 INTEGER MPI_COMBINER_SUBARRAY
339 PARAMETER (MPI_COMBINER_SUBARRAY=13)
340 INTEGER MPI_COMBINER_DARRAY
341 PARAMETER (MPI_COMBINER_DARRAY=14)
342 INTEGER MPI_COMBINER_F90_REAL
343 PARAMETER (MPI_COMBINER_F90_REAL=15)
344 INTEGER MPI_COMBINER_F90_COMPLEX
345 PARAMETER (MPI_COMBINER_F90_COMPLEX=16)
346 INTEGER MPI_COMBINER_F90_INTEGER
347 PARAMETER (MPI_COMBINER_F90_INTEGER=17)
348 INTEGER MPI_COMBINER_RESIZED
349 PARAMETER (MPI_COMBINER_RESIZED=18)
350 INTEGER MPI_MODE_NOCHECK
351 PARAMETER (MPI_MODE_NOCHECK=1024)
352 INTEGER MPI_MODE_NOSTORE
353 PARAMETER (MPI_MODE_NOSTORE=2048)
354 INTEGER MPI_MODE_NOPUT
355 PARAMETER (MPI_MODE_NOPUT=4096)
356 INTEGER MPI_MODE_NOPRECEDE
357 PARAMETER (MPI_MODE_NOPRECEDE=8192)
358 INTEGER MPI_MODE_NOSUCCEED
359 PARAMETER (MPI_MODE_NOSUCCEED=16384)
360 INTEGER MPI_THREAD_SINGLE
361 PARAMETER (MPI_THREAD_SINGLE=0)
362 INTEGER MPI_THREAD_FUNNELED
363 PARAMETER (MPI_THREAD_FUNNELED=1)
364 INTEGER MPI_THREAD_SERIALIZED
365 PARAMETER (MPI_THREAD_SERIALIZED=2)
366 INTEGER MPI_THREAD_MULTIPLE
367 PARAMETER (MPI_THREAD_MULTIPLE=3)
368 INTEGER MPI_MODE_RDONLY
369 PARAMETER (MPI_MODE_RDONLY=2)
370 INTEGER MPI_MODE_RDWR
371 PARAMETER (MPI_MODE_RDWR=8)
372 INTEGER MPI_MODE_WRONLY
373 PARAMETER (MPI_MODE_WRONLY=4)
374 INTEGER MPI_MODE_DELETE_ON_CLOSE
375 PARAMETER (MPI_MODE_DELETE_ON_CLOSE=16)
376 INTEGER MPI_MODE_UNIQUE_OPEN
377 PARAMETER (MPI_MODE_UNIQUE_OPEN=32)
378 INTEGER MPI_MODE_CREATE
379 PARAMETER (MPI_MODE_CREATE=1)
380 INTEGER MPI_MODE_EXCL
381 PARAMETER (MPI_MODE_EXCL=64)
382 INTEGER MPI_MODE_APPEND
383 PARAMETER (MPI_MODE_APPEND=128)
384 INTEGER MPI_MODE_SEQUENTIAL
385 PARAMETER (MPI_MODE_SEQUENTIAL=256)
386 INTEGER MPI_SEEK_SET
387 PARAMETER (MPI_SEEK_SET=600)
388 INTEGER MPI_SEEK_CUR
389 PARAMETER (MPI_SEEK_CUR=602)
390 INTEGER MPI_SEEK_END
391 PARAMETER (MPI_SEEK_END=604)
392 INTEGER MPI_ORDER_C
393 PARAMETER (MPI_ORDER_C=56)
394 INTEGER MPI_ORDER_FORTRAN
395 PARAMETER (MPI_ORDER_FORTRAN=57)
396 INTEGER MPI_DISTRIBUTE_BLOCK
397 PARAMETER (MPI_DISTRIBUTE_BLOCK=121)
398 INTEGER MPI_DISTRIBUTE_CYCLIC
399 PARAMETER (MPI_DISTRIBUTE_CYCLIC=122)
400 INTEGER MPI_DISTRIBUTE_NONE
401 PARAMETER (MPI_DISTRIBUTE_NONE=123)
402 INTEGER MPI_DISTRIBUTE_DFLT_DARG
403 PARAMETER (MPI_DISTRIBUTE_DFLT_DARG=-49767)
404 INTEGER MPI_DISPLACEMENT_CURRENT
405 PARAMETER (MPI_DISPLACEMENT_CURRENT=-54278278)
406 INTEGER MPI_BOTTOM, MPI_IN_PLACE
407 EXTERNAL MPI_DUP_FN, MPI_NULL_DELETE_FN, MPI_NULL_COPY_FN
408 EXTERNAL MPI_WTIME, MPI_WTICK
409 EXTERNAL PMPI_WTIME, PMPI_WTICK
410 EXTERNAL MPI_COMM_DUP_FN, MPI_COMM_NULL_DELETE_FN
411 EXTERNAL MPI_COMM_NULL_COPY_FN
412 EXTERNAL MPI_WIN_DUP_FN, MPI_WIN_NULL_DELETE_FN
413 EXTERNAL MPI_WIN_NULL_COPY_FN
414 EXTERNAL MPI_TYPE_DUP_FN, MPI_TYPE_NULL_DELETE_FN
415 EXTERNAL MPI_TYPE_NULL_COPY_FN
416 EXTERNAL MPI_CONVERSION_FN_NULL
417 DOUBLE PRECISION MPI_WTIME, MPI_WTICK
418 DOUBLE PRECISION PMPI_WTIME, PMPI_WTICK
421 COMMON /MPIPRIV1/ MPI_BOTTOM, MPI_IN_PLACE, MPI_STATUS_IGNORE
423 COMMON /MPIPRIV2/ MPI_STATUSES_IGNORE, MPI_ERRCODES_IGNORE
424 SAVE /MPIPRIV1/,/MPIPRIV2/
426 COMMON /MPIPRIVC/ MPI_ARGVS_NULL, MPI_ARGV_NULL
427 SAVE /MPIPRIVC/