/[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.260 by jmc, Wed Apr 11 03:52:43 2012 UTC revision 1.264 by jmc, Wed Jul 4 20:17:46 2012 UTC
# Line 287  C- Temp. & Salt params: Line 287  C- Temp. & Salt params:
287  C     tempStepping   :: Turns temperature equation time-stepping off  C     tempStepping   :: Turns temperature equation time-stepping off
288  C     saltStepping   :: Turns salinity equation time-stepping off  C     saltStepping   :: Turns salinity equation time-stepping off
289  C     tempAdvection  :: Flag which turns advection of temperature on and off.  C     tempAdvection  :: Flag which turns advection of temperature on and off.
290    C     tempVertDiff4  :: use vertical bi-harmonic diffusion for temperature
291  C     tempIsActiveTr :: Pot.Temp. is a dynamically active tracer  C     tempIsActiveTr :: Pot.Temp. is a dynamically active tracer
292  C     tempForcing    :: Flag which turns external forcing of temperature on  C     tempForcing    :: Flag which turns external forcing of temperature on
293  C                       and off.  C                       and off.
294  C     saltAdvection  :: Flag which turns advection of salinity on and off.  C     saltAdvection  :: Flag which turns advection of salinity on and off.
295    C     saltVertDiff4  :: use vertical bi-harmonic diffusion for salinity
296  C     saltIsActiveTr :: Salinity  is a dynamically active tracer  C     saltIsActiveTr :: Salinity  is a dynamically active tracer
297  C     saltForcing    :: Flag which turns external forcing of salinity on  C     saltForcing    :: Flag which turns external forcing of salinity on
298  C                       and off.  C                       and off.
# Line 339  C     doThetaClimRelax :: Set true if re Line 341  C     doThetaClimRelax :: Set true if re
341  C                        climatology is required.  C                        climatology is required.
342  C     doSaltClimRelax  :: Set true if relaxation to salinity  C     doSaltClimRelax  :: Set true if relaxation to salinity
343  C                        climatology is required.  C                        climatology is required.
344    C     balanceThetaClimRelax :: substract global mean effect at every time step
345    C     balanceSaltClimRelax :: substract global mean effect at every time step
346  C     allowFreezing  :: Allows surface water to freeze and form ice  C     allowFreezing  :: Allows surface water to freeze and form ice
347  C     useOldFreezing :: use the old version (before checkpoint52a_pre, 2003-11-12)  C     useOldFreezing :: use the old version (before checkpoint52a_pre, 2003-11-12)
348  C     periodicExternalForcing :: Set true if forcing is time-dependant  C     periodicExternalForcing :: Set true if forcing is time-dependant
# Line 378  C     printDomain     :: controls printi Line 382  C     printDomain     :: controls printi
382       & upwindVorticity, highOrderVorticity,       & upwindVorticity, highOrderVorticity,
383       & useAbsVorticity, upwindShear,       & useAbsVorticity, upwindShear,
384       & momStepping, calc_wVelocity, tempStepping, saltStepping,       & momStepping, calc_wVelocity, tempStepping, saltStepping,
385       & tempAdvection, tempIsActiveTr, tempForcing,       & tempAdvection, tempVertDiff4, tempIsActiveTr, tempForcing,
386       & saltAdvection, saltIsActiveTr, saltForcing,       & saltAdvection, saltVertDiff4, saltIsActiveTr, saltForcing,
387       & maskIniTemp, maskIniSalt, checkIniTemp, checkIniSalt,       & maskIniTemp, maskIniSalt, checkIniTemp, checkIniSalt,
388       & useSRCGSolver,       & useSRCGSolver,
389       & rigidLid, implicitFreeSurface,       & rigidLid, implicitFreeSurface,
# Line 392  C     printDomain     :: controls printi Line 396  C     printDomain     :: controls printi
396       & multiDimAdvection, useMultiDimAdvec,       & multiDimAdvection, useMultiDimAdvec,
397       & momDissip_In_AB, doAB_onGtGs,       & momDissip_In_AB, doAB_onGtGs,
398       & balanceEmPmR, balanceQnet, balancePrintMean,       & balanceEmPmR, balanceQnet, balancePrintMean,
399         & balanceThetaClimRelax, balanceSaltClimRelax,
400       & doThetaClimRelax, doSaltClimRelax,       & doThetaClimRelax, doSaltClimRelax,
401       & allowFreezing, useOldFreezing,       & allowFreezing, useOldFreezing,
402       & periodicExternalForcing,       & periodicExternalForcing,
# Line 401  C     printDomain     :: controls printi Line 406  C     printDomain     :: controls printi
406       & writePickupAtEnd,       & writePickupAtEnd,
407       & timeave_mdsio, snapshot_mdsio, monitor_stdio,       & timeave_mdsio, snapshot_mdsio, monitor_stdio,
408       & outputTypesInclusive, dumpInitAndLast,       & outputTypesInclusive, dumpInitAndLast,
409       & printDomain,       & printDomain
      & inAdMode, inAdTrue, inAdFalse, inAdExact  
410    
411        LOGICAL fluidIsAir        LOGICAL fluidIsAir
412        LOGICAL fluidIsWater        LOGICAL fluidIsWater
# Line 429  C     printDomain     :: controls printi Line 433  C     printDomain     :: controls printi
433        LOGICAL useCoriolis        LOGICAL useCoriolis
434        LOGICAL vectorInvariantMomentum        LOGICAL vectorInvariantMomentum
435        LOGICAL tempAdvection        LOGICAL tempAdvection
436          LOGICAL tempVertDiff4
437        LOGICAL tempIsActiveTr        LOGICAL tempIsActiveTr
438        LOGICAL tempForcing        LOGICAL tempForcing
439        LOGICAL saltAdvection        LOGICAL saltAdvection
440          LOGICAL saltVertDiff4
441        LOGICAL saltIsActiveTr        LOGICAL saltIsActiveTr
442        LOGICAL saltForcing        LOGICAL saltForcing
443        LOGICAL maskIniTemp        LOGICAL maskIniTemp
# Line 480  C     printDomain     :: controls printi Line 486  C     printDomain     :: controls printi
486        LOGICAL balancePrintMean        LOGICAL balancePrintMean
487        LOGICAL doThetaClimRelax        LOGICAL doThetaClimRelax
488        LOGICAL doSaltClimRelax        LOGICAL doSaltClimRelax
489          LOGICAL balanceThetaClimRelax
490          LOGICAL balanceSaltClimRelax
491        LOGICAL allowFreezing        LOGICAL allowFreezing
492        LOGICAL useOldFreezing        LOGICAL useOldFreezing
493        LOGICAL periodicExternalForcing        LOGICAL periodicExternalForcing
# Line 493  C     printDomain     :: controls printi Line 501  C     printDomain     :: controls printi
501        LOGICAL outputTypesInclusive        LOGICAL outputTypesInclusive
502        LOGICAL dumpInitAndLast        LOGICAL dumpInitAndLast
503        LOGICAL printDomain        LOGICAL printDomain
       LOGICAL inAdMode, inAdTrue, inAdFalse, inAdExact  
504    
505  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
506  C     cg2dTargetResidual  C     cg2dTargetResidual
# Line 608  C     viscA4GridMax:: maximum and minimu Line 615  C     viscA4GridMax:: maximum and minimu
615  C     viscA4GridMin::  in terms of non-dimensional grid-size dependent viscosity  C     viscA4GridMin::  in terms of non-dimensional grid-size dependent viscosity
616  C     diffKhT   :: Laplacian diffusion coeff. for mixing of  C     diffKhT   :: Laplacian diffusion coeff. for mixing of
617  C                 heat laterally ( m^2/s )  C                 heat laterally ( m^2/s )
 C     diffKrNrT :: vertical profile of Laplacian diffusion coeff.  
 C                 for mixing of heat vertically ( units of r^2/s )  
618  C     diffK4T   :: Biharmonic diffusion coeff. for mixing of  C     diffK4T   :: Biharmonic diffusion coeff. for mixing of
619  C                 heat laterally ( m^4/s )  C                 heat laterally ( m^4/s )
620    C     diffKrNrT :: vertical profile of Laplacian diffusion coeff.
621    C                 for mixing of heat vertically ( units of r^2/s )
622    C     diffKr4T  :: vertical profile of Biharmonic diffusion coeff.
623    C                 for mixing of heat vertically ( units of r^4/s )
624  C     diffKhS  ::  Laplacian diffusion coeff. for mixing of  C     diffKhS  ::  Laplacian diffusion coeff. for mixing of
625  C                 salt laterally ( m^2/s )  C                 salt laterally ( m^2/s )
 C     diffKrNrS :: vertical profile of Laplacian diffusion coeff.  
 C                 for mixing of salt vertically ( units of r^2/s ),  
626  C     diffK4S   :: Biharmonic diffusion coeff. for mixing of  C     diffK4S   :: Biharmonic diffusion coeff. for mixing of
627  C                 salt laterally ( m^4/s )  C                 salt laterally ( m^4/s )
628    C     diffKrNrS :: vertical profile of Laplacian diffusion coeff.
629    C                 for mixing of salt vertically ( units of r^2/s ),
630    C     diffKr4S  :: vertical profile of Biharmonic diffusion coeff.
631    C                 for mixing of salt vertically ( units of r^4/s )
632  C     diffKrBL79surf :: T/S surface diffusivity (m^2/s) Bryan and Lewis, 1979  C     diffKrBL79surf :: T/S surface diffusivity (m^2/s) Bryan and Lewis, 1979
633  C     diffKrBL79deep :: T/S deep diffusivity (m^2/s) Bryan and Lewis, 1979  C     diffKrBL79deep :: T/S deep diffusivity (m^2/s) Bryan and Lewis, 1979
634  C     diffKrBL79scl  :: depth scale for arctan fn (m) Bryan and Lewis, 1979  C     diffKrBL79scl  :: depth scale for arctan fn (m) Bryan and Lewis, 1979
# Line 735  C     psiEuler      :: Euler angle, rota Line 746  C     psiEuler      :: Euler angle, rota
746       & viscA4Grid, viscA4GridMax, viscA4GridMin,       & viscA4Grid, viscA4GridMax, viscA4GridMin,
747       & viscAhReMax, viscA4ReMax,       & viscAhReMax, viscA4ReMax,
748       & viscC4leith, viscC4leithD, viscArNr,       & viscC4leith, viscC4leithD, viscArNr,
749       & diffKhT, diffK4T, diffKrNrT,       & diffKhT, diffK4T, diffKrNrT, diffKr4T,
750       & diffKhS, diffK4S, diffKrNrS,       & diffKhS, diffK4S, diffKrNrS, diffKr4S,
751       & diffKrBL79surf, diffKrBL79deep, diffKrBL79scl, diffKrBL79Ho,       & diffKrBL79surf, diffKrBL79deep, diffKrBL79scl, diffKrBL79Ho,
752       & BL79LatVary,       & BL79LatVary,
753       & diffKrBLEQsurf, diffKrBLEQdeep, diffKrBLEQscl, diffKrBLEQHo,       & diffKrBLEQsurf, diffKrBLEQdeep, diffKrBLEQscl, diffKrBLEQHo,
# Line 819  C     psiEuler      :: Euler angle, rota Line 830  C     psiEuler      :: Euler angle, rota
830        _RL viscC4leithD        _RL viscC4leithD
831        _RL viscC4smag        _RL viscC4smag
832        _RL diffKhT        _RL diffKhT
       _RL diffKrNrT(Nr)  
833        _RL diffK4T        _RL diffK4T
834          _RL diffKrNrT(Nr)
835          _RL diffKr4T(Nr)
836        _RL diffKhS        _RL diffKhS
       _RL diffKrNrS(Nr)  
837        _RL diffK4S        _RL diffK4S
838          _RL diffKrNrS(Nr)
839          _RL diffKr4S(Nr)
840        _RL diffKrBL79surf        _RL diffKrBL79surf
841        _RL diffKrBL79deep        _RL diffKrBL79deep
842        _RL diffKrBL79scl        _RL diffKrBL79scl
# Line 939  C Logical flags for selecting packages Line 952  C Logical flags for selecting packages
952        LOGICAL useCheapAML        LOGICAL useCheapAML
953        LOGICAL useGrdchk        LOGICAL useGrdchk
954        LOGICAL useSMOOTH        LOGICAL useSMOOTH
955          LOGICAL usePROFILES
956        LOGICAL useECCO        LOGICAL useECCO
957        LOGICAL useSBO        LOGICAL useSBO
958        LOGICAL useFLT        LOGICAL useFLT
# Line 971  C Logical flags for selecting packages Line 985  C Logical flags for selecting packages
985       &        useOPPS, usePP81, useMY82, useGGL90, useKPP,       &        useOPPS, usePP81, useMY82, useGGL90, useKPP,
986       &        useGMRedi, useBBL, useDOWN_SLOPE,       &        useGMRedi, useBBL, useDOWN_SLOPE,
987       &        useCAL, useEXF, useBulkForce, useEBM, useCheapAML,       &        useCAL, useEXF, useBulkForce, useEBM, useCheapAML,
988       &        useGrdchk, useSMOOTH, useECCO, useSBO, useFLT,       &        useGrdchk,useSMOOTH,usePROFILES,useECCO,useSBO, useFLT,
989       &        usePTRACERS, useGCHEM, useRBCS, useOffLine, useMATRIX,       &        usePTRACERS, useGCHEM, useRBCS, useOffLine, useMATRIX,
990       &        useFRAZIL, useSEAICE, useSALT_PLUME, useShelfIce,       &        useFRAZIL, useSEAICE, useSALT_PLUME, useShelfIce,
991       &        useStreamIce, useICEFRONT, useThSIce,       &        useStreamIce, useICEFRONT, useThSIce,
# Line 980  C Logical flags for selecting packages Line 994  C Logical flags for selecting packages
994       &        useRunClock, useEMBED_FILES,       &        useRunClock, useEMBED_FILES,
995       &        useMYPACKAGE       &        useMYPACKAGE
996    
 C     Logical flags for turning off parts of the code in adjoint mode  
       LOGICAL useKPPinAdMode, useKPPinFwdMode  
       LOGICAL useGMrediInAdMode, useGMrediInFwdMode  
       LOGICAL useSEAICEinAdMode, useSEAICEinFwdMode  
       COMMON /PARM_PACKAGES_ADJ/  
      &       useKPPinAdMode, useKPPinFwdMode,  
      &       useGMrediInAdMode, useGMrediInFwdMode,  
      &       useSEAICEinAdMode, useSEAICEinFwdMode  
   
997  CEH3 ;;; Local Variables: ***  CEH3 ;;; Local Variables: ***
998  CEH3 ;;; mode:fortran ***  CEH3 ;;; mode:fortran ***
999  CEH3 ;;; End: ***  CEH3 ;;; End: ***
Legend:
Removed from v.1.260  
changed lines
  Added in v.1.264
  ViewVC Help
Powered by ViewVC 1.1.22