/[MITgcm]/MITgcm/eesupp/inc/EEPARAMS.h
ViewVC logotype

Diff of /MITgcm/eesupp/inc/EEPARAMS.h

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

revision 1.7 by heimbach, Mon Nov 13 16:20:30 2000 UTC revision 1.21 by edhill, Wed Jan 11 06:02:31 2006 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2    C $Name$
3    CBOP
4    C     !ROUTINE: EEPARAMS.h
5    C     !INTERFACE:
6    C     include "EEPARAMS.h"
7  C  C
8  C     /==========================================================\  C     !DESCRIPTION:
9    C     *==========================================================*
10  C     | EEPARAMS.h                                               |  C     | EEPARAMS.h                                               |
11  C     |==========================================================|  C     *==========================================================*
12  C     | Parameters for "execution environemnt". These are used   |  C     | Parameters for "execution environemnt". These are used   |
13  C     | by both the particular numerical model and the "execution|  C     | by both the particular numerical model and the execution |
14  C     | environment" support routines.                           |  C     | environment support routines.                            |
15  C     \==========================================================/  C     *==========================================================*
16    CEOP
17  C     MAX_LEN_MBUF         - Default message buffer max. size  
18  C     MAX_LEN_FNAM         - Default file name max. size  C     ========  EESIZE.h  ========================================
19  C     MAX_LEN_PREC         - Default record length for reading "parameter" files  
20    C     MAX_LEN_MBUF  - Default message buffer max. size
21    C     MAX_LEN_FNAM  - Default file name max. size
22    C     MAX_LEN_PREC  - Default rec len for reading "parameter" files
23    
24        INTEGER MAX_LEN_MBUF        INTEGER MAX_LEN_MBUF
25        PARAMETER ( MAX_LEN_MBUF = 512 )        PARAMETER ( MAX_LEN_MBUF = 512 )
26        INTEGER MAX_LEN_FNAM        INTEGER MAX_LEN_FNAM
# Line 18  C     MAX_LEN_PREC         - Default rec Line 28  C     MAX_LEN_PREC         - Default rec
28        INTEGER MAX_LEN_PREC        INTEGER MAX_LEN_PREC
29        PARAMETER ( MAX_LEN_PREC = 200 )        PARAMETER ( MAX_LEN_PREC = 200 )
30    
31    C     MAX_NO_THREADS  - Maximum number of threads allowed.
32    C     MAX_NO_PROCS    - Maximum number of processes allowed.
33    C     MAX_NO_BARRIERS - Maximum number of distinct thread "barriers"
34          INTEGER MAX_NO_THREADS
35          PARAMETER ( MAX_NO_THREADS =  32 )
36          INTEGER MAX_NO_PROCS
37          PARAMETER ( MAX_NO_PROCS   =  2048 )
38          INTEGER MAX_NO_BARRIERS
39          PARAMETER ( MAX_NO_BARRIERS = 1 )
40    
41    C     Particularly weird and obscure voodoo numbers
42    C     lShare  - This wants to be the length in
43    C               [148]-byte words of the size of
44    C               the address "window" that is snooped
45    C               on an SMP bus. By separating elements in
46    C               the global sum buffer we can avoid generating
47    C               extraneous invalidate traffic between
48    C               processors. The length of this window is usually
49    C               a cache line i.e. small O(64 bytes).
50    C               The buffer arrays are usually short arrays
51    C               and are declared REAL ARRA(lShare[148],LBUFF).
52    C               Setting lShare[148] to 1 is like making these arrays
53    C               one dimensional.
54          INTEGER cacheLineSize
55          INTEGER lShare1
56          INTEGER lShare4
57          INTEGER lShare8
58          PARAMETER ( cacheLineSize = 256 )
59          PARAMETER ( lShare1 =  cacheLineSize )
60          PARAMETER ( lShare4 =  cacheLineSize/4 )
61          PARAMETER ( lShare8 =  cacheLineSize/8 )
62    
63          INTEGER MAX_VGS
64          PARAMETER ( MAX_VGS = 8192 )
65    
66    C     ========  EESIZE.h  ========================================
67    
68    
69    
70  C     SQUEEZE_RIGHT       - Flag indicating right blank space removal  C     SQUEEZE_RIGHT       - Flag indicating right blank space removal
71  C                           from text field.  C                           from text field.
72  C     SQUEEZE_LEFT        - Flag indicating left blank space removal  C     SQUEEZE_LEFT        - Flag indicating left blank space removal
# Line 27  C                           space remova Line 76  C                           space remova
76  C     PRINT_MAP_XY        - Flag indicating to plot map as XY slices  C     PRINT_MAP_XY        - Flag indicating to plot map as XY slices
77  C     PRINT_MAP_XZ        - Flag indicating to plot map as XZ slices  C     PRINT_MAP_XZ        - Flag indicating to plot map as XZ slices
78  C     PRINT_MAP_YZ        - Flag indicating to plot map as YZ slices  C     PRINT_MAP_YZ        - Flag indicating to plot map as YZ slices
79  C     commentCharacter    - Variable used in column 1 of parameter files to  C     commentCharacter    - Variable used in column 1 of parameter
80  C                           indicate comments.  C                           files to indicate comments.
81  C     INDEX_I             - Variable used to select an index label  C     INDEX_I             - Variable used to select an index label
82  C     INDEX_J               for formatted input parameters.  C     INDEX_J               for formatted input parameters.
83  C     INDEX_K  C     INDEX_K
# Line 56  C     INDEX_NONE Line 105  C     INDEX_NONE
105       &            INDEX_K    = 3,       &            INDEX_K    = 3,
106       &            INDEX_NONE = 4 )       &            INDEX_NONE = 4 )
107    
   
108  C     EXCH_IGNORE_CORNERS - Flag to select ignoring or  C     EXCH_IGNORE_CORNERS - Flag to select ignoring or
109  C     EXCH_UPDATE_CORNERS   updating of corners during  C     EXCH_UPDATE_CORNERS   updating of corners during
110  C                           an edge exchange.  C                           an edge exchange.
# Line 67  C                           an edge exch Line 115  C                           an edge exch
115    
116  C     FORWARD_SIMULATION  C     FORWARD_SIMULATION
117  C     REVERSE_SIMULATION  C     REVERSE_SIMULATION
118    C     TANGENT_SIMULATION
119        INTEGER FORWARD_SIMULATION        INTEGER FORWARD_SIMULATION
120        INTEGER REVERSE_SIMULATION        INTEGER REVERSE_SIMULATION
121          INTEGER TANGENT_SIMULATION
122        PARAMETER ( FORWARD_SIMULATION = 0,        PARAMETER ( FORWARD_SIMULATION = 0,
123       &            REVERSE_SIMULATION = 1 )       &            REVERSE_SIMULATION = 1,
124         &            TANGENT_SIMULATION = 2 )
   
 C     Particularly weird and obscure voodoo numbers  
 C     lShare  - This wants to be the length in  
 C               [148]-byte words of the size of  
 C               the address "window" that is snooped  
 C               on an SMP bus. By separating elements in  
 C               the global sum buffer we can avoid generating  
 C               extraneous invalidate traffic between  
 C               processors. The length of this window is usually  
 C               a cache line i.e. small O(64 bytes).  
 C               The buffer arrays are usually short arrays  
 C               and are declared REAL ARRA(lShare[148],LBUFF).  
 C               Setting lShare[148] to 1 is like making these arrays  
 C               one dimensional.  
       INTEGER cacheLineSize  
       INTEGER lShare1  
       INTEGER lShare4  
       INTEGER lShare8  
       PARAMETER ( cacheLineSize = 256 )  
       PARAMETER ( lShare1 =  cacheLineSize )  
       PARAMETER ( lShare4 =  cacheLineSize/4 )  
       PARAMETER ( lShare8 =  cacheLineSize/8 )  
   
 C     MAX_NO_THREADS  - Maximum number of threads allowed.  
 C     MAX_NO_PROCS    - Maximum number of processes allowed.  
 C     MAX_NO_BARRIERS - Maximum number of distinct thread "barriers"  
       INTEGER MAX_NO_THREADS  
       PARAMETER ( MAX_NO_THREADS =   32 )  
       INTEGER MAX_NO_PROCS  
       PARAMETER ( MAX_NO_PROCS   =  128 )  
       INTEGER MAX_NO_BARRIERS  
       PARAMETER ( MAX_NO_BARRIERS = 1 )  
125    
126  C--   COMMON /EEPARAMS_L/ Execution environment public logical variables.  C--   COMMON /EEPARAMS_L/ Execution environment public logical variables.
127  C     eeBootError - Flag indicating error during multi-processing  C     eeBootError - Flag indicating error during multi-processing
128  C     eeEndError    initialisation/termination.  C     eeEndError    initialisation/termination.
129  C     fatalError  - Flag used to indicate that the model is ended with  C     fatalError  - Flag used to indicate that the model is ended with
130  C                   an error  C                   an error
131        COMMON /EEPARAMS_L/ eeBootError, fatalError, eeEndError  C     useCoupler  - use Coupler for a multi-components set-up
132          COMMON /EEPARAMS_L/ eeBootError, fatalError, eeEndError,
133         &     useCubedSphereExchange, useCoupler, useSETRLSTK, useSIGREG,
134         &     useEMBEDSRC
135        LOGICAL eeBootError        LOGICAL eeBootError
136        LOGICAL eeEndError        LOGICAL eeEndError
137        LOGICAL fatalError        LOGICAL fatalError
138          LOGICAL useCubedSphereExchange
139          LOGICAL useCoupler
140          LOGICAL useSETRLSTK
141          LOGICAL useSIGREG
142          LOGICAL useEMBEDSRC
143    
144  C--   COMMON /EPARAMS_I/ Execution environment public integer variables.  C--   COMMON /EPARAMS_I/ Execution environment public integer variables.
145  C     errorMessageUnit    - Fortran IO unit for error messages  C     errorMessageUnit    - Fortran IO unit for error messages
# Line 176  C                    by one every time a Line 202  C                    by one every time a
202        INTEGER scrUnit1        INTEGER scrUnit1
203        INTEGER scrUnit2        INTEGER scrUnit2
204        INTEGER standardMessageUnit        INTEGER standardMessageUnit
205    
206    CEH3 ;;; Local Variables: ***
207    CEH3 ;;; mode:fortran ***
208    CEH3 ;;; End: ***
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.21
  ViewVC Help
Powered by ViewVC 1.1.22