/[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.24 by cnh, Fri Aug 21 12:29:55 1998 UTC revision 1.26 by cnh, Sun Aug 23 15:34:39 1998 UTC
# Line 44  C     thetaClimFile   - File containing Line 44  C     thetaClimFile   - File containing
44  C                       in relaxation term -lambda(theta-theta*)  C                       in relaxation term -lambda(theta-theta*)
45  C     saltClimFile    - File containing salt climataology used  C     saltClimFile    - File containing salt climataology used
46  C                       in relaxation term -lambda(salt-salt*)  C                       in relaxation term -lambda(salt-salt*)
47    C     buoyancyRelation - Flag used to indicate which relation to use to
48    C                        get buoyancy.
49        COMMON /PARM_C/ checkPtSuff,        COMMON /PARM_C/ checkPtSuff,
50       &                bathyFile, hydrogThetaFile, hydrogSaltFile,       &                bathyFile, hydrogThetaFile, hydrogSaltFile,
51       &                zonalWindFile, meridWindFile, thetaClimFile,       &                zonalWindFile, meridWindFile, thetaClimFile,
52       &                saltClimFile       &                saltClimFile, buoyancyRelation
53        CHARACTER*(5) checkPtSuff(maxNoChkptLev)        CHARACTER*(5) checkPtSuff(maxNoChkptLev)
54        CHARACTER*(MAX_LEN_FNAM) bathyFile        CHARACTER*(MAX_LEN_FNAM) bathyFile
55        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile
# Line 56  C                       in relaxation te Line 58  C                       in relaxation te
58        CHARACTER*(MAX_LEN_FNAM) meridWindFile        CHARACTER*(MAX_LEN_FNAM) meridWindFile
59        CHARACTER*(MAX_LEN_FNAM) thetaClimFile        CHARACTER*(MAX_LEN_FNAM) thetaClimFile
60        CHARACTER*(MAX_LEN_FNAM) saltClimFile        CHARACTER*(MAX_LEN_FNAM) saltClimFile
61          CHARACTER*(MAX_LEN_FNAM) buoyancyRelation
62    
63  C--   COMMON /PARM_I/ Integer valued parameters used by the model.  C--   COMMON /PARM_I/ Integer valued parameters used by the model.
64  C     cg2dMaxIters        - Maximum number of iterations in the  C     cg2dMaxIters        - Maximum number of iterations in the
# Line 184  C           For now I have introduced a Line 187  C           For now I have introduced a
187  C           defaults to 0.51 but can be set at runtime.  C           defaults to 0.51 but can be set at runtime.
188  C     delP      - Vertical grid spacing ( Pa ).  C     delP      - Vertical grid spacing ( Pa ).
189  C     delZ      - Vertical grid spacing ( m  ).  C     delZ      - Vertical grid spacing ( m  ).
 C     rkFac     - Vertical coordinate to vertical index orientation.  
 C                 ( 1 same orientation, -1 opposite orientation )  
 C                 ( vertical coord == m  -> rkFac = -1 )  
 C                 ( vertical coord == Pa -> rkFac =  1 )  
190  C     delR      - Vertical grid spacing ( units of r ).  C     delR      - Vertical grid spacing ( units of r ).
191  C     delX      - Separation between cell faces (m) or (deg), depending  C     delX      - Separation between cell faces (m) or (deg), depending
192  C     delY        on input flags.  C     delY        on input flags.
# Line 201  C     thetaMin  - Longitude of western m Line 200  C     thetaMin  - Longitude of western m
200  C                 is an "inert" parameter but it is included  C                 is an "inert" parameter but it is included
201  C                 to make geographical references simple.)  C                 to make geographical references simple.)
202  C     rSphere   - Radius of sphere for a spherical polar grid ( m ).  C     rSphere   - Radius of sphere for a spherical polar grid ( m ).
203  C     rRSphere  - Reciprocal radius of sphere for a spherical polar grid ( m ).  C     recip_RSphere  - Reciprocal radius of sphere ( m ).
204  C     f0        - Reference coriolis parameter ( 1/s )  C     f0        - Reference coriolis parameter ( 1/s )
205  C                 ( Southern edge f for beta plane )  C                 ( Southern edge f for beta plane )
206  C     beta      - df/dy ( s^-1.m^-1 )  C     beta      - df/dy ( s^-1.m^-1 )
# Line 280  C                           number times Line 279  C                           number times
279        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac,        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac,
280       & delP, delZ, delR, delX, delY,       & delP, delZ, delR, delX, delY,
281       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime, phiMin,       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime, phiMin,
282       & thetaMin, rSphere, rRSphere, f0, fCori, beta,       & thetaMin, rSphere, recip_RSphere, f0, fCori, beta,
283       & viscAh,  viscAz,  viscA4,  viscAr,       & viscAh,  viscAz,  viscA4,  viscAr,
284       & diffKhT, diffKzT, diffK4T, diffKrT,       & diffKhT, diffKzT, diffK4T, diffKrT,
285       & diffKhS, diffKzS, diffK4S, diffKsT,       & diffKhS, diffKzS, diffK4S, diffKrS,
286       & delT, tauCD, rCD, freeSurfFac, hFacMin, hFacMinDz,       & delT, tauCD, rCD, freeSurfFac, hFacMin, hFacMinDz,
287       & GMmaxslope,GMlength,GMalpha,GMdepth,GMkbackground,GMmaxval,       & GMmaxslope,GMlength,GMalpha,GMdepth,GMkbackground,GMmaxval,
288       & gravity, gBaro, rhonil, tRef, sRef,       & gravity, gBaro, rhonil, recip_rhonil,
289         & recip_rhoConst, rhoConst, tRef, sRef, theta_S, specVol_S,
290       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq,       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq,
291       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,
292       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,
# Line 294  C                           number times Line 294  C                           number times
294       & externForcingCycle, externForcingPeriod       & externForcingCycle, externForcingPeriod
295        _RL cg2dTargetResidual        _RL cg2dTargetResidual
296        _RL cg2dpcOffDFac        _RL cg2dpcOffDFac
297        _RL delR(Nz)        _RL delZ(Nr)
298          _RL delP(Nr)
299          _RL delR(Nr)
300        _RL delX(Nx)        _RL delX(Nx)
301        _RL delY(Ny)        _RL delY(Ny)
302        _RL deltaT        _RL deltaT
# Line 305  C                           number times Line 307  C                           number times
307        _RL phiMin        _RL phiMin
308        _RL thetaMin        _RL thetaMin
309        _RL rSphere        _RL rSphere
310        _RL rRSphere        _RL recip_RSphere
311        _RL f0        _RL f0
312        _RL freeSurfFac        _RL freeSurfFac
313        _RL hFacMin        _RL hFacMin
# Line 313  C                           number times Line 315  C                           number times
315        _RL beta        _RL beta
316        _RL viscAh        _RL viscAh
317        _RL viscAz        _RL viscAz
318          _RL viscAr
319        _RL viscA4        _RL viscA4
320        _RL diffKhT        _RL diffKhT
321          _RL diffKrT
322        _RL diffKzT        _RL diffKzT
323        _RL diffK4T        _RL diffK4T
324        _RL diffKhS        _RL diffKhS
325          _RL diffKrS
326        _RL diffKzS        _RL diffKzS
327        _RL diffK4S        _RL diffK4S
328        _RL delt        _RL delt
# Line 332  C                           number times Line 337  C                           number times
337        _RL gravity        _RL gravity
338        _RL gBaro        _RL gBaro
339        _RL rhonil        _RL rhonil
340        _RL tRef(Nz)        _RL recip_rhonil
341        _RL sRef(Nz)        _RL rhoConst
342          _RL recip_rhoConst
343          _RL specVol_S(Nr)
344          _RL tRef(Nr)
345          _RL theta_S(Nr)
346          _RL sRef(Nr)
347        _RS Fcori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS Fcori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
348        _RL startTime        _RL startTime
349        _RL endTime        _RL endTime
# Line 363  C                           number times Line 373  C                           number times
373    
374  C Equation of State (polynomial coeffients)  C Equation of State (polynomial coeffients)
375        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS
376        _RL eosC(9,Nz+1),eosSig0(Nz+1),eosRefT(Nz+1),eosRefS(Nz+1)        _RL eosC(9,Nr+1),eosSig0(Nr+1),eosRefT(Nr+1),eosRefS(Nr+1)
377  C Linear equation of state  C Linear equation of state
378  C     tAlpha    - Linear EOS thermal expansion coefficient ( 1/degree ).  C     tAlpha    - Linear EOS thermal expansion coefficient ( 1/degree ).
379  C     sBeta     - Linear EOS haline contraction coefficient.  C     sBeta     - Linear EOS haline contraction coefficient.
Legend:
Removed from v.1.24  
changed lines
  Added in v.1.26
  ViewVC Help
Powered by ViewVC 1.1.22