/[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.62 by adcroft, Thu Sep 13 17:43:55 2001 UTC revision 1.63 by cnh, Fri Sep 21 15:13:31 2001 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2  C $Name$  C $Name$
3  C  C
4  C     /==========================================================\  CBOP
5  C     | PARAMS.h                                                 |  C    !ROUTINE: PARAMS.h
6  C     | o Header file defining model "parameters".               |  C    !INTERFACE:
7  C     |==========================================================|  C    include PARAMS.h
8  C     | The values from the model standard input file are        |  C    !DESCRIPTION: \bv
9  C     | stored into the variables held here. Notes describing    |  C     *==========================================================*
10  C     | the parameters can also be found here.                   |  C     | PARAMS.h                                                  
11  C     \==========================================================/  C     | o Header file defining model "parameters".                
12    C     *==========================================================*
13    C     | The values from the model standard input file are        
14    C     | stored into the variables held here. Notes describing    
15    C     | the parameters can also be found here.                    
16    C     *==========================================================*
17    C     \ev
18    CEOP
19    
20  C     Macros for special grid options  C     Macros for special grid options
21  #include "PARAMS_MACROS.h"  #include "PARAMS_MACROS.h"
# Line 21  C     Useful physical values Line 28  C     Useful physical values
28        PARAMETER ( deg2rad = 2.D0*PI/360.D0           )        PARAMETER ( deg2rad = 2.D0*PI/360.D0           )
29    
30  C     Symbolic values  C     Symbolic values
31  C     precXXXX - Used to indicate what precision to use for  C     precXXXX :: Used to indicate what precision to use for
32  C                dumping model state.  C                dumping model state.
33        INTEGER precFloat32        INTEGER precFloat32
34        PARAMETER ( precFloat32 = 32 )        PARAMETER ( precFloat32 = 32 )
35        INTEGER precFloat64        INTEGER precFloat64
36        PARAMETER ( precFloat64 = 64 )        PARAMETER ( precFloat64 = 64 )
37  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
38        Real*8 UNSET_FLOAT8        Real*8 UNSET_FLOAT8
39        PARAMETER ( UNSET_FLOAT8 = 1.234567D5 )        PARAMETER ( UNSET_FLOAT8 = 1.234567D5 )
40        Real*4 UNSET_FLOAT4        Real*4 UNSET_FLOAT4
# Line 44  C     Checkpoint data Line 51  C     Checkpoint data
51        PARAMETER ( maxNoChkptLev = 2 )        PARAMETER ( maxNoChkptLev = 2 )
52    
53  C--   COMMON /PARM_C/ Character valued parameters used by the model.  C--   COMMON /PARM_C/ Character valued parameters used by the model.
54  C     checkPtSuff - List of checkpoint file suffices  C     checkPtSuff :: List of checkpoint file suffices
55  C     bathyFile   - File containing bathymetry. If not defined bathymetry  C     bathyFile   :: File containing bathymetry. If not defined bathymetry
56  C                   is taken from inline function.  C                   is taken from inline function.
57  C     topoFile    - File containing the topography of the surface (unit=m)  C     topoFile    :: File containing the topography of the surface (unit=m)
58  C                   (mainly used for the atmosphere = ground height).  C                   (mainly used for the atmosphere = ground height).
59  C     hydrogThetaFile - File containing initial hydrographic data for potential  C     hydrogThetaFile :: File containing initial hydrographic data for potential
60  C                       temperature.  C                       temperature.
61  C     hydrogSaltFile  - File containing initial hydrographic data for salinity.  C     hydrogSaltFile  :: File containing initial hydrographic data for salinity.
62  C     zonalWindFile   - File containing zonal wind data  C     zonalWindFile   :: File containing zonal wind data
63  C     meridWindFile   - File containing meridional wind data  C     meridWindFile   :: File containing meridional wind data
64  C     thetaClimFile   - File containing theta climataology used  C     thetaClimFile   :: File containing theta climataology used
65  C                       in relaxation term -lambda(theta-theta*)  C                       in relaxation term -lambda(theta-theta*)
66  C     saltClimFile    - File containing salt climataology used  C     saltClimFile    :: File containing salt climataology used
67  C                       in relaxation term -lambda(salt-salt*)  C                       in relaxation term -lambda(salt-salt*)
68  C     surfQfile       - File containing surface heat flux  C     surfQfile       :: File containing surface heat flux
69  C     surfQswfile     - File containing surface shortwave radiation  C     surfQswfile     :: File containing surface shortwave radiation
70  C     dQdTfile        - File containing thermal relaxation coefficient  C     dQdTfile        :: File containing thermal relaxation coefficient
71  C     EmPmRfile       - File containing surface fresh water flux  C     EmPmRfile       :: File containing surface fresh water flux
72  C     buoyancyRelation - Flag used to indicate which relation to use to  C     buoyancyRelation :: Flag used to indicate which relation to use to
73  C                        get buoyancy.  C                        get buoyancy.
74        COMMON /PARM_C/ checkPtSuff,        COMMON /PARM_C/ checkPtSuff,
75       &                bathyFile, topoFile,       &                bathyFile, topoFile,
# Line 90  C                        get buoyancy. Line 97  C                        get buoyancy.
97        CHARACTER*(MAX_LEN_FNAM) dQdTfile        CHARACTER*(MAX_LEN_FNAM) dQdTfile
98    
99  C--   COMMON /PARM_I/ Integer valued parameters used by the model.  C--   COMMON /PARM_I/ Integer valued parameters used by the model.
100  C     cg2dMaxIters        - Maximum number of iterations in the  C     cg2dMaxIters        :: Maximum number of iterations in the
101  C                           two-dimensional con. grad solver.  C                           two-dimensional con. grad solver.
102  C     cg2dChkResFreq      - Frequency with which to check residual  C     cg2dChkResFreq      :: Frequency with which to check residual
103  C                           in con. grad solver.  C                           in con. grad solver.
104  C     cg3dMaxIters        - Maximum number of iterations in the  C     cg3dMaxIters        :: Maximum number of iterations in the
105  C                           three-dimensional con. grad solver.  C                           three-dimensional con. grad solver.
106  C     cg3dChkResFreq      - Frequency with which to check residual  C     cg3dChkResFreq      :: Frequency with which to check residual
107  C                           in con. grad solver.  C                           in con. grad solver.
108  C     nIter0              - Start time-step number of for this run  C     nIter0              :: Start time-step number of for this run
109  C     nTimeSteps          - Number of timesteps to execute  C     nTimeSteps          :: Number of timesteps to execute
110  C     numStepsPerPickup   - For offline setup. Frequency of pickup  C     numStepsPerPickup   :: For offline setup. Frequency of pickup
111  C                           of flow fields.  C                           of flow fields.
112  C     writeStatePrec      - Precision used for writing model state.  C     writeStatePrec      :: Precision used for writing model state.
113  C     writeBinaryPrec     - Precision used for writing binary files  C     writeBinaryPrec     :: Precision used for writing binary files
114  C     readBinaryPrec      - Precision used for reading binary files  C     readBinaryPrec      :: Precision used for reading binary files
115  C     nCheckLev           - Holds current checkpoint level  C     nCheckLev           :: Holds current checkpoint level
116  C     nonlinFreeSurf      - option related to non-linear free surface  C     nonlinFreeSurf      :: option related to non-linear free surface
117  C                           =0 Linear free surface ; >0 Non-linear  C                           =0 Linear free surface ; >0 Non-linear
118    
119        COMMON /PARM_I/        COMMON /PARM_I/
# Line 141  C                           =0 Linear fr Line 148  C                           =0 Linear fr
148        INTEGER tracerAdvScheme        INTEGER tracerAdvScheme
149    
150  C--   COMMON /PARM_L/ Logical valued parameters used by the model.  C--   COMMON /PARM_L/ Logical valued parameters used by the model.
151  C     usingCartesianGrid - If TRUE grid generation will be in a cartesian  C     usingCartesianGrid :: If TRUE grid generation will be in a cartesian
152  C                          coordinate frame.  C                          coordinate frame.
153  C     usingSphericalPolarGrid - If TRUE grid generation will be in a  C     usingSphericalPolarGrid :: If TRUE grid generation will be in a
154  C                               spherical polar frame.  C                               spherical polar frame.
155  C     no_slip_sides - Impose "no-slip" at lateral boundaries.  C     no_slip_sides :: Impose "no-slip" at lateral boundaries.
156  C     no_slip_bottom- Impose "no-slip" at bottom boundary.  C     no_slip_bottom :: Impose "no-slip" at bottom boundary.
157  C     staggerTimeStep - enable a Stagger time stepping T,S Rho then U,V  C     staggerTimeStep :: enable a Stagger time stepping T,S Rho then U,V
158  C     momViscosity  - Flag which turns momentum friction terms on and off.  C     momViscosity  :: Flag which turns momentum friction terms on and off.
159  C     momAdvection  - Flag which turns advection of momentum on and off.  C     momAdvection  :: Flag which turns advection of momentum on and off.
160  C     momForcing    - Flag which turns external forcing of momentum on  C     momForcing    :: Flag which turns external forcing of momentum on
161  C                     and off.  C                     and off.
162  C     momPressureForcing - Flag which turns pressure term in momentum equation  C     momPressureForcing :: Flag which turns pressure term in momentum equation
163  C                          on and off.  C                          on and off.
164  C     metricTerms   - Flag which turns metric terms on or off.  C     metricTerms   :: Flag which turns metric terms on or off.
165  C     usingSphericalPolarMTerms - If TRUE use spherical polar metric terms.  C     usingSphericalPolarMTerms :: If TRUE use spherical polar metric terms.
166  C     useCoriolis   - Flag which turns the coriolis terms on and off.  C     useCoriolis   :: Flag which turns the coriolis terms on and off.
167  C     tempDiffusion - Flag which turns diffusion of temperature on  C     tempDiffusion :: Flag which turns diffusion of temperature on
168  C                     and off.  C                     and off.
169  C     tempAdvection - Flag which turns advection of temperature on  C     tempAdvection :: Flag which turns advection of temperature on
170  C                     and off.  C                     and off.
171  C     tempForcing   - Flag which turns external forcing of temperature on  C     tempForcing   :: Flag which turns external forcing of temperature on
172  C                     and off.  C                     and off.
173  C     saltDiffusion - Flag which turns diffusion of salinit on  C     saltDiffusion :: Flag which turns diffusion of salinit on
174  C                     and off.  C                     and off.
175  C     saltAdvection - Flag which turns advection of salinit on  C     saltAdvection :: Flag which turns advection of salinit on
176  C                     and off.  C                     and off.
177  C     saltForcing   - Flag which turns external forcing of salinit on  C     saltForcing   :: Flag which turns external forcing of salinit on
178  C                     and off.  C                     and off.
179  C     rigidLid            - Set to true to use rigid lid  C     rigidLid            :: Set to true to use rigid lid
180  C     implicitFreeSurface - Set to true to use implcit free surface  C     implicitFreeSurface :: Set to true to use implcit free surface
181  C     exactConserv        - Set to true to conserve exactly the total Volume  C     exactConserv        :: Set to true to conserve exactly the total Volume
182  C     uniformLin_PhiSurf  - Set to true to use a uniform Bo_surf in the  C     uniformLin_PhiSurf  :: Set to true to use a uniform Bo_surf in the
183  C                           linear relation Phi_surf = Bo_surf*eta  C                           linear relation Phi_surf = Bo_surf*eta
184  C     momStepping   - Turns momentum equation time-stepping off  C     momStepping   :: Turns momentum equation time-stepping off
185  C     tempStepping  - Turns temperature equation time-stepping off  C     tempStepping  :: Turns temperature equation time-stepping off
186  C     saltStepping  - Turns salinity equation time-stepping off  C     saltStepping  :: Turns salinity equation time-stepping off
187  C     tr1Stepping   - Turns passive tracer 1 time-stepping on/off  C     tr1Stepping   :: Turns passive tracer 1 time-stepping on/off
188  C     useConstantF  - Coriolis parameter set to f0  C     useConstantF  :: Coriolis parameter set to f0
189  C     useBetaPlaneF - Coriolis parameter set to f0 + beta.y  C     useBetaPlaneF :: Coriolis parameter set to f0 + beta.y
190  C     useSphereF    - Coriolis parameter set to 2.omega.sin(phi)  C     useSphereF    :: Coriolis parameter set to 2.omega.sin(phi)
191  C     implicitDiffusion - Turns implicit vertical diffusion on  C     implicitDiffusion :: Turns implicit vertical diffusion on
192  C     implicitViscosity - Turns implicit vertical viscosity on  C     implicitViscosity :: Turns implicit vertical viscosity on
193  C     doThetaClimRelax - Set true if relaxation to temperature  C     doThetaClimRelax :: Set true if relaxation to temperature
194  C                        climatology is required.  C                        climatology is required.
195  C     doSaltClimRelax  - Set true if relaxation to salinity  C     doSaltClimRelax  :: Set true if relaxation to salinity
196  C                        climatology is required.  C                        climatology is required.
197  C     periodicExternalForcing - Set true if forcing is time-dependant  C     periodicExternalForcing :: Set true if forcing is time-dependant
198  C     usingPCoords     - Set to indicate that we are working in pressure  C     usingPCoords     :: Set to indicate that we are working in pressure
199  C                        coords.  C                        coords.
200  C     usingZCoords     - Set to indicate that we are working in height  C     usingZCoords     :: Set to indicate that we are working in height
201  C                        coords.  C                        coords.
202  C     nonHydrostatic - Using non-hydrostatic terms  C     nonHydrostatic :: Using non-hydrostatic terms
203  C     globalFiles    - Selects between "global" and "tiled" files  C     globalFiles    :: Selects between "global" and "tiled" files
204  C     allowFreezing  - Allows water to freeze and form ice  C     allowFreezing  :: Allows water to freeze and form ice
205  C     groundAtK1  - put the surface(k=1) at the Lower Boundary (=ground)  C     groundAtK1  :: put the surface(k=1) at the Lower Boundary (=ground)
206        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
207       & usingCurvilinearGrid,       & usingCurvilinearGrid,
208       & no_slip_sides,no_slip_bottom,       & no_slip_sides,no_slip_bottom,
# Line 267  C     groundAtK1  - put the surface(k=1) Line 274  C     groundAtK1  - put the surface(k=1)
274    
275  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
276  C     gg2dTargetResidual  C     gg2dTargetResidual
277  C          - Target residual for cg2d solver; no unit (RHS normalisation)  C          :: Target residual for cg2d solver; no unit (RHS normalisation)
278  C     cg2dTargetResWunit  C     cg2dTargetResWunit
279  C          - Target residual for cg2d solver; W unit (No RHS normalisation)  C          :: Target residual for cg2d solver; W unit (No RHS normalisation)
280  C     cg3dTargetResidual  C     cg3dTargetResidual
281  C               - Target residual for cg3d solver.  C               :: Target residual for cg3d solver.
282  C     cg2dpcOffDFac - Averaging weight for preconditioner off-diagonal.  C     cg2dpcOffDFac :: Averaging weight for preconditioner off-diagonal.
283  C     Note. 20th May 1998  C     Note. 20th May 1998
284  C           I made a weird discovery! In the model paper we argue  C           I made a weird discovery! In the model paper we argue
285  C           for the form of the preconditioner used here ( see  C           for the form of the preconditioner used here ( see
# Line 286  C           number of iterations for con Line 293  C           number of iterations for con
293  C           drop form 192 -> 134! Need to investigate this further!  C           drop form 192 -> 134! Need to investigate this further!
294  C           For now I have introduced a parameter cg2dpcOffDFac which  C           For now I have introduced a parameter cg2dpcOffDFac which
295  C           defaults to 0.51 but can be set at runtime.  C           defaults to 0.51 but can be set at runtime.
296  C     delP      - Vertical grid spacing ( Pa ).  C     delP      :: Vertical grid spacing ( Pa ).
297  C     delZ      - Vertical grid spacing ( m  ).  C     delZ      :: Vertical grid spacing ( m  ).
298  C     delR      - Vertical grid spacing ( units of r ).  C     delR      :: Vertical grid spacing ( units of r ).
299  C     delX      - Separation between cell faces (m) or (deg), depending  C     delX      :: Separation between cell faces (m) or (deg), depending
300  C     delY        on input flags.  C     delY        on input flags.
301  C     gravity   - Accel. due to gravity ( m/s^2 )  C     gravity   :: Accel. due to gravity ( m/s^2 )
302  C     recip_gravity and its inverse  C     recip_gravity and its inverse
303  C     gBaro     - Accel. due to gravity used in barotropic equation ( m/s^2 )  C     gBaro     :: Accel. due to gravity used in barotropic equation ( m/s^2 )
304  C     ronil     - Reference density  C     ronil     :: Reference density
305  C     rhoConst  - Vertically constant reference density  C     rhoConst  :: Vertically constant reference density
306  C     startTime - Start time for model ( s )  C     startTime :: Start time for model ( s )
307  C     phiMin    - Latitude of southern most cell face.  C     phiMin    :: Latitude of southern most cell face.
308  C     thetaMin  - Longitude of western most cell face (this  C     thetaMin  :: Longitude of western most cell face (this
309  C                 is an "inert" parameter but it is included  C                 is an "inert" parameter but it is included
310  C                 to make geographical references simple.)  C                 to make geographical references simple.)
311  C     rSphere   - Radius of sphere for a spherical polar grid ( m ).  C     rSphere   :: Radius of sphere for a spherical polar grid ( m ).
312  C     recip_RSphere  - Reciprocal radius of sphere ( m ).  C     recip_RSphere  :: Reciprocal radius of sphere ( m ).
313  C     f0        - Reference coriolis parameter ( 1/s )  C     f0        :: Reference coriolis parameter ( 1/s )
314  C                 ( Southern edge f for beta plane )  C                 ( Southern edge f for beta plane )
315  C     beta      - df/dy ( s^-1.m^-1 )  C     beta      :: df/dy ( s^-1.m^-1 )
316  C     omega     - Angular velocity ( rad/s )  C     omega     :: Angular velocity ( rad/s )
317  C     viscAh    - Eddy viscosity coeff. for mixing of  C     viscAh    :: Eddy viscosity coeff. for mixing of
318  C                 momentum laterally ( m^2/s )  C                 momentum laterally ( m^2/s )
319  C     viscAz    - Eddy viscosity coeff. for mixing of  C     viscAz    :: Eddy viscosity coeff. for mixing of
320  C                 momentum vertically ( m^2/s )  C                 momentum vertically ( m^2/s )
321  C     viscAp    - Eddy viscosity coeff. for mixing of  C     viscAp    :: Eddy viscosity coeff. for mixing of
322  C                 momentum vertically ( Pa^2/s )  C                 momentum vertically ( Pa^2/s )
323  C     viscAr    - Eddy viscosity coeff. for mixing of  C     viscAr    :: Eddy viscosity coeff. for mixing of
324  C                 momentum vertically ( units of r^2/s )  C                 momentum vertically ( units of r^2/s )
325  C     viscA4    - Biharmonic viscosity coeff. for mixing of  C     viscA4    :: Biharmonic viscosity coeff. for mixing of
326  C                 momentum laterally ( m^4/s )  C                 momentum laterally ( m^4/s )
327  C     diffKhT   - Laplacian diffusion coeff. for mixing of  C     diffKhT   :: Laplacian diffusion coeff. for mixing of
328  C                 heat laterally ( m^2/s )  C                 heat laterally ( m^2/s )
329  C     diffKzT   - Laplacian diffusion coeff. for mixing of  C     diffKzT   :: Laplacian diffusion coeff. for mixing of
330  C                 heat vertically ( m^2/s )  C                 heat vertically ( m^2/s )
331  C     diffKpT   - Laplacian diffusion coeff. for mixing of  C     diffKpT   :: Laplacian diffusion coeff. for mixing of
332  C                 heat vertically ( Pa^2/s )  C                 heat vertically ( Pa^2/s )
333  C     diffKrT   - Laplacian diffusion coeff. for mixing of  C     diffKrT   :: Laplacian diffusion coeff. for mixing of
334  C                 heat vertically ( units of r^2/s )  C                 heat vertically ( units of r^2/s )
335  C     diffK4T   - Biharmonic diffusion coeff. for mixing of  C     diffK4T   :: Biharmonic diffusion coeff. for mixing of
336  C                 heat laterally ( m^4/s )  C                 heat laterally ( m^4/s )
337  C     diffKhS  -  Laplacian diffusion coeff. for mixing of  C     diffKhS  ::  Laplacian diffusion coeff. for mixing of
338  C                 salt laterally ( m^2/s )  C                 salt laterally ( m^2/s )
339  C     diffKzS   - Laplacian diffusion coeff. for mixing of  C     diffKzS   :: Laplacian diffusion coeff. for mixing of
340  C                 salt vertically ( m^2/s )  C                 salt vertically ( m^2/s )
341  C     diffKpS   - Laplacian diffusion coeff. for mixing of  C     diffKpS   :: Laplacian diffusion coeff. for mixing of
342  C                 salt vertically ( Pa^2/s )  C                 salt vertically ( Pa^2/s )
343  C     diffKrS   - Laplacian diffusion coeff. for mixing of  C     diffKrS   :: Laplacian diffusion coeff. for mixing of
344  C                 salt vertically ( units of r^2/s )  C                 salt vertically ( units of r^2/s )
345  C     diffK4S   - Biharmonic diffusion coeff. for mixing of  C     diffK4S   :: Biharmonic diffusion coeff. for mixing of
346  C                 salt laterally ( m^4/s )  C                 salt laterally ( m^4/s )
347  C     deltaT    - Default timestep ( s )  C     deltaT    :: Default timestep ( s )
348  C     deltaTClock  - Timestep used as model "clock". This determines the  C     deltaTClock  :: Timestep used as model "clock". This determines the
349  C                    IO frequencies and is used in tagging output. It can  C                    IO frequencies and is used in tagging output. It can
350  C                    be totally different to the dynamical time. Typically  C                    be totally different to the dynamical time. Typically
351  C                    it will be the deep-water timestep for accelerated runs.  C                    it will be the deep-water timestep for accelerated runs.
352  C                    Frequency of checkpointing and dumping of the model state  C                    Frequency of checkpointing and dumping of the model state
353  C                    are referenced to this clock. ( s )  C                    are referenced to this clock. ( s )
354  C     deltaTMom    - Timestep for momemtum equations ( s )  C     deltaTMom    :: Timestep for momemtum equations ( s )
355  C     deltaTtracer - Timestep for tracer equations ( s )  C     deltaTtracer :: Timestep for tracer equations ( s )
356  C     freesurfFac  - Parameter to turn implicit free surface term on or off  C     freesurfFac  :: Parameter to turn implicit free surface term on or off
357  C                    freesurfac = 1. uses implicit free surface  C                    freesurfac = 1. uses implicit free surface
358  C                    freesurfac = 0. uses rigid lid  C                    freesurfac = 0. uses rigid lid
359  C     implicSurfPress - parameter of the Crank-Nickelson time stepping :  C     implicSurfPress :: parameter of the Crank-Nickelson time stepping :
360  C                     Implicit part of Surface Pressure Gradient ( 0-1 )  C                     Implicit part of Surface Pressure Gradient ( 0-1 )
361  C     implicDiv2Dflow - parameter of the Crank-Nickelson time stepping :  C     implicDiv2Dflow :: parameter of the Crank-Nickelson time stepping :
362  C                     Implicit part of barotropic flow Divergence ( 0-1 )  C                     Implicit part of barotropic flow Divergence ( 0-1 )
363  C     hFacMin      - Minimum fraction size of a cell (affects hFacC etc...)  C     hFacMin      :: Minimum fraction size of a cell (affects hFacC etc...)
364  C     hFacMinDz    - Minimum dimesional size of a cell (affects hFacC etc..., m)  C     hFacMinDz    :: Minimum dimesional size of a cell (affects hFacC etc..., m)
365  C     hFacMinDp    - Minimum dimesional size of a cell (affects hFacC etc..., Pa)  C     hFacMinDp    :: Minimum dimesional size of a cell (affects hFacC etc..., Pa)
366  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)
367  C     hFacInf      - Threshold (inf and sup) for fraction size of surface cell  C     hFacInf      :: Threshold (inf and sup) for fraction size of surface cell
368  C     hFacSup        that control vanishing and creating levels  C     hFacSup        that control vanishing and creating levels
369  C     tauCD        - CD scheme coupling timescale ( 1/s )  C     tauCD        :: CD scheme coupling timescale ( 1/s )
370  C     rCD          - CD scheme normalised coupling parameter ( 0-1 )  C     rCD          :: CD scheme normalised coupling parameter ( 0-1 )
371  C     startTime     - Starting time for this integration ( s ).  C     startTime     :: Starting time for this integration ( s ).
372  C     endTime       - Ending time for this integration ( s ).  C     endTime       :: Ending time for this integration ( s ).
373  C     chkPtFreq     - Frequency of rolling check pointing ( s ).  C     chkPtFreq     :: Frequency of rolling check pointing ( s ).
374  C     pChkPtFreq    - Frequency of permanent check pointing ( s ).  C     pChkPtFreq    :: Frequency of permanent check pointing ( s ).
375  C     dumpFreq      - Frequency with which model state is written to  C     dumpFreq      :: Frequency with which model state is written to
376  C                     post-processing files ( s ).  C                     post-processing files ( s ).
377  C     diagFreq      - Frequency with which model writes diagnostic output  C     diagFreq      :: Frequency with which model writes diagnostic output
378  C                     of intermediate quantities.  C                     of intermediate quantities.
379  C     afFacMom      - Advection of momentum term tracer parameter  C     afFacMom      :: Advection of momentum term tracer parameter
380  C     vfFacMom      - Momentum viscosity tracer parameter  C     vfFacMom      :: Momentum viscosity tracer parameter
381  C     pfFacMom      - Momentum pressure forcing tracer parameter  C     pfFacMom      :: Momentum pressure forcing tracer parameter
382  C     cfFacMom      - Coriolis term tracer parameter  C     cfFacMom      :: Coriolis term tracer parameter
383  C     foFacMom      - Momentum forcing tracer parameter  C     foFacMom      :: Momentum forcing tracer parameter
384  C     mtFacMom      - Metric terms tracer parameter  C     mtFacMom      :: Metric terms tracer parameter
385  C     cosPower      - Power of cosine of latitude to multiply viscosity  C     cosPower      :: Power of cosine of latitude to multiply viscosity
386  C     cAdjFreq      - Frequency of convective adjustment  C     cAdjFreq      :: Frequency of convective adjustment
387  C  C
388  C     taveFreq      - Frequency with which time-averaged model state is written to  C     taveFreq      :: Frequency with which time-averaged model state is written to
389  C                     post-processing files ( s ).  C                     post-processing files ( s ).
390  C     tauThetaClimRelax - Relaxation to climatology time scale ( s ).  C     tauThetaClimRelax :: Relaxation to climatology time scale ( s ).
391  C     lambdaThetaClimRelax - Inverse time scale for relaxation ( 1/s ).  C     lambdaThetaClimRelax :: Inverse time scale for relaxation ( 1/s ).
392  C     tauSaltClimRelax - Relaxation to climatology time scale ( s ).  C     tauSaltClimRelax :: Relaxation to climatology time scale ( s ).
393  C     lambdaSaltClimRelax - Inverse time scale for relaxation ( 1/s ).  C     lambdaSaltClimRelax :: Inverse time scale for relaxation ( 1/s ).
394  C     externForcingPeriod - Is the period of which forcing varies (eg. 1 month)  C     externForcingPeriod :: Is the period of which forcing varies (eg. 1 month)
395  C     externForcingCycle - Is the repeat time of the forcing (eg. 1 year)  C     externForcingCycle :: Is the repeat time of the forcing (eg. 1 year)
396  C                          (note: externForcingCycle must be an integer  C                          (note: externForcingCycle must be an integer
397  C                           number times externForcingPeriod)  C                           number times externForcingPeriod)
398  C     horiVertRatio      - Ratio on units in vertical to units in horizontal.  C     horiVertRatio      :: Ratio on units in vertical to units in horizontal.
399  C     recip_horiVertRatio  ( 1 if horiz in m and vertical in m ).  C     recip_horiVertRatio  ( 1 if horiz in m and vertical in m ).
400  C                          ( g*rho if horiz in m and vertical in Pa ).  C                          ( g*rho if horiz in m and vertical in Pa ).
401  C     latFFTFiltLo       - Low latitude for FFT filtering of latitude  C     latFFTFiltLo       :: Low latitude for FFT filtering of latitude
402  C                          circles ( see filter*.F )  C                          circles ( see filter*.F )
403  C     Ro_SeaLevel        - standard position of Sea-Level in "R" coordinate, used as  C     Ro_SeaLevel        :: standard position of Sea-Level in "R" coordinate, used as
404  C                          starting value (k=1) for vertical coordinate (rf(1)=Ro_SeaLevel)  C                          starting value (k=1) for vertical coordinate (rf(1)=Ro_SeaLevel)
405  C     bottomDragLinear   - Drag coefficient built in to core dynamics  C     bottomDragLinear   :: Drag coefficient built in to core dynamics
406  C         "     Quadratic  ( linear: 1/s, quadratic: 1/m )  C         "     Quadratic  ( linear: 1/s, quadratic: 1/m )
407        COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit,        COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit,
408       & cg2dpcOffDFac, cg3dTargetResidual,       & cg2dpcOffDFac, cg3dTargetResidual,
# Line 529  C Equation of State (polynomial coeffien Line 536  C Equation of State (polynomial coeffien
536        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS
537        _RL eosC(9,Nr+1),eosSig0(Nr+1),eosRefT(Nr+1),eosRefS(Nr+1)        _RL eosC(9,Nr+1),eosSig0(Nr+1),eosRefT(Nr+1),eosRefS(Nr+1)
538  C Linear equation of state  C Linear equation of state
539  C     tAlpha    - Linear EOS thermal expansion coefficient ( 1/degree ).  C     tAlpha    :: Linear EOS thermal expansion coefficient ( 1/degree ).
540  C     sBeta     - Linear EOS haline contraction coefficient.  C     sBeta     :: Linear EOS haline contraction coefficient.
541        COMMON /PARM_EOS_LIN/ tAlpha,sBeta,eosType        COMMON /PARM_EOS_LIN/ tAlpha,sBeta,eosType
542        _RL tAlpha        _RL tAlpha
543        _RL sBeta        _RL sBeta
544        character*(6) eosType        character*(6) eosType
545    
546  C Atmospheric physical parameters (Ideal Gas EOS, ...)  C Atmospheric physical parameters (Ideal Gas EOS, ...)
547  C     atm_po    - standard reference pressure  C     atm_po    :: standard reference pressure
548  C     atm_cp    - specific heat (Cp) of the (dry) air at constant pressure  C     atm_cp    :: specific heat (Cp) of the (dry) air at constant pressure
549  C     atm_kappa - kappa = R/Cp (R: constant of Ideal Gas EOS)  C     atm_kappa :: kappa = R/Cp (R: constant of Ideal Gas EOS)
550  C     Integr_GeoPot - option to select the way we integrate the geopotential  C     Integr_GeoPot :: option to select the way we integrate the geopotential
551  C                     (still a subject of discussions ...)  C                     (still a subject of discussions ...)
552        COMMON /PARM_ATM/ atm_cp, atm_kappa, atm_po,        COMMON /PARM_ATM/ atm_cp, atm_kappa, atm_po,
553       &                  Integr_GeoPot       &                  Integr_GeoPot

Legend:
Removed from v.1.62  
changed lines
  Added in v.1.63

  ViewVC Help
Powered by ViewVC 1.1.22