/[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.40 by adcroft, Wed Jul 28 16:32:03 1999 UTC revision 1.45 by heimbach, Mon Sep 11 23:12:20 2000 UTC
# Line 56  C                       in relaxation te Line 56  C                       in relaxation te
56  C     saltClimFile    - File containing salt climataology used  C     saltClimFile    - File containing salt climataology used
57  C                       in relaxation term -lambda(salt-salt*)  C                       in relaxation term -lambda(salt-salt*)
58  C     surfQfile       - File containing surface heat flux  C     surfQfile       - File containing surface heat flux
59    C     surfQswfile     - File containing surface shortwave radiation
60  C     EmPmRfile       - File containing surface fresh water flux  C     EmPmRfile       - File containing surface fresh water flux
61  C     buoyancyRelation - Flag used to indicate which relation to use to  C     buoyancyRelation - Flag used to indicate which relation to use to
62  C                        get buoyancy.  C                        get buoyancy.
# Line 63  C                        get buoyancy. Line 64  C                        get buoyancy.
64       &                bathyFile, hydrogThetaFile, hydrogSaltFile,       &                bathyFile, hydrogThetaFile, hydrogSaltFile,
65       &                zonalWindFile, meridWindFile, thetaClimFile,       &                zonalWindFile, meridWindFile, thetaClimFile,
66       &                saltClimFile, buoyancyRelation,       &                saltClimFile, buoyancyRelation,
67       &                EmPmRfile,surfQfile       &                EmPmRfile, surfQfile, surfQswfile,
68         &                uVelInitFile, vVelInitFile, pSurfInitFile
69        CHARACTER*(5) checkPtSuff(maxNoChkptLev)        CHARACTER*(5) checkPtSuff(maxNoChkptLev)
70        CHARACTER*(MAX_LEN_FNAM) bathyFile        CHARACTER*(MAX_LEN_FNAM) bathyFile
71        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile        CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile
# Line 73  C                        get buoyancy. Line 75  C                        get buoyancy.
75        CHARACTER*(MAX_LEN_FNAM) thetaClimFile        CHARACTER*(MAX_LEN_FNAM) thetaClimFile
76        CHARACTER*(MAX_LEN_FNAM) saltClimFile        CHARACTER*(MAX_LEN_FNAM) saltClimFile
77        CHARACTER*(MAX_LEN_FNAM) surfQfile        CHARACTER*(MAX_LEN_FNAM) surfQfile
78          CHARACTER*(MAX_LEN_FNAM) surfQswfile
79        CHARACTER*(MAX_LEN_FNAM) EmPmRfile        CHARACTER*(MAX_LEN_FNAM) EmPmRfile
80        CHARACTER*(MAX_LEN_FNAM) buoyancyRelation        CHARACTER*(MAX_LEN_FNAM) buoyancyRelation
81          CHARACTER*(MAX_LEN_FNAM) uVelInitFile
82          CHARACTER*(MAX_LEN_FNAM) vVelInitFile
83          CHARACTER*(MAX_LEN_FNAM) pSurfInitFile
84    
85  C--   COMMON /PARM_I/ Integer valued parameters used by the model.  C--   COMMON /PARM_I/ Integer valued parameters used by the model.
86  C     cg2dMaxIters        - Maximum number of iterations in the  C     cg2dMaxIters        - Maximum number of iterations in the
# Line 105  C                           etc... Line 111  C                           etc...
111       &        cg2dChkResFreq,       &        cg2dChkResFreq,
112       &        cg3dMaxIters,       &        cg3dMaxIters,
113       &        cg3dChkResFreq,       &        cg3dChkResFreq,
114       &        nIter0, nTimeSteps,       &        nIter0, nTimeSteps, nEndIter,
115       &        numStepsPerPickup,       &        numStepsPerPickup,
116       &        writeStatePrec, nCheckLev,       &        writeStatePrec, nCheckLev,
117       &        writeBinaryPrec, readBinaryPrec,       &        writeBinaryPrec, readBinaryPrec,
# Line 116  C                           etc... Line 122  C                           etc...
122        INTEGER cg3dChkResFreq        INTEGER cg3dChkResFreq
123        INTEGER nIter0        INTEGER nIter0
124        INTEGER nTimeSteps        INTEGER nTimeSteps
125          INTEGER nEndIter
126        INTEGER numStepsPerPickup        INTEGER numStepsPerPickup
127        INTEGER writeStatePrec        INTEGER writeStatePrec
128        INTEGER writeBinaryPrec        INTEGER writeBinaryPrec
# Line 313  C     hFacMinDp    - Minimum dimesional Line 320  C     hFacMinDp    - Minimum dimesional
320  C     hFacMinDr    - Minimum dimesional size of a cell (affects hFacC etc..., units of r)  C     hFacMinDr    - Minimum dimesional size of a cell (affects hFacC etc..., units of r)
321  C     tauCD        - CD scheme coupling timescale ( 1/s )  C     tauCD        - CD scheme coupling timescale ( 1/s )
322  C     rCD          - CD scheme normalised coupling parameter ( 0-1 )  C     rCD          - CD scheme normalised coupling parameter ( 0-1 )
 C     GMmaxslope    - max. slope allowed in GM/Redi tensor  
 C     GMlength      - Length to use in Visbeck et al. formula for K (m)  
 C     GMalpha       - alpha to use in Visbeck et al. formula for K  
 C     GMdepth       - Depth over which to integrate Richardson # (Visbeck et al.)  
 C     GMkbackground - background value of GM/Redi diffusion coefficient ( m^2/s )  
 C     GMmaxval      - max. value of KapGM allowed in GM/Redi scheme ( m^2/s )  
323  C     startTime     - Starting time for this integration ( s ).  C     startTime     - Starting time for this integration ( s ).
324  C     endTime       - Ending time for this integration ( s ).  C     endTime       - Ending time for this integration ( s ).
325  C     chkPtFreq     - Frequency of rolling check pointing ( s ).  C     chkPtFreq     - Frequency of rolling check pointing ( s ).
# Line 358  C                          circles ( see Line 359  C                          circles ( see
359       & diffKhT, diffKzT, diffK4T, diffKrT,       & diffKhT, diffKzT, diffK4T, diffKrT,
360       & diffKhS, diffKzS, diffK4S, diffKrS,       & diffKhS, diffKzS, diffK4S, diffKrS,
361       & delT, tauCD, rCD, freeSurfFac, hFacMin, hFacMinDz,       & delT, tauCD, rCD, freeSurfFac, hFacMin, hFacMinDz,
      & GMmaxslope,GMlength,GMalpha,GMdepth,GMkbackground,GMmaxval,  
362       & gravity, recip_Gravity, gBaro, rhonil, recip_rhonil,       & gravity, recip_Gravity, gBaro, rhonil, recip_rhonil,
363       & recip_rhoConst, rhoConst, tRef, sRef,       & recip_rhoConst, rhoConst, tRef, sRef,
364       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq,       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq,
# Line 369  C                          circles ( see Line 369  C                          circles ( see
369       & externForcingCycle, externForcingPeriod,       & externForcingCycle, externForcingPeriod,
370       & viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp,       & viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp,
371       & theta_S, specVol_S, horiVertRatio, recip_horiVertRatio,       & theta_S, specVol_S, horiVertRatio, recip_horiVertRatio,
372       & latFFTFiltLo       & latFFTFiltLo, ivdc_kappa
373    
374        _RL cg2dTargetResidual        _RL cg2dTargetResidual
375        _RL cg3dTargetResidual        _RL cg3dTargetResidual
# Line 413  C                          circles ( see Line 413  C                          circles ( see
413        _RL delt        _RL delt
414        _RL tauCD        _RL tauCD
415        _RL rCD        _RL rCD
       _RL GMmaxslope  
       _RL GMlength  
       _RL GMalpha  
       _RL GMdepth  
       _RL GMkbackground  
       _RL GMmaxval  
416        _RL gravity        _RL gravity
417        _RL recip_gravity        _RL recip_gravity
418        _RL gBaro        _RL gBaro
# Line 455  C                          circles ( see Line 449  C                          circles ( see
449        _RL horiVertRatio        _RL horiVertRatio
450        _RL recip_horiVertRatio        _RL recip_horiVertRatio
451        _RL latFFTFiltLo        _RL latFFTFiltLo
452          _RL ivdc_kappa
453    
454        COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp,        COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp,
455       &                Lamba_theta       &                Lamba_theta
# Line 500  C Line 495  C
495        INTEGER OB_Jsouth(Nx)        INTEGER OB_Jsouth(Nx)
496        INTEGER OB_Ieast(Ny)        INTEGER OB_Ieast(Ny)
497        INTEGER OB_Iwest(Ny)        INTEGER OB_Iwest(Ny)
498    
499    C Logical flags for selecting packages
500          LOGICAL useKPP
501          LOGICAL useGMRedi
502          LOGICAL useECCO
503          COMMON /PARM_PACKAGES/
504         &        useKPP, useGMRedi, useECCO
Legend:
Removed from v.1.40  
changed lines
  Added in v.1.45
  ViewVC Help
Powered by ViewVC 1.1.22