/[MITgcm]/MITgcm/model/inc/PARAMS.h
ViewVC logotype

Diff of /MITgcm/model/inc/PARAMS.h

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

revision 1.34 by cnh, Fri Nov 6 22:44:43 1998 UTC revision 1.39 by adcroft, Tue Jun 29 18:33:21 1999 UTC
# Line 23  C     Symbolic values Line 23  C     Symbolic values
23  C     precXXXX - Used to indicate what precision to use for  C     precXXXX - Used to indicate what precision to use for
24  C                dumping model state.  C                dumping model state.
25        INTEGER precFloat32        INTEGER precFloat32
26        PARAMETER ( precFloat32 = 0 )        PARAMETER ( precFloat32 = 32 )
27        INTEGER precFloat64        INTEGER precFloat64
28        PARAMETER ( precFloat64 = 1 )        PARAMETER ( precFloat64 = 64 )
29  C     UNSET_xxx - Used to indicate variables that have not been given a value  C     UNSET_xxx - Used to indicate variables that have not been given a value
30        Real*8 UNSET_FLOAT8        Real*8 UNSET_FLOAT8
31        PARAMETER ( UNSET_FLOAT8 = 1.234567D5 )        PARAMETER ( UNSET_FLOAT8 = 1.234567D5 )
# Line 55  C     thetaClimFile   - File containing Line 55  C     thetaClimFile   - File containing
55  C                       in relaxation term -lambda(theta-theta*)  C                       in relaxation term -lambda(theta-theta*)
56  C     saltClimFile    - File containing salt climataology used  C     saltClimFile    - File containing salt climataology used
57  C                       in relaxation term -lambda(salt-salt*)  C                       in relaxation term -lambda(salt-salt*)
58    C     surfQfile       - File containing surface heat flux
59    C     EmPmRfile       - File containing surface fresh water flux
60  C     buoyancyRelation - Flag used to indicate which relation to use to  C     buoyancyRelation - Flag used to indicate which relation to use to
61  C                        get buoyancy.  C                        get buoyancy.
62        COMMON /PARM_C/ checkPtSuff,        COMMON /PARM_C/ checkPtSuff,
63       &                bathyFile, hydrogThetaFile, hydrogSaltFile,       &                bathyFile, hydrogThetaFile, hydrogSaltFile,
64       &                zonalWindFile, meridWindFile, thetaClimFile,       &                zonalWindFile, meridWindFile, thetaClimFile,
65       &                saltClimFile, buoyancyRelation       &                saltClimFile, buoyancyRelation,
66         &                EmPmRfile,surfQfile
67        CHARACTER*(5) checkPtSuff(maxNoChkptLev)        CHARACTER*(5) checkPtSuff(maxNoChkptLev)
68        CHARACTER*(MAX_LEN_FNAM) bathyFile        CHARACTER*(MAX_LEN_FNAM) bathyFile
69        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile
# Line 69  C                        get buoyancy. Line 72  C                        get buoyancy.
72        CHARACTER*(MAX_LEN_FNAM) meridWindFile        CHARACTER*(MAX_LEN_FNAM) meridWindFile
73        CHARACTER*(MAX_LEN_FNAM) thetaClimFile        CHARACTER*(MAX_LEN_FNAM) thetaClimFile
74        CHARACTER*(MAX_LEN_FNAM) saltClimFile        CHARACTER*(MAX_LEN_FNAM) saltClimFile
75          CHARACTER*(MAX_LEN_FNAM) surfQfile
76          CHARACTER*(MAX_LEN_FNAM) EmPmRfile
77        CHARACTER*(MAX_LEN_FNAM) buoyancyRelation        CHARACTER*(MAX_LEN_FNAM) buoyancyRelation
78    
79  C--   COMMON /PARM_I/ Integer valued parameters used by the model.  C--   COMMON /PARM_I/ Integer valued parameters used by the model.
# Line 123  C     usingCartesianGrid - If TRUE grid Line 128  C     usingCartesianGrid - If TRUE grid
128  C                          coordinate frame.  C                          coordinate frame.
129  C     usingSphericalPolarGrid - If TRUE grid generation will be in a  C     usingSphericalPolarGrid - If TRUE grid generation will be in a
130  C                               spherical polar frame.  C                               spherical polar frame.
131    C     no_slip_sides - Impose "no-slip" at lateral boundaries.
132    C     no_slip_bottom- Impose "no-slip" at bottom boundary.
133  C     momViscosity  - Flag which turns momentum friction terms on and off.  C     momViscosity  - Flag which turns momentum friction terms on and off.
134  C     momAdvection  - Flag which turns advection of momentum on and off.  C     momAdvection  - Flag which turns advection of momentum on and off.
135  C     momForcing    - Flag which turns external forcing of momentum on  C     momForcing    - Flag which turns external forcing of momentum on
# Line 162  C     usingPCoords     - Set to indicate Line 169  C     usingPCoords     - Set to indicate
169  C                        coords.  C                        coords.
170  C     usingZCoords     - Set to indicate that we are working in height  C     usingZCoords     - Set to indicate that we are working in height
171  C                        coords.  C                        coords.
172    C     openBoundaries - Using open-boundaries
173    C     nonHydrostatic - Using non-hydrostatic terms
174    C     globalFiles    - Selects between "global" and "tiled" files
175    C     allowFreezing  - Allows water to freeze and form ice
176        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
177         & no_slip_sides,no_slip_bottom,
178       & momViscosity, momAdvection, momForcing, useCoriolis,       & momViscosity, momAdvection, momForcing, useCoriolis,
179       & momPressureForcing,tempDiffusion, tempAdvection, tempForcing,       & momPressureForcing,tempDiffusion, tempAdvection, tempForcing,
180       & saltDiffusion, saltAdvection, saltForcing,       & saltDiffusion, saltAdvection, saltForcing,
# Line 171  C                        coords. Line 183  C                        coords.
183       & metricTerms, usingSphericalPolarMTerms,       & metricTerms, usingSphericalPolarMTerms,
184       & useConstantF, useBetaPlaneF, useSphereF,       & useConstantF, useBetaPlaneF, useSphereF,
185       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,
186       & periodicExternalForcing, usingPCoords, usingZCoords       & periodicExternalForcing, usingPCoords, usingZCoords,
187         & openBoundaries, nonHydrostatic, globalFiles,
188         & allowFreezing
189        LOGICAL usingCartesianGrid        LOGICAL usingCartesianGrid
190        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
191        LOGICAL usingSphericalPolarMTerms        LOGICAL usingSphericalPolarMTerms
192          LOGICAL no_slip_sides
193          LOGICAL no_slip_bottom
194        LOGICAL momViscosity        LOGICAL momViscosity
195        LOGICAL momAdvection        LOGICAL momAdvection
196        LOGICAL momForcing        LOGICAL momForcing
# Line 201  C                        coords. Line 217  C                        coords.
217        LOGICAL periodicExternalForcing        LOGICAL periodicExternalForcing
218        LOGICAL usingPCoords        LOGICAL usingPCoords
219        LOGICAL usingZCoords        LOGICAL usingZCoords
220          LOGICAL openBoundaries
221          LOGICAL nonHydrostatic
222          LOGICAL globalFiles
223          LOGICAL allowFreezing
224    
225  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
226  C     cg2dTargetResidual  C     cg2dTargetResidual
# Line 308  C     pfFacMom      - Momentum pressure Line 328  C     pfFacMom      - Momentum pressure
328  C     cfFacMom      - Coriolis term tracer parameter  C     cfFacMom      - Coriolis term tracer parameter
329  C     foFacMom      - Momentum forcing tracer parameter  C     foFacMom      - Momentum forcing tracer parameter
330  C     mtFacMom      - Metric terms tracer parameter  C     mtFacMom      - Metric terms tracer parameter
331    C     cosPower      - Power of cosine of latitude to multiply viscosity
332  C     cAdjFreq      - Frequency of convective adjustment  C     cAdjFreq      - Frequency of convective adjustment
333  C  C
334  C     taveFreq      - Frequency with which time-averaged model state is written to  C     taveFreq      - Frequency with which time-averaged model state is written to
# Line 339  C                          circles ( see Line 360  C                          circles ( see
360       & recip_rhoConst, rhoConst, tRef, sRef,       & recip_rhoConst, rhoConst, tRef, sRef,
361       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq,       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq,
362       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,
363         & cosPower,
364       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,
365       & tauSaltClimRelax, lambdaSaltClimRelax,       & tauSaltClimRelax, lambdaSaltClimRelax,
366       & externForcingCycle, externForcingPeriod,       & externForcingCycle, externForcingPeriod,
# Line 418  C                          circles ( see Line 440  C                          circles ( see
440        _RL cfFacMom        _RL cfFacMom
441        _RL foFacMom        _RL foFacMom
442        _RL mTFacMom        _RL mTFacMom
443          _RL cosPower
444        _RL cAdjFreq        _RL cAdjFreq
445        _RL omega        _RL omega
446        _RL tauThetaClimRelax        _RL tauThetaClimRelax
# Line 430  C                          circles ( see Line 453  C                          circles ( see
453        _RL recip_horiVertRatio        _RL recip_horiVertRatio
454        _RL latFFTFiltLo        _RL latFFTFiltLo
455    
456        COMMON /PARM_A/ HeatCapacity_Cp,        COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp,
457       &                Lamba_theta       &                Lamba_theta
458        _RL HeatCapacity_Cp        _RL HeatCapacity_Cp
459        _RL Lamba_theta        _RL Lamba_theta
460          _RL recip_Cp
461    
462  C Equation of State (polynomial coeffients)  C Equation of State (polynomial coeffients)
463        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS
# Line 446  C     sBeta     - Linear EOS haline cont Line 470  C     sBeta     - Linear EOS haline cont
470        _RL sBeta        _RL sBeta
471        character*(6) eosType        character*(6) eosType
472    
473    C These are input arrays (of integers) that contain the *absolute*
474    C computational index of an open-boundary (OB) point.
475    C A zero (0) element means there is no corresponding OB in that column/row.
476    C The computational coordinate refers to "tracer" cells.
477    C For a northern/southern OB, the OB V point is to the south/north.
478    C For an eastern/western OB, the OB U point is to the west/east.
479    C eg.
480    C     OB_Jnorth(3)=34  means that:
481    C          T( 3 ,34) is a an OB point
482    C          U(3:4,34) is a an OB point
483    C          V( 4 ,34) is a an OB point
484    C while
485    C     OB_Jsouth(3)=1  means that:
486    C          T( 3 ,1) is a an OB point
487    C          U(3:4,1) is a an OB point
488    C          V( 4 ,2) is a an OB point
489    C
490    C For convenience, negative values for Jnorth/Ieast refer to
491    C points relative to the Northern/Eastern edges of the model
492    C eg. OB_Jnorth(3)=-1  means that the point (3,Ny-1) is a northern O-B.
493    C
494          COMMON /PARM_OB/
495         & OB_Jnorth,OB_Jsouth,OB_Ieast,OB_Iwest
496          INTEGER OB_Jnorth(Nx)
497          INTEGER OB_Jsouth(Nx)
498          INTEGER OB_Ieast(Ny)
499          INTEGER OB_Iwest(Ny)
Legend:
Removed from v.1.34  
changed lines
  Added in v.1.39
  ViewVC Help
Powered by ViewVC 1.1.22