/[MITgcm]/MITgcm/eesupp/src/eeset_parms.F
ViewVC logotype

Diff of /MITgcm/eesupp/src/eeset_parms.F

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

revision 1.8 by adcroft, Tue May 18 17:39:21 1999 UTC revision 1.12 by adcroft, Tue May 29 14:01:36 2001 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2    C $Name$
3    
4  #include "CPP_EEOPTIONS.h"  #include "CPP_EEOPTIONS.h"
5    
# Line 23  C     === Global variables === Line 24  C     === Global variables ===
24  CEndOfInterface  CEndOfInterface
25    
26  C     === Local variables ===  C     === Local variables ===
 C     K - Loop counter  
27  C     iUnit - Work variable for IO unit number  C     iUnit - Work variable for IO unit number
28  C     errIO - IO unit error flag  C     errIO - IO unit error flag
29        INTEGER K, IL        INTEGER IL
30        INTEGER errIO        INTEGER errIO
31        INTEGER iUnit        INTEGER iUnit
32        CHARACTER*(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
# Line 36  C     errIO - IO unit error flag Line 36  C     errIO - IO unit error flag
36        INTEGER  ILNBLNK        INTEGER  ILNBLNK
37        EXTERNAL ILNBLNK        EXTERNAL ILNBLNK
38        NAMELIST /EEPARMS/        NAMELIST /EEPARMS/
39       & nTx, nTy       & nTx, nTy,usingMPI,useCubedSphereExchange
40    
41    
42  C--   For now these options are fixed as the code does  C--   For now these options are fixed as the code does
# Line 74  C     is made. Line 74  C     is made.
74  C  C
75        notUsingXPeriodicity       = .FALSE.        notUsingXPeriodicity       = .FALSE.
76        notUsingYPeriodicity       = .FALSE.        notUsingYPeriodicity       = .FALSE.
77          useCubedSphereExchange     = .FALSE.
78        usingMPI                   = .FALSE.        usingMPI                   = .FALSE.
79        nTx                        = 1        nTx                        = 1
80        nTy                        = 1        nTy                        = 1

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.12

  ViewVC Help
Powered by ViewVC 1.1.22