/[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.188 by jmc, Thu Jul 13 02:48:18 2006 UTC revision 1.192 by jmc, Wed Nov 29 20:42:09 2006 UTC
# Line 49  C     Checkpoint data Line 49  C     Checkpoint data
49    
50  C--   COMMON /PARM_C/ Character valued parameters used by the model.  C--   COMMON /PARM_C/ Character valued parameters used by the model.
51  C     checkPtSuff :: List of checkpoint file suffices  C     checkPtSuff :: List of checkpoint file suffices
52    C     tRefFile      :: File containing reference Potential Temperat.  tRef (1.D)
53    C     sRefFile      :: File containing reference salinity/spec.humid. sRef (1.D)
54    C     rhoRefFile    :: File containing reference density profile rhoRef (1.D)
55    C     delRFile      :: File containing vertical grid spacing delR  (1.D array)
56    C     delRcFile     :: File containing vertical grid spacing delRc (1.D array)
57  C     delXFile      :: File containing X-spacing grid definition (1.D array)  C     delXFile      :: File containing X-spacing grid definition (1.D array)
58  C     delYFile      :: File containing Y-spacing grid definition (1.D array)  C     delYFile      :: File containing Y-spacing grid definition (1.D array)
59  C     horizGridFile :: File containing horizontal-grid definition  C     horizGridFile :: File containing horizontal-grid definition
60  C                        (only when using curvilinear_grid)  C                        (only when using curvilinear_grid)
61  C     bathyFile   :: File containing bathymetry. If not defined bathymetry  C     bathyFile   :: File containing bathymetry. If not defined bathymetry
62  C                   is taken from inline function.  C                   is taken from inline function.
# Line 84  C     eosType         :: choose the equa Line 89  C     eosType         :: choose the equa
89  C                        LINEAR, POLY3, UNESCO, JMD95Z, JMD95P, MDJWF, IDEALGAS  C                        LINEAR, POLY3, UNESCO, JMD95Z, JMD95P, MDJWF, IDEALGAS
90  C     the_run_name    :: string identifying the name of the model "run"  C     the_run_name    :: string identifying the name of the model "run"
91        COMMON /PARM_C/ checkPtSuff,        COMMON /PARM_C/ checkPtSuff,
92         &                tRefFile, sRefFile, rhoRefFile,
93         &                delRFile, delRcFile,
94       &                delXFile, delYFile, horizGridFile,       &                delXFile, delYFile, horizGridFile,
95       &                bathyFile, topoFile, shelfIceFile,       &                bathyFile, topoFile, shelfIceFile,
96       &                hydrogThetaFile, hydrogSaltFile,       &                hydrogThetaFile, hydrogSaltFile,
# Line 99  C     the_run_name    :: string identify Line 106  C     the_run_name    :: string identify
106       &                mdsioLocalDir,       &                mdsioLocalDir,
107       &                the_run_name       &                the_run_name
108        CHARACTER*(5) checkPtSuff(maxNoChkptLev)        CHARACTER*(5) checkPtSuff(maxNoChkptLev)
109          CHARACTER*(MAX_LEN_FNAM) tRefFile
110          CHARACTER*(MAX_LEN_FNAM) sRefFile
111          CHARACTER*(MAX_LEN_FNAM) rhoRefFile
112          CHARACTER*(MAX_LEN_FNAM) delRFile
113          CHARACTER*(MAX_LEN_FNAM) delRcFile
114        CHARACTER*(MAX_LEN_FNAM) delXFile        CHARACTER*(MAX_LEN_FNAM) delXFile
115        CHARACTER*(MAX_LEN_FNAM) delYFile        CHARACTER*(MAX_LEN_FNAM) delYFile
116        CHARACTER*(MAX_LEN_FNAM) horizGridFile        CHARACTER*(MAX_LEN_FNAM) horizGridFile
# Line 213  C                          coordinate fr Line 225  C                          coordinate fr
225  C     usingSphericalPolarGrid :: If TRUE grid generation will be in a  C     usingSphericalPolarGrid :: If TRUE grid generation will be in a
226  C                               spherical polar frame.  C                               spherical polar frame.
227  C     usingCylindricalGrid :: If TRUE grid generation will be Cylindrical  C     usingCylindricalGrid :: If TRUE grid generation will be Cylindrical
228    C     usingCurvilinearGrid :: If TRUE, use a curvilinear grid (to be provided)
229    C     deepAtmosphere :: deep model (drop the shallow-atmosphere approximation)
230  C     no_slip_sides :: Impose "no-slip" at lateral boundaries.  C     no_slip_sides :: Impose "no-slip" at lateral boundaries.
231  C     no_slip_bottom :: Impose "no-slip" at bottom boundary.  C     no_slip_bottom :: Impose "no-slip" at bottom boundary.
232  C     momViscosity  :: Flag which turns momentum friction terms on and off.  C     momViscosity  :: Flag which turns momentum friction terms on and off.
# Line 290  C     fluidIsWater     :: Set to indicat Line 304  C     fluidIsWater     :: Set to indicat
304  C                        is water  C                        is water
305  C     useDynP_inEos_Zc :: use the dynamical pressure in EOS (with Z-coord.)  C     useDynP_inEos_Zc :: use the dynamical pressure in EOS (with Z-coord.)
306  C                         this requires specific code for restart & exchange  C                         this requires specific code for restart & exchange
307  C     setCenterDr    :: set cell Center depth and put Interface at the middle  C     setInterFDr    :: set Interface depth (put cell-Center at the middle)
308    C     setCenterDr    :: set cell-Center depth (put Interface at the middle)
309  C     nonHydrostatic :: Using non-hydrostatic terms  C     nonHydrostatic :: Using non-hydrostatic terms
310  C     quasiHydrostatic :: Using non-hydrostatic terms in hydrostatic algorithm  C     quasiHydrostatic :: Using non-hydrostatic terms in hydrostatic algorithm
311  C     globalFiles    :: Selects between "global" and "tiled" files  C     globalFiles    :: Selects between "global" and "tiled" files
# Line 314  C     balancePrintMean:: print substract Line 329  C     balancePrintMean:: print substract
329    
330        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
331       & usingCurvilinearGrid, usingCylindricalGrid,       & usingCurvilinearGrid, usingCylindricalGrid,
332         & deepAtmosphere, setInterFDr, setCenterDr,
333       & no_slip_sides,no_slip_bottom,       & no_slip_sides,no_slip_bottom,
334       & momViscosity, momAdvection, momForcing, useCoriolis,       & momViscosity, momAdvection, momForcing, useCoriolis,
335       & momPressureForcing, vectorInvariantMomentum,       & momPressureForcing, vectorInvariantMomentum,
# Line 338  C     balancePrintMean:: print substract Line 354  C     balancePrintMean:: print substract
354       & doThetaClimRelax, doSaltClimRelax, doTr1ClimRelax,       & doThetaClimRelax, doSaltClimRelax, doTr1ClimRelax,
355       & periodicExternalForcing,       & periodicExternalForcing,
356       & fluidIsAir, fluidIsWater,       & fluidIsAir, fluidIsWater,
357       & usingPCoords, usingZCoords, useDynP_inEos_Zc, setCenterDr,       & usingPCoords, usingZCoords, useDynP_inEos_Zc,
358       & nonHydrostatic, quasiHydrostatic, globalFiles, useSingleCpuIO,       & nonHydrostatic, quasiHydrostatic, globalFiles, useSingleCpuIO,
359       & allowFreezing, useOldFreezing,       & allowFreezing, useOldFreezing,
360       & usePickupBeforeC35, usePickupBeforeC54, startFromPickupAB2,       & usePickupBeforeC35, usePickupBeforeC54, startFromPickupAB2,
# Line 352  C     balancePrintMean:: print substract Line 368  C     balancePrintMean:: print substract
368        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
369        LOGICAL usingCylindricalGrid        LOGICAL usingCylindricalGrid
370        LOGICAL usingCurvilinearGrid        LOGICAL usingCurvilinearGrid
371          LOGICAL deepAtmosphere
372          LOGICAL setInterFDr
373          LOGICAL setCenterDr
374        LOGICAL useNHMTerms        LOGICAL useNHMTerms
375        LOGICAL no_slip_sides        LOGICAL no_slip_sides
376        LOGICAL no_slip_bottom        LOGICAL no_slip_bottom
# Line 411  C     balancePrintMean:: print substract Line 430  C     balancePrintMean:: print substract
430        LOGICAL usingPCoords        LOGICAL usingPCoords
431        LOGICAL usingZCoords        LOGICAL usingZCoords
432        LOGICAL useDynP_inEos_Zc        LOGICAL useDynP_inEos_Zc
       LOGICAL setCenterDr  
433        LOGICAL nonHydrostatic        LOGICAL nonHydrostatic
434        LOGICAL quasiHydrostatic        LOGICAL quasiHydrostatic
435        LOGICAL globalFiles        LOGICAL globalFiles
# Line 462  C     gravity   :: Accel. due to gravity Line 480  C     gravity   :: Accel. due to gravity
480  C     recip_gravity and its inverse  C     recip_gravity and its inverse
481  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 )
482  C     rhoNil    :: Reference density for the linear equation of state  C     rhoNil    :: Reference density for the linear equation of state
483  C     rhoConst  :: Vertically constant reference density  C     rhoConst  :: Vertically constant reference density
484    C     rhoFacC   :: normalized (by rhoConst) reference density at cell-Center
485    C     rhoFacF   :: normalized (by rhoConst) reference density at cell-interFace
486  C     rhoConstFresh :: Constant reference density for fresh water (rain)  C     rhoConstFresh :: Constant reference density for fresh water (rain)
487  C     tRef      :: reference vertical profile for potential temperature  C     tRef      :: reference vertical profile for potential temperature
488  C     sRef      :: reference vertical profile for salinity/specific humidity  C     sRef      :: reference vertical profile for salinity/specific humidity
489  C     phiRef    :: reference potential (pressure/rho, geopotential) profile  C     phiRef    :: reference potential (pressure/rho, geopotential) profile
490  C     dBdrRef   :: vertical gradient of reference boyancy  [(m/s/r)^2)]:  C     dBdrRef   :: vertical gradient of reference boyancy  [(m/s/r)^2)]:
491  C               :: z-coord: = N^2_ref = Brunt-Vaissala frequency [s^-2]  C               :: z-coord: = N^2_ref = Brunt-Vaissala frequency [s^-2]
492  C               :: p-coord: = -(d.alpha/dp)_ref          [(m^2.s/kg)^2]  C               :: p-coord: = -(d.alpha/dp)_ref          [(m^2.s/kg)^2]
# Line 475  C     thetaMin  :: Longitude of western Line 495  C     thetaMin  :: Longitude of western
495  C                 is an "inert" parameter but it is included  C                 is an "inert" parameter but it is included
496  C                 to make geographical references simple.)  C                 to make geographical references simple.)
497  C     rSphere   :: Radius of sphere for a spherical polar grid ( m ).  C     rSphere   :: Radius of sphere for a spherical polar grid ( m ).
498  C     recip_RSphere  :: Reciprocal radius of sphere ( m ).  C     recip_rSphere  :: Reciprocal radius of sphere ( m ).
499  C     f0        :: Reference coriolis parameter ( 1/s )  C     f0        :: Reference coriolis parameter ( 1/s )
500  C                 ( Southern edge f for beta plane )  C                 ( Southern edge f for beta plane )
501  C     beta      :: df/dy ( s^-1.m^-1 )  C     beta      :: df/dy ( s^-1.m^-1 )
# Line 640  C                      (i.e. allows conv Line 660  C                      (i.e. allows conv
660       & diffKrBL79surf, diffKrBL79deep, diffKrBL79scl, diffKrBL79Ho,       & diffKrBL79surf, diffKrBL79deep, diffKrBL79scl, diffKrBL79Ho,
661       & delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow,       & delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow,
662       & hFacMin, hFacMinDz, hFacInf, hFacSup,       & hFacMin, hFacMinDz, hFacInf, hFacSup,
663       & gravity, recip_Gravity, gBaro, rhonil, recip_rhonil,       & gravity, recip_Gravity, gBaro,
664       & recip_rhoConst, rhoConst,       & rhonil, recip_rhonil, rhoConst, recip_rhoConst,
665         & rhoFacC, recip_rhoFacC, rhoFacF, recip_rhoFacF,
666       & rhoConstFresh, convertEmP2rUnit, tRef, sRef, phiRef, dBdrRef,       & rhoConstFresh, convertEmP2rUnit, tRef, sRef, phiRef, dBdrRef,
667       & baseTime, startTime, endTime,       & baseTime, startTime, endTime,
668       & chkPtFreq, pChkPtFreq, dumpFreq, adjDumpFreq,       & chkPtFreq, pChkPtFreq, dumpFreq, adjDumpFreq,
# Line 656  C                      (i.e. allows conv Line 677  C                      (i.e. allows conv
677       & horiVertRatio, recip_horiVertRatio,       & horiVertRatio, recip_horiVertRatio,
678       & ivdc_kappa, Ro_SeaLevel,       & ivdc_kappa, Ro_SeaLevel,
679       & sideDragFactor, bottomDragLinear, bottomDragQuadratic, nh_Am2,       & sideDragFactor, bottomDragLinear, bottomDragQuadratic, nh_Am2,
680       & smoothAbsFuncRange,       & smoothAbsFuncRange,
681       & tCylIn, tCylOut       & tCylIn, tCylOut
682    
683        _RL cg2dTargetResidual        _RL cg2dTargetResidual
# Line 676  C                      (i.e. allows conv Line 697  C                      (i.e. allows conv
697        _RL phiMin        _RL phiMin
698        _RL thetaMin        _RL thetaMin
699        _RL rSphere        _RL rSphere
700        _RL recip_RSphere        _RL recip_rSphere
701        _RL f0        _RL f0
702        _RL freeSurfFac        _RL freeSurfFac
703        _RL implicSurfPress        _RL implicSurfPress
# Line 727  C                      (i.e. allows conv Line 748  C                      (i.e. allows conv
748        _RL gravity        _RL gravity
749        _RL recip_gravity        _RL recip_gravity
750        _RL gBaro        _RL gBaro
751        _RL rhonil        _RL rhonil,        recip_rhonil
752        _RL recip_rhonil        _RL rhoConst,      recip_rhoConst
753        _RL rhoConst        _RL rhoFacC(Nr),   recip_rhoFacC(Nr)
754        _RL recip_rhoConst        _RL rhoFacF(Nr+1), recip_rhoFacF(Nr+1)
755        _RL rhoConstFresh        _RL rhoConstFresh
756        _RL convertEmP2rUnit        _RL convertEmP2rUnit
757        _RL tRef(Nr)        _RL tRef(Nr)
# Line 833  C Logical flags for selecting packages Line 854  C Logical flags for selecting packages
854        LOGICAL useSEAICE        LOGICAL useSEAICE
855        LOGICAL useShelfIce        LOGICAL useShelfIce
856        LOGICAL useThSIce        LOGICAL useThSIce
857          LOGICAL useATM2d
858        LOGICAL useBulkForce        LOGICAL useBulkForce
859        LOGICAL usefizhi        LOGICAL usefizhi
860        LOGICAL usegridalt        LOGICAL usegridalt
861        LOGICAL useDiagnostics        LOGICAL useDiagnostics
862        LOGICAL useMNC        LOGICAL useMNC
863          LOGICAL useREGRID
864        LOGICAL useRunClock        LOGICAL useRunClock
865        LOGICAL useEMBED_FILES        LOGICAL useEMBED_FILES
866        LOGICAL useMYPACKAGE        LOGICAL useMYPACKAGE
# Line 847  C Logical flags for selecting packages Line 870  C Logical flags for selecting packages
870       &        useCAL, useEXF, useEBM, useGrdchk, useECCO,       &        useCAL, useEXF, useEBM, useGrdchk, useECCO,
871       &        useSHAP_FILT, useZONAL_FILT, useFLT,       &        useSHAP_FILT, useZONAL_FILT, useFLT,
872       &        usePTRACERS, useGCHEM, useRBCS, useOffLine, useMATRIX,       &        usePTRACERS, useGCHEM, useRBCS, useOffLine, useMATRIX,
873       &        useSBO, useSEAICE, useShelfIce, useThSIce, useBulkForce,       &        useSBO, useSEAICE, useShelfIce,
874       &        usefizhi, usegridalt, useDiagnostics, useMNC,       &        useThSIce, useATM2D, useBulkForce,
875         &        usefizhi, usegridalt, useDiagnostics, useMNC, useREGRID,
876       &        useRunClock, useEMBED_FILES, useMYPACKAGE       &        useRunClock, useEMBED_FILES, useMYPACKAGE
877    
878  CEH3 ;;; Local Variables: ***  CEH3 ;;; Local Variables: ***
Legend:
Removed from v.1.188  
changed lines
  Added in v.1.192
  ViewVC Help
Powered by ViewVC 1.1.22