/[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.85 by dimitri, Tue Feb 18 05:33:53 2003 UTC revision 1.89 by jmc, Thu Apr 17 13:11:31 2003 UTC
# Line 73  C     pLoadFile       :: File containing Line 73  C     pLoadFile       :: File containing
73  C     buoyancyRelation :: Flag used to indicate which relation to use to  C     buoyancyRelation :: Flag used to indicate which relation to use to
74  C                        get buoyancy.  C                        get buoyancy.
75  C     eosType         :: choose the equation of state:  C     eosType         :: choose the equation of state:
76  C                        LINEAR, POLY3, UNESCO, JMD95Z, JMD95P  C                        LINEAR, POLY3, UNESCO, JMD95Z, JMD95P, MDJWF, IDEALGAS
77        COMMON /PARM_C/ checkPtSuff,        COMMON /PARM_C/ checkPtSuff,
78       &                bathyFile, topoFile,       &                bathyFile, topoFile,
79       &                hydrogThetaFile, hydrogSaltFile,       &                hydrogThetaFile, hydrogSaltFile,
# Line 198  C     tr1Stepping   :: Turns passive tra Line 198  C     tr1Stepping   :: Turns passive tra
198  C     useConstantF  :: Coriolis parameter set to f0  C     useConstantF  :: Coriolis parameter set to f0
199  C     useBetaPlaneF :: Coriolis parameter set to f0 + beta.y  C     useBetaPlaneF :: Coriolis parameter set to f0 + beta.y
200  C     useSphereF    :: Coriolis parameter set to 2.omega.sin(phi)  C     useSphereF    :: Coriolis parameter set to 2.omega.sin(phi)
201    C     useCDscheme   :: use CD-scheme to calculate Coriolis terms.
202  C     useJamartWetPoints :: Use wet-point method for Coriolis (Jamart and Ozer, 1986)  C     useJamartWetPoints :: Use wet-point method for Coriolis (Jamart and Ozer, 1986)
203  C     implicitDiffusion :: Turns implicit vertical diffusion on  C     implicitDiffusion :: Turns implicit vertical diffusion on
204  C     implicitViscosity :: Turns implicit vertical viscosity on  C     implicitViscosity :: Turns implicit vertical viscosity on
# Line 210  C     doSaltClimRelax  :: Set true if re Line 211  C     doSaltClimRelax  :: Set true if re
211  C                        climatology is required.  C                        climatology is required.
212  C     periodicExternalForcing :: Set true if forcing is time-dependant  C     periodicExternalForcing :: Set true if forcing is time-dependant
213  C     usingPCoords     :: Set to indicate that we are working in pressure  C     usingPCoords     :: Set to indicate that we are working in pressure
214  C                        coords.  C                        coords. (jmc: is it still used ?)
215  C     usingZCoords     :: Set to indicate that we are working in height  C     usingZCoords     :: Set to indicate that we are working in height
216  C                        coords.  C                        coords. (jmc: is it still used ?)
217    C     useDynP_inEos_Zc :: use the dynamical pressure in EOS (with Z-coord.)
218    C                         this requires specific code for restart & exchange
219  C     setCenterDr    :: set cell Center depth and put Interface at the middle  C     setCenterDr    :: set cell Center depth and put Interface at the middle
220  C     nonHydrostatic :: Using non-hydrostatic terms  C     nonHydrostatic :: Using non-hydrostatic terms
221  C     quasiHydrostatic :: Using non-hydrostatic terms in hydrostatic algorithm  C     quasiHydrostatic :: Using non-hydrostatic terms in hydrostatic algorithm
# Line 236  C     groundAtK1  :: put the surface(k=1 Line 239  C     groundAtK1  :: put the surface(k=1
239       & momStepping, tempStepping, saltStepping, tr1Stepping,       & momStepping, tempStepping, saltStepping, tr1Stepping,
240       & metricTerms, usingSphericalPolarMTerms, useNHMTerms,       & metricTerms, usingSphericalPolarMTerms, useNHMTerms,
241       & useConstantF, useBetaPlaneF, useSphereF,       & useConstantF, useBetaPlaneF, useSphereF,
242         & useCDscheme,
243       & useEnergyConservingCoriolis, useJamartWetPoints,       & useEnergyConservingCoriolis, useJamartWetPoints,
244       & implicitDiffusion, implicitViscosity,       & implicitDiffusion, implicitViscosity,
245       & multiDimAdvection, forcing_In_AB,       & multiDimAdvection, forcing_In_AB,
246       & doThetaClimRelax, doSaltClimRelax, doTr1ClimRelax,       & doThetaClimRelax, doSaltClimRelax, doTr1ClimRelax,
247       & periodicExternalForcing,       & periodicExternalForcing,
248       & usingPCoords, usingZCoords, setCenterDr,       & usingPCoords, usingZCoords, useDynP_inEos_Zc, setCenterDr,
249       & nonHydrostatic, quasiHydrostatic, globalFiles, useSingleCpuIO,       & nonHydrostatic, quasiHydrostatic, globalFiles, useSingleCpuIO,
250       & allowFreezing, groundAtK1,       & allowFreezing, groundAtK1,
251       & usePickupBeforeC35, debugMode,       & usePickupBeforeC35, debugMode,
# Line 279  C     groundAtK1  :: put the surface(k=1 Line 283  C     groundAtK1  :: put the surface(k=1
283        LOGICAL useConstantF        LOGICAL useConstantF
284        LOGICAL useBetaPlaneF        LOGICAL useBetaPlaneF
285        LOGICAL useSphereF        LOGICAL useSphereF
286          LOGICAL useCDscheme
287        LOGICAL useEnergyConservingCoriolis        LOGICAL useEnergyConservingCoriolis
288        LOGICAL useJamartWetPoints        LOGICAL useJamartWetPoints
289        LOGICAL implicitDiffusion        LOGICAL implicitDiffusion
# Line 291  C     groundAtK1  :: put the surface(k=1 Line 296  C     groundAtK1  :: put the surface(k=1
296        LOGICAL periodicExternalForcing        LOGICAL periodicExternalForcing
297        LOGICAL usingPCoords        LOGICAL usingPCoords
298        LOGICAL usingZCoords        LOGICAL usingZCoords
299          LOGICAL useDynP_inEos_Zc
300        LOGICAL setCenterDr        LOGICAL setCenterDr
301        LOGICAL nonHydrostatic        LOGICAL nonHydrostatic
302        LOGICAL quasiHydrostatic        LOGICAL quasiHydrostatic
# Line 347  C     f0        :: Reference coriolis pa Line 353  C     f0        :: Reference coriolis pa
353  C                 ( Southern edge f for beta plane )  C                 ( Southern edge f for beta plane )
354  C     beta      :: df/dy ( s^-1.m^-1 )  C     beta      :: df/dy ( s^-1.m^-1 )
355  C     omega     :: Angular velocity ( rad/s )  C     omega     :: Angular velocity ( rad/s )
356    C     rotationPeriod :: Rotation period (s) (= 2.pi/omega)
357  C     viscAh    :: Eddy viscosity coeff. for mixing of  C     viscAh    :: Eddy viscosity coeff. for mixing of
358  C                 momentum laterally ( m^2/s )  C                 momentum laterally ( m^2/s )
359  C     viscAz    :: Eddy viscosity coeff. for mixing of  C     viscAz    :: Eddy viscosity coeff. for mixing of
# Line 465  C      --"-"--  Quadratic  ( linear: 1/s Line 472  C      --"-"--  Quadratic  ( linear: 1/s
472       & endTime, chkPtFreq, pchkPtFreq, dumpFreq,       & endTime, chkPtFreq, pchkPtFreq, dumpFreq,
473       & diagFreq, taveFreq, tave_lastIter, monitorFreq,       & diagFreq, taveFreq, tave_lastIter, monitorFreq,
474       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,
475       & cosPower, cAdjFreq, omega,       & cosPower, cAdjFreq, omega, rotationPeriod,
476       & tauThetaClimRelax, lambdaThetaClimRelax,       & tauThetaClimRelax, lambdaThetaClimRelax,
477       & tauSaltClimRelax, lambdaSaltClimRelax,       & tauSaltClimRelax, lambdaSaltClimRelax,
478       & tauTr1ClimRelax, lambdaTr1ClimRelax,       & tauTr1ClimRelax, lambdaTr1ClimRelax,
# Line 559  C      --"-"--  Quadratic  ( linear: 1/s Line 566  C      --"-"--  Quadratic  ( linear: 1/s
566        _RL cosPower        _RL cosPower
567        _RL cAdjFreq        _RL cAdjFreq
568        _RL omega        _RL omega
569          _RL rotationPeriod
570        _RL tauThetaClimRelax        _RL tauThetaClimRelax
571        _RL lambdaThetaClimRelax        _RL lambdaThetaClimRelax
572        _RL tauSaltClimRelax        _RL tauSaltClimRelax
# Line 584  C      --"-"--  Quadratic  ( linear: 1/s Line 592  C      --"-"--  Quadratic  ( linear: 1/s
592        _RL Lamba_theta        _RL Lamba_theta
593        _RL recip_Cp        _RL recip_Cp
594    
 CmlC Equation of State (polynomial coeffients)  
 Cml      COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS  
 Cml      _RL eosC(9,Nr+1),eosSig0(Nr+1),eosRefT(Nr+1),eosRefS(Nr+1)  
 CmlC Linear equation of state  
 CmlC     tAlpha    :: Linear EOS thermal expansion coefficient ( 1/degree ).  
 CmlC     sBeta     :: Linear EOS haline contraction coefficient.  
 Cml      COMMON /PARM_EOS_LIN/ tAlpha,sBeta,eosType  
 Cml      _RL tAlpha  
 Cml      _RL sBeta  
   
595  C Atmospheric physical parameters (Ideal Gas EOS, ...)  C Atmospheric physical parameters (Ideal Gas EOS, ...)
596  C     atm_Po    :: standard reference pressure  C     atm_Po    :: standard reference pressure
597  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
# Line 619  C Logical flags for selecting packages Line 617  C Logical flags for selecting packages
617        LOGICAL useZONAL_FILT        LOGICAL useZONAL_FILT
618        LOGICAL useFLT        LOGICAL useFLT
619        LOGICAL usePTRACERS        LOGICAL usePTRACERS
620          LOGICAL useSBO
621        LOGICAL useSEAICE        LOGICAL useSEAICE
622  cswdblk -- add ---  cswdblk -- add ---
623        LOGICAL useBulkforce        LOGICAL useBulkforce
# Line 627  cswdblk --- end add --- Line 626  cswdblk --- end add ---
626        COMMON /PARM_PACKAGES/        COMMON /PARM_PACKAGES/
627       &        useKPP, useGMRedi, useOBCS, useAIM, useECCO,       &        useKPP, useGMRedi, useOBCS, useAIM, useECCO,
628       &        useSHAP_FILT, useZONAL_FILT, useGrdchk, useFLT,       &        useSHAP_FILT, useZONAL_FILT, useGrdchk, useFLT,
629       &        usePTRACERS, useSEAICE,       &        usePTRACERS,  useSBO, useSEAICE,
630  cswdblk -- add ---  cswdblk -- add ---
631       &        useThermSEAICE, useBulkforce       &        useThermSEAICE, useBulkforce
632  cswdblk --- end add ---  cswdblk --- end add ---
Legend:
Removed from v.1.85  
changed lines
  Added in v.1.89
  ViewVC Help
Powered by ViewVC 1.1.22