/[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.27 by cnh, Mon Aug 24 02:25:01 1998 UTC revision 1.30 by cnh, Sun Sep 6 17:35:19 1998 UTC
# Line 26  C                dumping model state. Line 26  C                dumping model state.
26        PARAMETER ( precFloat32 = 0 )        PARAMETER ( precFloat32 = 0 )
27        INTEGER precFloat64        INTEGER precFloat64
28        PARAMETER ( precFloat64 = 1 )        PARAMETER ( precFloat64 = 1 )
29    C     UNSET_xxx - Used to indicate variables that have not been given a value
30          Real*8 UNSET_FLOAT8
31          PARAMETER ( UNSET_FLOAT8 = 1.234567D5 )
32          Real*4 UNSET_FLOAT4
33          PARAMETER ( UNSET_FLOAT4 = 1.234567E5 )
34          _RL    UNSET_RL    
35          PARAMETER ( UNSET_RL     = 1.234567D5 )
36          _RS    UNSET_RS    
37          PARAMETER ( UNSET_RS     = 1.234567E5 )
38          INTEGER UNSET_I
39          PARAMETER ( UNSET_I      = 123456789  )
40    
41  C     Checkpoint data  C     Checkpoint data
42        INTEGER maxNoChkptLev        INTEGER maxNoChkptLev
# Line 130  C                        climatology is Line 141  C                        climatology is
141  C     doSaltClimRelax  - Set true if relaxation to salinity  C     doSaltClimRelax  - Set true if relaxation to salinity
142  C                        climatology is required.  C                        climatology is required.
143  C     periodicExternalForcing - Set true if forcing is time-dependant  C     periodicExternalForcing - Set true if forcing is time-dependant
144    C     usingPCoords     - Set to indicate that we are working in pressure
145    C                        coords.
146    C     usingZCoords     - Set to indicate that we are working in height
147    C                        coords.
148        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
149       & momViscosity, momAdvection, momForcing, useCoriolis, momPressureForcing,       & momViscosity, momAdvection, momForcing, useCoriolis, momPressureForcing,
150       & tempDiffusion, tempAdvection, tempForcing,       & tempDiffusion, tempAdvection, tempForcing,
# Line 139  C     periodicExternalForcing - Set true Line 154  C     periodicExternalForcing - Set true
154       & metricTerms, usingSphericalPolarMTerms,       & metricTerms, usingSphericalPolarMTerms,
155       & useConstantF, useBetaPlaneF, useSphereF,       & useConstantF, useBetaPlaneF, useSphereF,
156       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,
157       & periodicExternalForcing       & periodicExternalForcing, usingPCoords, usingZCoords
158        LOGICAL usingCartesianGrid        LOGICAL usingCartesianGrid
159        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
160        LOGICAL usingSphericalPolarMTerms        LOGICAL usingSphericalPolarMTerms
# Line 167  C     periodicExternalForcing - Set true Line 182  C     periodicExternalForcing - Set true
182        LOGICAL doThetaClimRelax        LOGICAL doThetaClimRelax
183        LOGICAL doSaltClimRelax        LOGICAL doSaltClimRelax
184        LOGICAL periodicExternalForcing        LOGICAL periodicExternalForcing
185          LOGICAL usingPCoords
186          LOGICAL usingZCoords
187    
188  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
189  C     cg2dTargetResidual  C     cg2dTargetResidual
# Line 249  C                    freesurfac = 1. use Line 266  C                    freesurfac = 1. use
266  C                    freesurfac = 0. uses rigid lid  C                    freesurfac = 0. uses rigid lid
267  C     hFacMin      - Minimum fraction size of a cell (affects hFacC etc...)  C     hFacMin      - Minimum fraction size of a cell (affects hFacC etc...)
268  C     hFacMinDz    - Minimum dimesional size of a cell (affects hFacC etc..., m)  C     hFacMinDz    - Minimum dimesional size of a cell (affects hFacC etc..., m)
269    C     hFacMinDp    - Minimum dimesional size of a cell (affects hFacC etc..., Pa)
270  C     hFacMinDr    - Minimum dimesional size of a cell (affects hFacC etc..., units of r)  C     hFacMinDr    - Minimum dimesional size of a cell (affects hFacC etc..., units of r)
271  C     tauCD        - CD scheme coupling timescale ( 1/s )  C     tauCD        - CD scheme coupling timescale ( 1/s )
272  C     rCD          - CD scheme normalised coupling parameter ( 0-1 )  C     rCD          - CD scheme normalised coupling parameter ( 0-1 )
# Line 282  C     externForcingPeriod - Is the perio Line 300  C     externForcingPeriod - Is the perio
300  C     externForcingCycle - Is the repeat time of the forcing (eg. 1 year)  C     externForcingCycle - Is the repeat time of the forcing (eg. 1 year)
301  C                          (note: externForcingCycle must be an integer  C                          (note: externForcingCycle must be an integer
302  C                           number times externForcingPeriod)  C                           number times externForcingPeriod)
303    C     horiVertRatio      - Ratio on units in vertical to units in horizontal.
304    C                          ( 1 if horiz in m and vertical in m ).
305    C                          ( g*rho if horiz in m and vertical in Pa ).
306        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac,        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac,
307       & delP, delZ, delR, delX, delY,       & delP, delZ, delR, delX, delY,
308       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime, phiMin,       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime, phiMin,
# Line 298  C                           number times Line 319  C                           number times
319       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,
320       & tauSaltClimRelax, lambdaSaltClimRelax,       & tauSaltClimRelax, lambdaSaltClimRelax,
321       & externForcingCycle, externForcingPeriod,       & externForcingCycle, externForcingPeriod,
322       & viscAp, diffKpT, diffKpS, hFacMinDr,       & viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp,
323       & theta_S, specVol_S       & theta_S, specVol_S, horiVertRatio
324    
325        _RL cg2dTargetResidual        _RL cg2dTargetResidual
326        _RL cg2dpcOffDFac        _RL cg2dpcOffDFac
# Line 321  C                           number times Line 342  C                           number times
342        _RL freeSurfFac        _RL freeSurfFac
343        _RL hFacMin        _RL hFacMin
344        _RL hFacMinDz        _RL hFacMinDz
345          _RL hFacMinDp
346        _RL hFacMinDr        _RL hFacMinDr
347        _RL beta        _RL beta
348        _RL viscAh        _RL viscAh
# Line 378  C                           number times Line 400  C                           number times
400        _RL lambdaSaltClimRelax        _RL lambdaSaltClimRelax
401        _RL externForcingCycle        _RL externForcingCycle
402        _RL externForcingPeriod        _RL externForcingPeriod
403          _RL horiVertRatio
404    
405        COMMON /PARM_A/ HeatCapacity_Cp,        COMMON /PARM_A/ HeatCapacity_Cp,
406       &                Lamba_theta       &                Lamba_theta
Legend:
Removed from v.1.27  
changed lines
  Added in v.1.30
  ViewVC Help
Powered by ViewVC 1.1.22