/[MITgcm]/MITgcm/pkg/flt/exch_recv_get_vec.F
ViewVC logotype

Diff of /MITgcm/pkg/flt/exch_recv_get_vec.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.8 by jmc, Wed Aug 31 21:35:11 2011 UTC revision 1.9 by jmc, Thu Dec 22 19:04:45 2011 UTC
# Line 59  C     eastCommMode  ::  a particular til Line 59  C     eastCommMode  ::  a particular til
59  c     INTEGER biW, bjW, biE, bjE  c     INTEGER biW, bjW, biE, bjE
60        INTEGER westCommMode        INTEGER westCommMode
61        INTEGER eastCommMode        INTEGER eastCommMode
       INTEGER spinCount  
62        INTEGER ioUnit        INTEGER ioUnit
63    #ifdef EXCH_USE_SPINNING
64          INTEGER spinCount
65    #endif
66  #ifdef ALLOW_USE_MPI  #ifdef ALLOW_USE_MPI
67        INTEGER theProc, theTag, theType, theSize        INTEGER theProc, theTag, theType, theSize
68        INTEGER mpiStatus(MPI_STATUS_SIZE,4), mpiRc        INTEGER mpiStatus(MPI_STATUS_SIZE,4), mpiRc
# Line 273  C     northCommMode ::  a particular til Line 275  C     northCommMode ::  a particular til
275  c     INTEGER biS, bjS, biN, bjN  c     INTEGER biS, bjS, biN, bjN
276        INTEGER southCommMode        INTEGER southCommMode
277        INTEGER northCommMode        INTEGER northCommMode
       INTEGER spinCount  
278        INTEGER ioUnit        INTEGER ioUnit
279    #ifdef EXCH_USE_SPINNING
280          INTEGER spinCount
281    #endif
282  #ifdef ALLOW_USE_MPI  #ifdef ALLOW_USE_MPI
283        INTEGER theProc, theTag, theType, theSize        INTEGER theProc, theTag, theType, theSize
284        INTEGER mpiStatus(MPI_STATUS_SIZE,4), mpiRc        INTEGER mpiStatus(MPI_STATUS_SIZE,4), mpiRc
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22