source: trunk/WRF.COMMON/WRFV3/arch/win_mpif.h @ 3553

Last change on this file since 3553 was 2759, checked in by aslmd, 2 years ago

adding unmodified code from WRFV3.0.1.1, expurged from useless data +1M size

  • Property svn:executable set to *
File size: 15.3 KB
Line 
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
419
420
421       COMMON /MPIPRIV1/ MPI_BOTTOM, MPI_IN_PLACE, MPI_STATUS_IGNORE
422
423       COMMON /MPIPRIV2/ MPI_STATUSES_IGNORE, MPI_ERRCODES_IGNORE
424       SAVE /MPIPRIV1/,/MPIPRIV2/
425
426       COMMON /MPIPRIVC/ MPI_ARGVS_NULL, MPI_ARGV_NULL
427       SAVE   /MPIPRIVC/
Note: See TracBrowser for help on using the repository browser.