/[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.206 by jmc, Mon Oct 22 13:08:21 2007 UTC revision 1.212 by mlosch, Tue Feb 5 13:32:18 2008 UTC
# Line 84  C     surfQnetFile    :: File containing Line 84  C     surfQnetFile    :: File containing
84  C     surfQswFile     :: File containing surface shortwave radiation  C     surfQswFile     :: File containing surface shortwave radiation
85  C     dQdTfile        :: File containing thermal relaxation coefficient  C     dQdTfile        :: File containing thermal relaxation coefficient
86  C     EmPmRfile       :: File containing surface fresh water flux  C     EmPmRfile       :: File containing surface fresh water flux
87    C           NOTE: for backward compatibility EmPmRfile is specified in
88    C                 m/s when using external_fields_load.F.  It is converted
89    C                 to kg/m2/s by multiplying by rhoConstFresh.
90  C     saltFluxFile    :: File containing surface salt flux  C     saltFluxFile    :: File containing surface salt flux
91  C     pLoadFile       :: File containing pressure loading  C     pLoadFile       :: File containing pressure loading
92  C     eddyTauxFile    :: File containing zonal Eddy stress data  C     eddyTauxFile    :: File containing zonal Eddy stress data
# Line 170  C     tempVertAdvScheme   :: Temp. Vert. Line 173  C     tempVertAdvScheme   :: Temp. Vert.
173  C     saltAdvScheme       :: Salt. Horiz.advection scheme selector  C     saltAdvScheme       :: Salt. Horiz.advection scheme selector
174  C     saltVertAdvScheme   :: Salt. Vert. Advection scheme selector  C     saltVertAdvScheme   :: Salt. Vert. Advection scheme selector
175  C     selectKEscheme      :: Kinetic Energy scheme selector (Vector Inv.)  C     selectKEscheme      :: Kinetic Energy scheme selector (Vector Inv.)
176    C     monitorSelect       :: select group of variables to monitor
177    C                            =1 : dynvars ; =2 : + vort ; =3 : + surface
178  C     debugLevel          :: debug level selector: higher -> more writing  C     debugLevel          :: debug level selector: higher -> more writing
179    
180        COMMON /PARM_I/        COMMON /PARM_I/
# Line 185  C     debugLevel          :: debug level Line 190  C     debugLevel          :: debug level
190       &        tempAdvScheme, tempVertAdvScheme,       &        tempAdvScheme, tempVertAdvScheme,
191       &        saltAdvScheme, saltVertAdvScheme,       &        saltAdvScheme, saltVertAdvScheme,
192       &        selectKEscheme,       &        selectKEscheme,
193       &        debugLevel       &        monitorSelect, debugLevel
194        INTEGER cg2dMaxIters        INTEGER cg2dMaxIters
195        INTEGER cg2dChkResFreq        INTEGER cg2dChkResFreq
196        INTEGER cg2dPreCondFreq        INTEGER cg2dPreCondFreq
# Line 203  C     debugLevel          :: debug level Line 208  C     debugLevel          :: debug level
208        INTEGER tempAdvScheme, tempVertAdvScheme        INTEGER tempAdvScheme, tempVertAdvScheme
209        INTEGER saltAdvScheme, saltVertAdvScheme        INTEGER saltAdvScheme, saltVertAdvScheme
210        INTEGER selectKEscheme        INTEGER selectKEscheme
211          INTEGER monitorSelect
212        INTEGER debugLevel        INTEGER debugLevel
213    
214  C  C
# Line 325  C                        & Last iteratio Line 331  C                        & Last iteratio
331  C     balanceEmPmR    :: substract global mean of EmPmR at every time step  C     balanceEmPmR    :: substract global mean of EmPmR at every time step
332  C     balanceQnet     :: substract global mean of Qnet at every time step  C     balanceQnet     :: substract global mean of Qnet at every time step
333  C     balancePrintMean:: print substracted global means to STDOUT  C     balancePrintMean:: print substracted global means to STDOUT
334    C     rotateGrid      :: rotate grid coordinates to geographical coordinates
335    C                        according to Euler angles phiEuler, thetaEuler, psiEuler
336    
337        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
338       & usingCurvilinearGrid, usingCylindricalGrid,       & usingCurvilinearGrid, usingCylindricalGrid,
# Line 362  C     balancePrintMean:: print substract Line 370  C     balancePrintMean:: print substract
370       & timeave_mdsio, snapshot_mdsio, monitor_stdio,       & timeave_mdsio, snapshot_mdsio, monitor_stdio,
371       & outputTypesInclusive, dumpInitAndLast, debugMode,       & outputTypesInclusive, dumpInitAndLast, debugMode,
372       & inAdMode, inAdTrue, inAdFalse, inAdExact,       & inAdMode, inAdTrue, inAdFalse, inAdExact,
373       & balanceEmPmR, balanceQnet, balancePrintMean       & balanceEmPmR, balanceQnet, balancePrintMean,
374         & rotateGrid
375    
376        LOGICAL usingCartesianGrid        LOGICAL usingCartesianGrid
377        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
# Line 452  C     balancePrintMean:: print substract Line 461  C     balancePrintMean:: print substract
461        LOGICAL balanceQnet        LOGICAL balanceQnet
462        LOGICAL balancePrintMean        LOGICAL balancePrintMean
463    
464          LOGICAL rotateGrid
465    
466  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
467  C     cg2dTargetResidual  C     cg2dTargetResidual
468  C          :: Target residual for cg2d solver; no unit (RHS normalisation)  C          :: Target residual for cg2d solver; no unit (RHS normalisation)
# Line 660  C                           is to be rep Line 671  C                           is to be rep
671  C                           (affects myabs, mymin, mymax)  C                           (affects myabs, mymin, mymax)
672  C     nh_Am2        :: scales the non-hydrostatic terms and changes internal scales  C     nh_Am2        :: scales the non-hydrostatic terms and changes internal scales
673  C                      (i.e. allows convection at different Rayleigh numbers)  C                      (i.e. allows convection at different Rayleigh numbers)
674    C     phiEuler      :: Euler angle, rotation about original z-axis
675    C     thetaEuler    :: Euler angle, rotation about new x-axis
676    C     psiEuler      :: Euler angle, rotation about new z-axis
677        COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit,        COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit,
678       & cg2dpcOffDFac, cg3dTargetResidual,       & cg2dpcOffDFac, cg3dTargetResidual,
679       & delR, delRc, delX, delY,       & delR, delRc, delX, delY,
# Line 700  C                      (i.e. allows conv Line 714  C                      (i.e. allows conv
714       & ivdc_kappa, hMixCriteria, Ro_SeaLevel,       & ivdc_kappa, hMixCriteria, Ro_SeaLevel,
715       & sideDragFactor, bottomDragLinear, bottomDragQuadratic, nh_Am2,       & sideDragFactor, bottomDragLinear, bottomDragQuadratic, nh_Am2,
716       & smoothAbsFuncRange,       & smoothAbsFuncRange,
717       & tCylIn, tCylOut       & tCylIn, tCylOut,
718         & phiEuler, thetaEuler, psiEuler
719    
720        _RL cg2dTargetResidual        _RL cg2dTargetResidual
721        _RL cg2dTargetResWunit        _RL cg2dTargetResWunit
# Line 828  C                      (i.e. allows conv Line 843  C                      (i.e. allows conv
843        _RL nh_Am2        _RL nh_Am2
844        _RL tCylIn        _RL tCylIn
845        _RL tCylOut        _RL tCylOut
846          _RL phiEuler, thetaEuler, psiEuler
847    
848  C--   COMMON /PARM_A/ Thermodynamics constants ?  C--   COMMON /PARM_A/ Thermodynamics constants ?
849        COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp        COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp
# Line 892  C Logical flags for selecting packages Line 908  C Logical flags for selecting packages
908        LOGICAL useRunClock        LOGICAL useRunClock
909        LOGICAL useEMBED_FILES        LOGICAL useEMBED_FILES
910        LOGICAL useMYPACKAGE        LOGICAL useMYPACKAGE
911          LOGICAL useSALT_PLUME
912        COMMON /PARM_PACKAGES/        COMMON /PARM_PACKAGES/
913       &        useOPPS, usePP81, useMY82, useGGL90, useKPP,       &        useOPPS, usePP81, useMY82, useGGL90, useKPP,
914       &        useGAD, useGMRedi, useOBCS, useAIM, useLand,       &        useGAD, useGMRedi, useOBCS, useAIM, useLand,
# Line 901  C Logical flags for selecting packages Line 918  C Logical flags for selecting packages
918       &        useSBO, useSEAICE, useShelfIce,       &        useSBO, useSEAICE, useShelfIce,
919       &        useThSIce, useATM2D, useBulkForce,       &        useThSIce, useATM2D, useBulkForce,
920       &        usefizhi, usegridalt, useDiagnostics, useMNC, useREGRID,       &        usefizhi, usegridalt, useDiagnostics, useMNC, useREGRID,
921       &        useRunClock, useEMBED_FILES, useMYPACKAGE       &        useRunClock, useEMBED_FILES, useMYPACKAGE, useSALT_PLUME
922    
923  CEH3 ;;; Local Variables: ***  CEH3 ;;; Local Variables: ***
924  CEH3 ;;; mode:fortran ***  CEH3 ;;; mode:fortran ***
Legend:
Removed from v.1.206  
changed lines
  Added in v.1.212
  ViewVC Help
Powered by ViewVC 1.1.22