/[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.8 by cnh, Mon May 25 16:17:36 1998 UTC revision 1.14 by adcroft, Mon Jun 8 18:45:28 1998 UTC
# Line 9  C     | stored into the variables held h Line 9  C     | stored into the variables held h
9  C     | the parameters can also be found here.                   |  C     | the parameters can also be found here.                   |
10  C     \==========================================================/  C     \==========================================================/
11    
12    C     Macros for special grid options
13    #include "PARAMS_MACROS.h"
14    
15  C--   Contants  C--   Contants
16  C     Useful physical values  C     Useful physical values
17        Real*8 PI        Real*8 PI
# Line 72  C     momViscosity  - Flag which turns m Line 75  C     momViscosity  - Flag which turns m
75  C     momAdvection  - Flag which turns advection of momentum on and off.  C     momAdvection  - Flag which turns advection of momentum on and off.
76  C     momForcing    - Flag which turns external forcing of momentum on  C     momForcing    - Flag which turns external forcing of momentum on
77  C                     and off.  C                     and off.
78    C     momPressureForcing - Flag which turns pressure term in momentum equation
79    C                          on and off.
80  C     useCoriolis   - Flag which turns the coriolis terms on and off.  C     useCoriolis   - Flag which turns the coriolis terms on and off.
81  C     tempDiffusion - Flag which turns diffusion of temperature on  C     tempDiffusion - Flag which turns diffusion of temperature on
82  C                     and off.  C                     and off.
# Line 87  C     saltForcing   - Flag which turns e Line 92  C     saltForcing   - Flag which turns e
92  C                     and off.  C                     and off.
93  C     implicitFreeSurface - Set to true to use implcit free surface  C     implicitFreeSurface - Set to true to use implcit free surface
94  C     rigidLid            - Set to true to use rigid lid  C     rigidLid            - Set to true to use rigid lid
95    C     momStepping   - Turns momentum equation time-stepping off
96    C     momStepping   - Turns temperature equation time-stepping off
97    C     implicitDiffusion - Turns implicit vertical diffusion on
98        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
99       & momViscosity, momAdvection, momForcing, useCoriolis,       & momViscosity, momAdvection, momForcing, useCoriolis, momPressureForcing,
100       & tempDiffusion, tempAdvection, tempForcing,       & tempDiffusion, tempAdvection, tempForcing,
101       & saltDiffusion, saltAdvection, saltForcing,       & saltDiffusion, saltAdvection, saltForcing,
102       & implicitFreeSurface, rigidLid       & implicitFreeSurface, rigidLid, momStepping, tempStepping,
103         & implicitDiffusion
104        LOGICAL usingCartesianGrid        LOGICAL usingCartesianGrid
105        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
106        LOGICAL momViscosity        LOGICAL momViscosity
107        LOGICAL momAdvection        LOGICAL momAdvection
108        LOGICAL momForcing        LOGICAL momForcing
109          LOGICAL momPressureForcing
110        LOGICAL useCoriolis        LOGICAL useCoriolis
111        LOGICAL tempDiffusion        LOGICAL tempDiffusion
112        LOGICAL tempAdvection        LOGICAL tempAdvection
# Line 106  C     rigidLid            - Set to true Line 116  C     rigidLid            - Set to true
116        LOGICAL saltForcing        LOGICAL saltForcing
117        LOGICAL implicitFreeSurface        LOGICAL implicitFreeSurface
118        LOGICAL rigidLid        LOGICAL rigidLid
119          LOGICAL momStepping
120          LOGICAL tempStepping
121          LOGICAL implicitDiffusion
122    
123  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
124  C     cg2dTargetResidual  C     cg2dTargetResidual
# Line 183  C     chkPtFreq  - Frequency of rolling Line 196  C     chkPtFreq  - Frequency of rolling
196  C     pChkPtFreq - Frequency of permanent check pointing ( s ).  C     pChkPtFreq - Frequency of permanent check pointing ( s ).
197  C     dumpFreq  - Frequency with which model state is written to  C     dumpFreq  - Frequency with which model state is written to
198  C                 post-processing files ( s ).  C                 post-processing files ( s ).
199    C     afFacMom  - Advection of momentum term scaling parameter
200    C     vfFacMom  - Momentum viscosity scaling parameter
201    C     pfFacMom  - Momentum pressure forcing parameter
202    C     cfFacMom  - Coriolis term scaling parameter
203    C     foFacMom  - Momentum forcing scaling parameter
204    C     cAdjFreq  - Frequency of convective adjustment
205        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac, delZ, delX, delY,        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac, delZ, delX, delY,
206       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime, phiMin,       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime, phiMin,
207       & thetaMin, rSphere, f0, fCori, beta, viscAh, viscAz, viscA4,       & thetaMin, rSphere, f0, fCori, beta, viscAh, viscAz, viscA4,
# Line 190  C                 post-processing files Line 209  C                 post-processing files
209       & tauCD, rCD, freeSurfFac,       & tauCD, rCD, freeSurfFac,
210       & GMmaxslope,GMlength,GMalpha,GMdepth,GMkbackground,       & GMmaxslope,GMlength,GMalpha,GMdepth,GMkbackground,
211       & gravity, gBaro, rhonil, tRef, sRef,       & gravity, gBaro, rhonil, tRef, sRef,
212       & endTime, chkPtFreq, pchkPtFreq, dumpFreq       & endTime, chkPtFreq, pchkPtFreq, dumpFreq,
213         & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom,
214         & cAdjFreq
215        _RL cg2dTargetResidual        _RL cg2dTargetResidual
216        _RL cg2dpcOffDFac        _RL cg2dpcOffDFac
217        _RL delZ(Nz)        _RL delZ(Nz)
# Line 229  C                 post-processing files Line 250  C                 post-processing files
250        _RL rhonil        _RL rhonil
251        _RL tRef(Nz)        _RL tRef(Nz)
252        _RL sRef(Nz)        _RL sRef(Nz)
253        _RL Fcori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS Fcori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
254        _RL startTime        _RL startTime
255        _RL endTime        _RL endTime
256        _RL chkPtFreq        _RL chkPtFreq
257        _RL pChkPtFreq        _RL pChkPtFreq
258        _RL dumpFreq        _RL dumpFreq
259          _RL afFacMom
260          _RL vfFacMom
261          _RL pfFacMom
262          _RL cfFacMom
263          _RL foFacMom
264          _RL cAdjFreq
265    
266        COMMON /PARM_A/ HeatCapacity_Cp,        COMMON /PARM_A/ HeatCapacity_Cp,
267       &                Lamba_theta       &                Lamba_theta
# Line 243  C                 post-processing files Line 270  C                 post-processing files
270    
271  C Equation of State (polynomial coeffients)  C Equation of State (polynomial coeffients)
272        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS
273        _RL eosC(Nz+1,9),eosSig0(Nz+1),eosRefT(Nz+1),eosRefS(Nz+1)        _RL eosC(9,Nz+1),eosSig0(Nz+1),eosRefT(Nz+1),eosRefS(Nz+1)
274  C Linear equation of state  C Linear equation of state
275  C     tAlpha    - Linear EOS thermal expansion coefficient ( 1/degree ).  C     tAlpha    - Linear EOS thermal expansion coefficient ( 1/degree ).
276  C     sBeta     - Linear EOS haline contraction coefficient.  C     sBeta     - Linear EOS haline contraction coefficient.
277        COMMON /PARM_EOS_LIN/ tAlpha,sBeta        COMMON /PARM_EOS_LIN/ tAlpha,sBeta,eosType
278        _RL tAlpha        _RL tAlpha
279        _RL sBeta        _RL sBeta
280          character*(6) eosType
281    
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.14
  ViewVC Help
Powered by ViewVC 1.1.22