/[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.73 by mlosch, Wed Jul 31 16:38:30 2002 UTC revision 1.75 by mlosch, Wed Sep 25 19:36:50 2002 UTC
# Line 72  C     EmPmRfile       :: File containing Line 72  C     EmPmRfile       :: File containing
72  C     pLoadFile       :: File containing pressure loading  C     pLoadFile       :: File containing pressure loading
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:
76    C                        LINEAR, POLY3, UNESCO, JMD95Z, JMD95P
77        COMMON /PARM_C/ checkPtSuff,        COMMON /PARM_C/ checkPtSuff,
78       &                bathyFile, topoFile,       &                bathyFile, topoFile,
79       &                hydrogThetaFile, hydrogSaltFile,       &                hydrogThetaFile, hydrogSaltFile,
# Line 79  C                        get buoyancy. Line 81  C                        get buoyancy.
81       &                saltClimFile, buoyancyRelation,       &                saltClimFile, buoyancyRelation,
82       &                EmPmRfile, surfQfile, surfQswfile,       &                EmPmRfile, surfQfile, surfQswfile,
83       &                uVelInitFile, vVelInitFile, pSurfInitFile,       &                uVelInitFile, vVelInitFile, pSurfInitFile,
84       &                dQdTfile, ploadFile       &                dQdTfile, ploadFile,
85         &                eosType
86        CHARACTER*(5) checkPtSuff(maxNoChkptLev)        CHARACTER*(5) checkPtSuff(maxNoChkptLev)
87        CHARACTER*(MAX_LEN_FNAM) bathyFile, topoFile        CHARACTER*(MAX_LEN_FNAM) bathyFile, topoFile
88        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile
# Line 97  C                        get buoyancy. Line 100  C                        get buoyancy.
100        CHARACTER*(MAX_LEN_FNAM) pSurfInitFile        CHARACTER*(MAX_LEN_FNAM) pSurfInitFile
101        CHARACTER*(MAX_LEN_FNAM) dQdTfile        CHARACTER*(MAX_LEN_FNAM) dQdTfile
102        CHARACTER*(MAX_LEN_FNAM) ploadFile        CHARACTER*(MAX_LEN_FNAM) ploadFile
103          CHARACTER*(6) eosType
104    
105  C--   COMMON /PARM_I/ Integer valued parameters used by the model.  C--   COMMON /PARM_I/ Integer valued parameters used by the model.
106  C     cg2dMaxIters        :: Maximum number of iterations in the  C     cg2dMaxIters        :: Maximum number of iterations in the
# Line 317  C     delY        on input flags. Line 321  C     delY        on input flags.
321  C     gravity   :: Accel. due to gravity ( m/s^2 )  C     gravity   :: Accel. due to gravity ( m/s^2 )
322  C     recip_gravity and its inverse  C     recip_gravity and its inverse
323  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 )
324  C     ronil     :: Reference density  C     rhoNil    :: Reference density for the linear equation of state
325  C     rhoConst  :: Vertically constant reference density  C     rhoConst  :: Vertically constant reference density
326    C     rhoConstFresh :: Constant reference density for fresh water (rain)
327  C     startTime :: Start time for model ( s )  C     startTime :: Start time for model ( s )
328  C     phiMin    :: Latitude of southern most cell face.  C     phiMin    :: Latitude of southern most cell face.
329  C     thetaMin  :: Longitude of western most cell face (this  C     thetaMin  :: Longitude of western most cell face (this
# Line 440  C      --"-"--  Quadratic  ( linear: 1/s Line 445  C      --"-"--  Quadratic  ( linear: 1/s
445       & delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow,       & delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow,
446       & hFacMin, hFacMinDz, hFacInf, hFacSup,       & hFacMin, hFacMinDz, hFacInf, hFacSup,
447       & gravity, recip_Gravity, gBaro, rhonil, recip_rhonil,       & gravity, recip_Gravity, gBaro, rhonil, recip_rhonil,
448       & recip_rhoConst, rhoConst, tRef, sRef,       & recip_rhoConst, rhoConst,
449         & recip_rhoConstFresh, rhoConstFresh, tRef, sRef,
450       & endTime, chkPtFreq, pchkPtFreq, dumpFreq,       & endTime, chkPtFreq, pchkPtFreq, dumpFreq,
451       & diagFreq, taveFreq, monitorFreq,       & diagFreq, taveFreq, monitorFreq,
452       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,
# Line 513  C      --"-"--  Quadratic  ( linear: 1/s Line 519  C      --"-"--  Quadratic  ( linear: 1/s
519        _RL recip_rhonil        _RL recip_rhonil
520        _RL rhoConst        _RL rhoConst
521        _RL recip_rhoConst        _RL recip_rhoConst
522          _RL rhoConstFresh
523          _RL recip_rhoConstFresh
524        _RL tRef(Nr)        _RL tRef(Nr)
525        _RL sRef(Nr)        _RL sRef(Nr)
526        _RS fCori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS fCori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
# Line 559  C      --"-"--  Quadratic  ( linear: 1/s Line 567  C      --"-"--  Quadratic  ( linear: 1/s
567        _RL Lamba_theta        _RL Lamba_theta
568        _RL recip_Cp        _RL recip_Cp
569    
570  C Equation of State (polynomial coeffients)  CmlC Equation of State (polynomial coeffients)
571        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS  Cml      COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS
572        _RL eosC(9,Nr+1),eosSig0(Nr+1),eosRefT(Nr+1),eosRefS(Nr+1)  Cml      _RL eosC(9,Nr+1),eosSig0(Nr+1),eosRefT(Nr+1),eosRefS(Nr+1)
573  C Linear equation of state  CmlC Linear equation of state
574  C     tAlpha    :: Linear EOS thermal expansion coefficient ( 1/degree ).  CmlC     tAlpha    :: Linear EOS thermal expansion coefficient ( 1/degree ).
575  C     sBeta     :: Linear EOS haline contraction coefficient.  CmlC     sBeta     :: Linear EOS haline contraction coefficient.
576        COMMON /PARM_EOS_LIN/ tAlpha,sBeta,eosType  Cml      COMMON /PARM_EOS_LIN/ tAlpha,sBeta,eosType
577        _RL tAlpha  Cml      _RL tAlpha
578        _RL sBeta  Cml      _RL sBeta
       character*(6) eosType  
579    
580  C Atmospheric physical parameters (Ideal Gas EOS, ...)  C Atmospheric physical parameters (Ideal Gas EOS, ...)
581  C     atm_po    :: standard reference pressure  C     atm_po    :: standard reference pressure

Legend:
Removed from v.1.73  
changed lines
  Added in v.1.75

  ViewVC Help
Powered by ViewVC 1.1.22