/[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.17 by adcroft, Wed Jun 10 16:05:39 1998 UTC revision 1.19 by adcroft, Wed Jun 17 21:07:01 1998 UTC
# Line 40  C                       temperature. Line 40  C                       temperature.
40  C     hydrogSaltFile  - File containing initial hydrographic data for salinity.  C     hydrogSaltFile  - File containing initial hydrographic data for salinity.
41  C     zonalWindFile   - File containing zonal wind data  C     zonalWindFile   - File containing zonal wind data
42  C     meridWindFile   - File containing meridional wind data  C     meridWindFile   - File containing meridional wind data
43    C     thetaClimFile   - File containing theta climataology used
44    C                       in relaxation term -lambda(theta-theta*)
45    C     saltClimFile    - File containing salt climataology used
46    C                       in relaxation term -lambda(salt-salt*)
47        COMMON /PARM_C/ checkPtSuff,        COMMON /PARM_C/ checkPtSuff,
48       &                bathyFile, hydrogThetaFile, hydrogSaltFile,       &                bathyFile, hydrogThetaFile, hydrogSaltFile,
49       &                zonalWindFile, meridWindFile       &                zonalWindFile, meridWindFile, thetaClimFile,
50         &                saltClimFile
51        CHARACTER*(5) checkPtSuff(maxNoChkptLev)        CHARACTER*(5) checkPtSuff(maxNoChkptLev)
52        CHARACTER*(MAX_LEN_FNAM) bathyFile        CHARACTER*(MAX_LEN_FNAM) bathyFile
53        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile
54        CHARACTER*(MAX_LEN_FNAM) hydrogSaltFile        CHARACTER*(MAX_LEN_FNAM) hydrogSaltFile
55        CHARACTER*(MAX_LEN_FNAM) zonalWindFile        CHARACTER*(MAX_LEN_FNAM) zonalWindFile
56        CHARACTER*(MAX_LEN_FNAM) meridWindFile        CHARACTER*(MAX_LEN_FNAM) meridWindFile
57          CHARACTER*(MAX_LEN_FNAM) thetaClimFile
58          CHARACTER*(MAX_LEN_FNAM) saltClimFile
59    
60  C--   COMMON /PARM_I/ Integer valued parameters used by the model.  C--   COMMON /PARM_I/ Integer valued parameters used by the model.
61  C     cg2dMaxIters        - Maximum number of iterations in the  C     cg2dMaxIters        - Maximum number of iterations in the
# Line 115  C     useConstantF  - Coriolis parameter Line 122  C     useConstantF  - Coriolis parameter
122  C     useBetaPlaneF - Coriolis parameter set to f0 + beta.y  C     useBetaPlaneF - Coriolis parameter set to f0 + beta.y
123  C     useSphereF    - Coriolis parameter set to 2.omega.sin(phi)  C     useSphereF    - Coriolis parameter set to 2.omega.sin(phi)
124  C     implicitDiffusion - Turns implicit vertical diffusion on  C     implicitDiffusion - Turns implicit vertical diffusion on
125    C     doThetaClimRelax - Set true if relaxation to temperature
126    C                        climatology is required.
127    C     doSaltClimRelax  - Set true if relaxation to salinity
128    C                        climatology is required.
129    C     periodicExternalForcing - Set true if forcing is time-dependant
130        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
131       & momViscosity, momAdvection, momForcing, useCoriolis, momPressureForcing,       & momViscosity, momAdvection, momForcing, useCoriolis, momPressureForcing,
132       & tempDiffusion, tempAdvection, tempForcing,       & tempDiffusion, tempAdvection, tempForcing,
# Line 123  C     implicitDiffusion - Turns implicit Line 135  C     implicitDiffusion - Turns implicit
135       & momStepping, tempStepping, saltStepping,       & momStepping, tempStepping, saltStepping,
136       & metricTerms, usingSphericalPolarMTerms,       & metricTerms, usingSphericalPolarMTerms,
137       & useConstantF, useBetaPlaneF, useSphereF,       & useConstantF, useBetaPlaneF, useSphereF,
138       & implicitDiffusion       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,
139         & periodicExternalForcing
140        LOGICAL usingCartesianGrid        LOGICAL usingCartesianGrid
141        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
142        LOGICAL usingSphericalPolarMTerms        LOGICAL usingSphericalPolarMTerms
# Line 148  C     implicitDiffusion - Turns implicit Line 161  C     implicitDiffusion - Turns implicit
161        LOGICAL useBetaPlaneF        LOGICAL useBetaPlaneF
162        LOGICAL useSphereF        LOGICAL useSphereF
163        LOGICAL implicitDiffusion        LOGICAL implicitDiffusion
164          LOGICAL doThetaClimRelax
165          LOGICAL doSaltClimRelax
166          LOGICAL periodicExternalForcing
167    
168  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
169  C     cg2dTargetResidual  C     cg2dTargetResidual
# Line 234  C     cfFacMom  - Coriolis term scaling Line 250  C     cfFacMom  - Coriolis term scaling
250  C     foFacMom  - Momentum forcing scaling parameter  C     foFacMom  - Momentum forcing scaling parameter
251  C     mtFacMom  - Metric terms scaling parameter  C     mtFacMom  - Metric terms scaling parameter
252  C     cAdjFreq  - Frequency of convective adjustment  C     cAdjFreq  - Frequency of convective adjustment
253    C     tauThetaClimRelax - Relaxation to climatology time scale ( s ).
254    C     lambdaThetaClimRelax - Inverse time scale for relaxation ( 1/s ).
255    C     tauSaltClimRelax - Relaxation to climatology time scale ( s ).
256    C     lambdaSaltClimRelax - Inverse time scale for relaxation ( 1/s ).
257    C     externForcingPeriod - Is the period of which forcing varies (eg. 1 month)
258    C     externForcingCycle - Is the repeat time of the forcing (eg. 1 year)
259    C                          (note: externForcingCycle must be an integer
260    C                           number times externForcingPeriod)
261        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac, delZ, delX, delY,        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac, delZ, delX, delY,
262       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime, phiMin,       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime, phiMin,
263       & thetaMin, rSphere, rRSphere, f0, fCori, beta, viscAh, viscAz, viscA4,       & thetaMin, rSphere, rRSphere, f0, fCori, beta, viscAh, viscAz, viscA4,
# Line 243  C     cAdjFreq  - Frequency of convectiv Line 267  C     cAdjFreq  - Frequency of convectiv
267       & gravity, gBaro, rhonil, tRef, sRef,       & gravity, gBaro, rhonil, tRef, sRef,
268       & endTime, chkPtFreq, pchkPtFreq, dumpFreq,       & endTime, chkPtFreq, pchkPtFreq, dumpFreq,
269       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,
270       & cAdjFreq, omega       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,
271         & tauSaltClimRelax, lambdaSaltClimRelax,
272         & externForcingCycle, externForcingPeriod
273        _RL cg2dTargetResidual        _RL cg2dTargetResidual
274        _RL cg2dpcOffDFac        _RL cg2dpcOffDFac
275        _RL delZ(Nz)        _RL delZ(Nz)
# Line 297  C     cAdjFreq  - Frequency of convectiv Line 323  C     cAdjFreq  - Frequency of convectiv
323        _RL mTFacMom        _RL mTFacMom
324        _RL cAdjFreq        _RL cAdjFreq
325        _RL omega        _RL omega
326          _RL tauThetaClimRelax
327          _RL lambdaThetaClimRelax
328          _RL tauSaltClimRelax
329          _RL lambdaSaltClimRelax
330          _RL externForcingCycle
331          _RL externForcingPeriod
332    
333        COMMON /PARM_A/ HeatCapacity_Cp,        COMMON /PARM_A/ HeatCapacity_Cp,
334       &                Lamba_theta       &                Lamba_theta

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.19

  ViewVC Help
Powered by ViewVC 1.1.22