/[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.76 by jmc, Mon Oct 7 16:18:07 2002 UTC revision 1.83 by jmc, Tue Dec 10 02:47:26 2002 UTC
# Line 166  C     momPressureForcing :: Flag which t Line 166  C     momPressureForcing :: Flag which t
166  C                          on and off.  C                          on and off.
167  C     metricTerms   :: Flag which turns metric terms on or off.  C     metricTerms   :: Flag which turns metric terms on or off.
168  C     usingSphericalPolarMTerms :: If TRUE use spherical polar metric terms.  C     usingSphericalPolarMTerms :: If TRUE use spherical polar metric terms.
169    C     useNHMTerms :: If TRUE use non-hydrostatic metric terms.
170  C     useCoriolis   :: Flag which turns the coriolis terms on and off.  C     useCoriolis   :: Flag which turns the coriolis terms on and off.
171  C     tempDiffusion :: Flag which turns diffusion of temperature on  C     tempDiffusion :: Flag which turns diffusion of temperature on
172  C                     and off.  C                     and off.
# Line 211  C     usingZCoords     :: Set to indicat Line 212  C     usingZCoords     :: Set to indicat
212  C                        coords.  C                        coords.
213  C     setCenterDr    :: set cell Center depth and put Interface at the middle  C     setCenterDr    :: set cell Center depth and put Interface at the middle
214  C     nonHydrostatic :: Using non-hydrostatic terms  C     nonHydrostatic :: Using non-hydrostatic terms
215    C     quasiHydrostatic :: Using non-hydrostatic terms in hydrostatic algorithm
216  C     globalFiles    :: Selects between "global" and "tiled" files  C     globalFiles    :: Selects between "global" and "tiled" files
217  C     allowFreezing  :: Allows water to freeze and form ice  C     allowFreezing  :: Allows water to freeze and form ice
218  C     groundAtK1  :: put the surface(k=1) at the Lower Boundary (=ground)  C     groundAtK1  :: put the surface(k=1) at the Lower Boundary (=ground)
# Line 225  C     groundAtK1  :: put the surface(k=1 Line 227  C     groundAtK1  :: put the surface(k=1
227       & useRealFreshWaterFlux,       & useRealFreshWaterFlux,
228       & rigidLid, implicitFreeSurface, exactConserv, uniformLin_PhiSurf,       & rigidLid, implicitFreeSurface, exactConserv, uniformLin_PhiSurf,
229       & momStepping, tempStepping, saltStepping, tr1Stepping,       & momStepping, tempStepping, saltStepping, tr1Stepping,
230       & metricTerms, usingSphericalPolarMTerms,       & metricTerms, usingSphericalPolarMTerms, useNHMTerms,
231       & useConstantF, useBetaPlaneF, useSphereF,       & useConstantF, useBetaPlaneF, useSphereF,
232       & useEnergyConservingCoriolis, useJamartWetPoints,       & useEnergyConservingCoriolis, useJamartWetPoints,
233       & implicitDiffusion, implicitViscosity,       & implicitDiffusion, implicitViscosity,
# Line 233  C     groundAtK1  :: put the surface(k=1 Line 235  C     groundAtK1  :: put the surface(k=1
235       & doThetaClimRelax, doSaltClimRelax, doTr1ClimRelax,       & doThetaClimRelax, doSaltClimRelax, doTr1ClimRelax,
236       & periodicExternalForcing,       & periodicExternalForcing,
237       & usingPCoords, usingZCoords, setCenterDr,       & usingPCoords, usingZCoords, setCenterDr,
238       & nonHydrostatic, globalFiles,       & nonHydrostatic, quasiHydrostatic, globalFiles,
239       & allowFreezing, groundAtK1,       & allowFreezing, groundAtK1,
240       & usePickupBeforeC35, debugMode,       & usePickupBeforeC35, debugMode,
241       & readPickupWithTracer, writePickupWithTracer       & readPickupWithTracer, writePickupWithTracer
# Line 241  C     groundAtK1  :: put the surface(k=1 Line 243  C     groundAtK1  :: put the surface(k=1
243        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
244        LOGICAL usingCurvilinearGrid        LOGICAL usingCurvilinearGrid
245        LOGICAL usingSphericalPolarMTerms        LOGICAL usingSphericalPolarMTerms
246          LOGICAL useNHMTerms
247        LOGICAL no_slip_sides        LOGICAL no_slip_sides
248        LOGICAL no_slip_bottom        LOGICAL no_slip_bottom
249        LOGICAL staggerTimeStep        LOGICAL staggerTimeStep
# Line 283  C     groundAtK1  :: put the surface(k=1 Line 286  C     groundAtK1  :: put the surface(k=1
286        LOGICAL usingZCoords        LOGICAL usingZCoords
287        LOGICAL setCenterDr        LOGICAL setCenterDr
288        LOGICAL nonHydrostatic        LOGICAL nonHydrostatic
289          LOGICAL quasiHydrostatic
290        LOGICAL globalFiles        LOGICAL globalFiles
291        LOGICAL allowFreezing        LOGICAL allowFreezing
292        LOGICAL groundAtK1        LOGICAL groundAtK1
# Line 441  C      --"-"--  Quadratic  ( linear: 1/s Line 445  C      --"-"--  Quadratic  ( linear: 1/s
445       & deltaT, deltaTmom, deltaTtracer, deltaTfreesurf, deltaTClock,       & deltaT, deltaTmom, deltaTtracer, deltaTfreesurf, deltaTClock,
446       & abeps, startTime,       & abeps, startTime,
447       & phiMin, thetaMin, rSphere, recip_RSphere, f0, beta,       & phiMin, thetaMin, rSphere, recip_RSphere, f0, beta,
448       & fCori, fCoriG,       & fCori, fCoriG, fCoriCos,
449       & viscAh,  viscAz,  viscA4,  viscAr, viscAstrain, viscAtension,       & viscAh,  viscAz,  viscA4,  viscAr, viscAstrain, viscAtension,
450       & diffKhT, diffKzT, diffK4T, diffKrT,       & diffKhT, diffKzT, diffK4T, diffKrT,
451       & diffKhS, diffKzS, diffK4S, diffKrS,       & diffKhS, diffKzS, diffK4S, diffKrS,
# Line 528  C      --"-"--  Quadratic  ( linear: 1/s Line 532  C      --"-"--  Quadratic  ( linear: 1/s
532        _RL sRef(Nr)        _RL sRef(Nr)
533        _RS fCori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS fCori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
534        _RS fCoriG(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS fCoriG(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
535          _RS fCoriCos(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
536        _RL startTime        _RL startTime
537        _RL endTime        _RL endTime
538        _RL chkPtFreq        _RL chkPtFreq
# Line 582  Cml      _RL tAlpha Line 587  Cml      _RL tAlpha
587  Cml      _RL sBeta  Cml      _RL sBeta
588    
589  C Atmospheric physical parameters (Ideal Gas EOS, ...)  C Atmospheric physical parameters (Ideal Gas EOS, ...)
590  C     atm_po    :: standard reference pressure  C     atm_Po    :: standard reference pressure
591  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
592    C     atm_Rd    :: gas constant for dry air
593  C     atm_kappa :: kappa = R/Cp (R: constant of Ideal Gas EOS)  C     atm_kappa :: kappa = R/Cp (R: constant of Ideal Gas EOS)
594  C     Integr_GeoPot :: option to select the way we integrate the geopotential  C     integr_GeoPot :: option to select the way we integrate the geopotential
595  C                     (still a subject of discussions ...)  C                     (still a subject of discussions ...)
596        COMMON /PARM_ATM/ atm_cp, atm_kappa, atm_po,  C     selectFindRoSurf :: select the way surf. ref. pressure (=Ro_surf) is
597       &                  Integr_GeoPot  C             derived from the orography. Implemented: 0,1 (see INI_P_GROUND)
598        _RL atm_cp, atm_kappa, atm_po        COMMON /PARM_ATM/ atm_Cp, atm_Rd, atm_kappa, atm_Po,
599        INTEGER Integr_GeoPot       &                  integr_GeoPot, selectFindRoSurf
600          _RL atm_Po, atm_Cp, atm_Rd, atm_kappa
601          INTEGER integr_GeoPot, selectFindRoSurf
602    
603  C Logical flags for selecting packages  C Logical flags for selecting packages
604        LOGICAL useKPP        LOGICAL useKPP
# Line 603  C Logical flags for selecting packages Line 611  C Logical flags for selecting packages
611        LOGICAL useZONAL_FILT        LOGICAL useZONAL_FILT
612        LOGICAL useFLT        LOGICAL useFLT
613        LOGICAL usePTRACERS        LOGICAL usePTRACERS
614          LOGICAL useSEAICE
615    cswdblk -- add ---
616          LOGICAL useBulkforce
617          LOGICAL useThermSEAICE
618    cswdblk --- end add ---
619        COMMON /PARM_PACKAGES/        COMMON /PARM_PACKAGES/
620       &        useKPP, useGMRedi, useOBCS, useAIM, useECCO,       &        useKPP, useGMRedi, useOBCS, useAIM, useECCO,
621       &        useSHAP_FILT, useZONAL_FILT, useGrdchk, useFLT,       &        useSHAP_FILT, useZONAL_FILT, useGrdchk, useFLT,
622       &        usePTRACERS       &        usePTRACERS, useSEAICE,
623    cswdblk -- add ---
624         &        useThermSEAICE, useBulkforce
625    cswdblk --- end add ---

Legend:
Removed from v.1.76  
changed lines
  Added in v.1.83

  ViewVC Help
Powered by ViewVC 1.1.22