/[MITgcm]/MITgcm/pkg/exch2/w2_e2setup.F
ViewVC logotype

Diff of /MITgcm/pkg/exch2/w2_e2setup.F

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

revision 1.5 by jmc, Thu Jun 18 22:37:58 2009 UTC revision 1.6 by jmc, Fri Apr 23 20:21:06 2010 UTC
# Line 18  C     Set-up W2_EXCH2 tile topology stru Line 18  C     Set-up W2_EXCH2 tile topology stru
18  C     !USES:  C     !USES:
19        IMPLICIT NONE        IMPLICIT NONE
20    
21  C      Tile toplogy settings data structures  C      Tile topology settings data structures
22  #include "SIZE.h"  #include "SIZE.h"
23  #include "EEPARAMS.h"  #include "EEPARAMS.h"
24  #ifdef ALLOW_EXCH2  #ifdef ALLOW_EXCH2
# Line 36  C               (Note: not relevant sinc Line 36  C               (Note: not relevant sinc
36    
37  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
38  C     === Local variables ===  C     === Local variables ===
39  C     msgBuf     :: Informational/error meesage buffer  C     msgBuf     :: Informational/error message buffer
40  C     stdUnit    :: Standard-Output IO unit number  C     stdUnit    :: Standard-Output IO unit number
41        CHARACTER*(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
42        INTEGER stdUnit        INTEGER stdUnit
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22