/[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.38 by adcroft, Wed May 5 18:32:34 1999 UTC revision 1.44 by adcroft, Wed Jun 21 19:21:44 2000 UTC
# Line 63  C                        get buoyancy. Line 63  C                        get buoyancy.
63       &                bathyFile, hydrogThetaFile, hydrogSaltFile,       &                bathyFile, hydrogThetaFile, hydrogSaltFile,
64       &                zonalWindFile, meridWindFile, thetaClimFile,       &                zonalWindFile, meridWindFile, thetaClimFile,
65       &                saltClimFile, buoyancyRelation,       &                saltClimFile, buoyancyRelation,
66       &                EmPmRfile,surfQfile       &                EmPmRfile, surfQfile,
67         &                uVelInitFile, vVelInitFile, pSurfInitFile
68        CHARACTER*(5) checkPtSuff(maxNoChkptLev)        CHARACTER*(5) checkPtSuff(maxNoChkptLev)
69        CHARACTER*(MAX_LEN_FNAM) bathyFile        CHARACTER*(MAX_LEN_FNAM) bathyFile
70        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile
# Line 75  C                        get buoyancy. Line 76  C                        get buoyancy.
76        CHARACTER*(MAX_LEN_FNAM) surfQfile        CHARACTER*(MAX_LEN_FNAM) surfQfile
77        CHARACTER*(MAX_LEN_FNAM) EmPmRfile        CHARACTER*(MAX_LEN_FNAM) EmPmRfile
78        CHARACTER*(MAX_LEN_FNAM) buoyancyRelation        CHARACTER*(MAX_LEN_FNAM) buoyancyRelation
79          CHARACTER*(MAX_LEN_FNAM) uVelInitFile
80          CHARACTER*(MAX_LEN_FNAM) vVelInitFile
81          CHARACTER*(MAX_LEN_FNAM) pSurfInitFile
82    
83  C--   COMMON /PARM_I/ Integer valued parameters used by the model.  C--   COMMON /PARM_I/ Integer valued parameters used by the model.
84  C     cg2dMaxIters        - Maximum number of iterations in the  C     cg2dMaxIters        - Maximum number of iterations in the
# Line 105  C                           etc... Line 109  C                           etc...
109       &        cg2dChkResFreq,       &        cg2dChkResFreq,
110       &        cg3dMaxIters,       &        cg3dMaxIters,
111       &        cg3dChkResFreq,       &        cg3dChkResFreq,
112       &        nIter0, nTimeSteps,       &        nIter0, nTimeSteps, nEndIter,
113       &        numStepsPerPickup,       &        numStepsPerPickup,
114       &        writeStatePrec, nCheckLev,       &        writeStatePrec, nCheckLev,
115       &        writeBinaryPrec, readBinaryPrec,       &        writeBinaryPrec, readBinaryPrec,
# Line 116  C                           etc... Line 120  C                           etc...
120        INTEGER cg3dChkResFreq        INTEGER cg3dChkResFreq
121        INTEGER nIter0        INTEGER nIter0
122        INTEGER nTimeSteps        INTEGER nTimeSteps
123          INTEGER nEndIter
124        INTEGER numStepsPerPickup        INTEGER numStepsPerPickup
125        INTEGER writeStatePrec        INTEGER writeStatePrec
126        INTEGER writeBinaryPrec        INTEGER writeBinaryPrec
# Line 160  C     useConstantF  - Coriolis parameter Line 165  C     useConstantF  - Coriolis parameter
165  C     useBetaPlaneF - Coriolis parameter set to f0 + beta.y  C     useBetaPlaneF - Coriolis parameter set to f0 + beta.y
166  C     useSphereF    - Coriolis parameter set to 2.omega.sin(phi)  C     useSphereF    - Coriolis parameter set to 2.omega.sin(phi)
167  C     implicitDiffusion - Turns implicit vertical diffusion on  C     implicitDiffusion - Turns implicit vertical diffusion on
168    C     implicitViscosity - Turns implicit vertical viscosity on
169  C     doThetaClimRelax - Set true if relaxation to temperature  C     doThetaClimRelax - Set true if relaxation to temperature
170  C                        climatology is required.  C                        climatology is required.
171  C     doSaltClimRelax  - Set true if relaxation to salinity  C     doSaltClimRelax  - Set true if relaxation to salinity
# Line 182  C     allowFreezing  - Allows water to f Line 188  C     allowFreezing  - Allows water to f
188       & momStepping, tempStepping, saltStepping,       & momStepping, tempStepping, saltStepping,
189       & metricTerms, usingSphericalPolarMTerms,       & metricTerms, usingSphericalPolarMTerms,
190       & useConstantF, useBetaPlaneF, useSphereF,       & useConstantF, useBetaPlaneF, useSphereF,
191       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,       & implicitDiffusion, implicitViscosity,
192         & doThetaClimRelax, doSaltClimRelax,
193       & periodicExternalForcing, usingPCoords, usingZCoords,       & periodicExternalForcing, usingPCoords, usingZCoords,
194       & openBoundaries, nonHydrostatic, globalFiles,       & openBoundaries, nonHydrostatic, globalFiles,
195       & allowFreezing       & allowFreezing
# Line 212  C     allowFreezing  - Allows water to f Line 219  C     allowFreezing  - Allows water to f
219        LOGICAL useBetaPlaneF        LOGICAL useBetaPlaneF
220        LOGICAL useSphereF        LOGICAL useSphereF
221        LOGICAL implicitDiffusion        LOGICAL implicitDiffusion
222          LOGICAL implicitViscosity
223        LOGICAL doThetaClimRelax        LOGICAL doThetaClimRelax
224        LOGICAL doSaltClimRelax        LOGICAL doSaltClimRelax
225        LOGICAL periodicExternalForcing        LOGICAL periodicExternalForcing
# Line 310  C     hFacMinDp    - Minimum dimesional Line 318  C     hFacMinDp    - Minimum dimesional
318  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)
319  C     tauCD        - CD scheme coupling timescale ( 1/s )  C     tauCD        - CD scheme coupling timescale ( 1/s )
320  C     rCD          - CD scheme normalised coupling parameter ( 0-1 )  C     rCD          - CD scheme normalised coupling parameter ( 0-1 )
 C     GMmaxslope    - max. slope allowed in GM/Redi tensor  
 C     GMlength      - Length to use in Visbeck et al. formula for K (m)  
 C     GMalpha       - alpha to use in Visbeck et al. formula for K  
 C     GMdepth       - Depth over which to integrate Richardson # (Visbeck et al.)  
 C     GMkbackground - background value of GM/Redi diffusion coefficient ( m^2/s )  
 C     GMmaxval      - max. value of KapGM allowed in GM/Redi scheme ( m^2/s )  
321  C     startTime     - Starting time for this integration ( s ).  C     startTime     - Starting time for this integration ( s ).
322  C     endTime       - Ending time for this integration ( s ).  C     endTime       - Ending time for this integration ( s ).
323  C     chkPtFreq     - Frequency of rolling check pointing ( s ).  C     chkPtFreq     - Frequency of rolling check pointing ( s ).
# Line 328  C     pfFacMom      - Momentum pressure Line 330  C     pfFacMom      - Momentum pressure
330  C     cfFacMom      - Coriolis term tracer parameter  C     cfFacMom      - Coriolis term tracer parameter
331  C     foFacMom      - Momentum forcing tracer parameter  C     foFacMom      - Momentum forcing tracer parameter
332  C     mtFacMom      - Metric terms tracer parameter  C     mtFacMom      - Metric terms tracer parameter
333    C     cosPower      - Power of cosine of latitude to multiply viscosity
334  C     cAdjFreq      - Frequency of convective adjustment  C     cAdjFreq      - Frequency of convective adjustment
335  C  C
336  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 354  C                          circles ( see Line 357  C                          circles ( see
357       & diffKhT, diffKzT, diffK4T, diffKrT,       & diffKhT, diffKzT, diffK4T, diffKrT,
358       & diffKhS, diffKzS, diffK4S, diffKrS,       & diffKhS, diffKzS, diffK4S, diffKrS,
359       & delT, tauCD, rCD, freeSurfFac, hFacMin, hFacMinDz,       & delT, tauCD, rCD, freeSurfFac, hFacMin, hFacMinDz,
      & GMmaxslope,GMlength,GMalpha,GMdepth,GMkbackground,GMmaxval,  
360       & gravity, recip_Gravity, gBaro, rhonil, recip_rhonil,       & gravity, recip_Gravity, gBaro, rhonil, recip_rhonil,
361       & recip_rhoConst, rhoConst, tRef, sRef,       & recip_rhoConst, rhoConst, tRef, sRef,
362       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq,       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq,
363       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,
364         & cosPower,
365       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,
366       & tauSaltClimRelax, lambdaSaltClimRelax,       & tauSaltClimRelax, lambdaSaltClimRelax,
367       & externForcingCycle, externForcingPeriod,       & externForcingCycle, externForcingPeriod,
368       & viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp,       & viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp,
369       & theta_S, specVol_S, horiVertRatio, recip_horiVertRatio,       & theta_S, specVol_S, horiVertRatio, recip_horiVertRatio,
370       & latFFTFiltLo       & latFFTFiltLo, ivdc_kappa
371    
372        _RL cg2dTargetResidual        _RL cg2dTargetResidual
373        _RL cg3dTargetResidual        _RL cg3dTargetResidual
# Line 408  C                          circles ( see Line 411  C                          circles ( see
411        _RL delt        _RL delt
412        _RL tauCD        _RL tauCD
413        _RL rCD        _RL rCD
       _RL GMmaxslope  
       _RL GMlength  
       _RL GMalpha  
       _RL GMdepth  
       _RL GMkbackground  
       _RL GMmaxval  
414        _RL gravity        _RL gravity
415        _RL recip_gravity        _RL recip_gravity
416        _RL gBaro        _RL gBaro
# Line 438  C                          circles ( see Line 435  C                          circles ( see
435        _RL cfFacMom        _RL cfFacMom
436        _RL foFacMom        _RL foFacMom
437        _RL mTFacMom        _RL mTFacMom
438          _RL cosPower
439        _RL cAdjFreq        _RL cAdjFreq
440        _RL omega        _RL omega
441        _RL tauThetaClimRelax        _RL tauThetaClimRelax
# Line 449  C                          circles ( see Line 447  C                          circles ( see
447        _RL horiVertRatio        _RL horiVertRatio
448        _RL recip_horiVertRatio        _RL recip_horiVertRatio
449        _RL latFFTFiltLo        _RL latFFTFiltLo
450          _RL ivdc_kappa
451    
452        COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp,        COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp,
453       &                Lamba_theta       &                Lamba_theta
# Line 494  C Line 493  C
493        INTEGER OB_Jsouth(Nx)        INTEGER OB_Jsouth(Nx)
494        INTEGER OB_Ieast(Ny)        INTEGER OB_Ieast(Ny)
495        INTEGER OB_Iwest(Ny)        INTEGER OB_Iwest(Ny)
496    
497    C Logical flags for selecting packages
498          LOGICAL use_KPPmixing
499          LOGICAL use_GMRedi
500          COMMON /PARM_PACKAGES/
501         &        use_KPPmixing,use_GMRedi
Legend:
Removed from v.1.38  
changed lines
  Added in v.1.44
  ViewVC Help
Powered by ViewVC 1.1.22