/[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.215 by jmc, Sat Apr 5 18:02:35 2008 UTC revision 1.219 by jmc, Tue Aug 5 21:55:29 2008 UTC
# Line 24  C     Useful physical values Line 24  C     Useful physical values
24        Real*8 deg2rad        Real*8 deg2rad
25        PARAMETER ( deg2rad = 2.D0*PI/360.D0           )        PARAMETER ( deg2rad = 2.D0*PI/360.D0           )
26    
 C     Symbolic values  
 C     precXXXX :: Used to indicate what precision to use for  
 C                dumping model state.  
       INTEGER precFloat32  
       PARAMETER ( precFloat32 = 32 )  
       INTEGER precFloat64  
       PARAMETER ( precFloat64 = 64 )  
 C     UNSET_xxx :: Used to indicate variables that have not been given a value  
       Real*8 UNSET_FLOAT8  
       PARAMETER ( UNSET_FLOAT8 = 1.234567D5 )  
       Real*4 UNSET_FLOAT4  
       PARAMETER ( UNSET_FLOAT4 = 1.234567E5 )  
       _RL    UNSET_RL  
       PARAMETER ( UNSET_RL     = 1.234567D5 )  
       _RS    UNSET_RS  
       PARAMETER ( UNSET_RS     = 1.234567E5 )  
       INTEGER UNSET_I  
       PARAMETER ( UNSET_I      = 123456789  )  
   
27  C--   COMMON /PARM_C/ Character valued parameters used by the model.  C--   COMMON /PARM_C/ Character valued parameters used by the model.
28  C     buoyancyRelation :: Flag used to indicate which relation to use to  C     buoyancyRelation :: Flag used to indicate which relation to use to
29  C                         get buoyancy.  C                         get buoyancy.
# Line 89  C                 m/s when using externa Line 70  C                 m/s when using externa
70  C                 to kg/m2/s by multiplying by rhoConstFresh.  C                 to kg/m2/s by multiplying by rhoConstFresh.
71  C     saltFluxFile    :: File containing surface salt flux  C     saltFluxFile    :: File containing surface salt flux
72  C     pLoadFile       :: File containing pressure loading  C     pLoadFile       :: File containing pressure loading
73  C     eddyTauxFile    :: File containing zonal Eddy stress data  C     eddyPsiXFile    :: File containing zonal Eddy streamfunction data
74  C     eddyTauyFile    :: File containing meridional Eddy stress data  C     eddyPsiYFile    :: File containing meridional Eddy streamfunction data
75  C     the_run_name    :: string identifying the name of the model "run"  C     the_run_name    :: string identifying the name of the model "run"
76        COMMON /PARM_C/        COMMON /PARM_C/
77       &                buoyancyRelation, eosType,       &                buoyancyRelation, eosType,
# Line 107  C     the_run_name    :: string identify Line 88  C     the_run_name    :: string identify
88       &                lambdaThetaFile, lambdaSaltFile,       &                lambdaThetaFile, lambdaSaltFile,
89       &                uVelInitFile, vVelInitFile, pSurfInitFile,       &                uVelInitFile, vVelInitFile, pSurfInitFile,
90       &                dQdTfile, ploadFile,       &                dQdTfile, ploadFile,
91       &                eddyTauxFile, eddyTauyFile,       &                eddyPsiXFile, eddyPsiYFile,
92       &                the_run_name       &                the_run_name
93        CHARACTER*(MAX_LEN_FNAM) buoyancyRelation        CHARACTER*(MAX_LEN_FNAM) buoyancyRelation
94        CHARACTER*(6)  eosType        CHARACTER*(6)  eosType
# Line 138  C     the_run_name    :: string identify Line 119  C     the_run_name    :: string identify
119        CHARACTER*(MAX_LEN_FNAM) pSurfInitFile        CHARACTER*(MAX_LEN_FNAM) pSurfInitFile
120        CHARACTER*(MAX_LEN_FNAM) dQdTfile        CHARACTER*(MAX_LEN_FNAM) dQdTfile
121        CHARACTER*(MAX_LEN_FNAM) ploadFile        CHARACTER*(MAX_LEN_FNAM) ploadFile
122        CHARACTER*(MAX_LEN_FNAM) eddyTauxFile        CHARACTER*(MAX_LEN_FNAM) eddyPsiXFile
123        CHARACTER*(MAX_LEN_FNAM) eddyTauyFile        CHARACTER*(MAX_LEN_FNAM) eddyPsiYFile
124        CHARACTER*(MAX_LEN_FNAM) lambdaThetaFile        CHARACTER*(MAX_LEN_FNAM) lambdaThetaFile
125        CHARACTER*(MAX_LEN_FNAM) lambdaSaltFile        CHARACTER*(MAX_LEN_FNAM) lambdaSaltFile
126        CHARACTER*(MAX_LEN_PREC/2) the_run_name        CHARACTER*(MAX_LEN_PREC/2) the_run_name
# Line 213  C     debugLevel          :: debug level Line 194  C     debugLevel          :: debug level
194        INTEGER monitorSelect        INTEGER monitorSelect
195        INTEGER debugLevel        INTEGER debugLevel
196    
 C  
       INTEGER debLevZero  
       PARAMETER(debLevZero=0)  
       INTEGER debLevA  
       PARAMETER(debLevA=1)  
       INTEGER debLevB  
       PARAMETER(debLevB=2)  
   
197  C--   COMMON /PARM_L/ Logical valued parameters used by the model.  C--   COMMON /PARM_L/ Logical valued parameters used by the model.
198  C- Coordinate + Grid params:  C- Coordinate + Grid params:
199  C     fluidIsAir       :: Set to indicate that the fluid major constituent  C     fluidIsAir       :: Set to indicate that the fluid major constituent
# Line 406  C                        & Last iteratio Line 379  C                        & Last iteratio
379        LOGICAL useCoriolis        LOGICAL useCoriolis
380        LOGICAL vectorInvariantMomentum        LOGICAL vectorInvariantMomentum
381        LOGICAL tempAdvection        LOGICAL tempAdvection
382          LOGICAL tempIsActiveTr
383        LOGICAL tempForcing        LOGICAL tempForcing
384        LOGICAL saltAdvection        LOGICAL saltAdvection
385          LOGICAL saltIsActiveTr
386        LOGICAL saltForcing        LOGICAL saltForcing
387        LOGICAL useRealFreshWaterFlux        LOGICAL useRealFreshWaterFlux
388        LOGICAL useFullLeith        LOGICAL useFullLeith
# Line 910  C Logical flags for selecting packages Line 885  C Logical flags for selecting packages
885        LOGICAL useEMBED_FILES        LOGICAL useEMBED_FILES
886        LOGICAL useMYPACKAGE        LOGICAL useMYPACKAGE
887        LOGICAL useSALT_PLUME        LOGICAL useSALT_PLUME
888          LOGICAL useCheapAML
889        COMMON /PARM_PACKAGES/        COMMON /PARM_PACKAGES/
890       &        useOPPS, usePP81, useMY82, useGGL90, useKPP,       &        useOPPS, usePP81, useMY82, useGGL90, useKPP,
891       &        useGAD, useGMRedi, useOBCS, useAIM, useLand,       &        useGAD, useGMRedi, useOBCS, useAIM, useLand,
# Line 919  C Logical flags for selecting packages Line 895  C Logical flags for selecting packages
895       &        useSBO, useSEAICE, useShelfIce,       &        useSBO, useSEAICE, useShelfIce,
896       &        useThSIce, useATM2D, useBulkForce,       &        useThSIce, useATM2D, useBulkForce,
897       &        usefizhi, usegridalt, useDiagnostics, useMNC, useREGRID,       &        usefizhi, usegridalt, useDiagnostics, useMNC, useREGRID,
898       &        useRunClock, useEMBED_FILES, useMYPACKAGE, useSALT_PLUME       &        useRunClock, useEMBED_FILES, useSALT_PLUME, useCheapAML,
899         &        useMYPACKAGE
900  CEH3 ;;; Local Variables: ***  CEH3 ;;; Local Variables: ***
901  CEH3 ;;; mode:fortran ***  CEH3 ;;; mode:fortran ***
902  CEH3 ;;; End: ***  CEH3 ;;; End: ***
Legend:
Removed from v.1.215  
changed lines
  Added in v.1.219
  ViewVC Help
Powered by ViewVC 1.1.22