/[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.33 by cnh, Wed Oct 28 03:11:36 1998 UTC revision 1.35 by adcroft, Tue Dec 8 19:44:28 1998 UTC
# Line 88  C     writeStatePrec      - Precision us Line 88  C     writeStatePrec      - Precision us
88  C     writeBinaryPrec     - Precision used for writing binary files  C     writeBinaryPrec     - Precision used for writing binary files
89  C     readBinaryPrec      - Precision used for reading binary files  C     readBinaryPrec      - Precision used for reading binary files
90  C     nCheckLev           - Holds current checkpoint level  C     nCheckLev           - Holds current checkpoint level
91    C     nShap               - "Order" of shapiro filter to apply to
92    C                           model prognositic fields.
93    C                           nShap == 1 => del2
94    C                           nShap == 2 => del4
95    C                           nShap == 3 => del6
96    C                           etc...
97    
98        COMMON /PARM_I/        COMMON /PARM_I/
99       &        cg2dMaxIters,       &        cg2dMaxIters,
100       &        cg2dChkResFreq,       &        cg2dChkResFreq,
# Line 96  C     nCheckLev           - Holds curren Line 103  C     nCheckLev           - Holds curren
103       &        nIter0, nTimeSteps,       &        nIter0, nTimeSteps,
104       &        numStepsPerPickup,       &        numStepsPerPickup,
105       &        writeStatePrec, nCheckLev,       &        writeStatePrec, nCheckLev,
106       &        writeBinaryPrec, readBinaryPrec       &        writeBinaryPrec, readBinaryPrec,
107         &        nShap
108        INTEGER cg2dMaxIters        INTEGER cg2dMaxIters
109        INTEGER cg2dChkResFreq        INTEGER cg2dChkResFreq
110        INTEGER cg3dMaxIters        INTEGER cg3dMaxIters
# Line 108  C     nCheckLev           - Holds curren Line 116  C     nCheckLev           - Holds curren
116        INTEGER writeBinaryPrec        INTEGER writeBinaryPrec
117        INTEGER readBinaryPrec        INTEGER readBinaryPrec
118        INTEGER nCheckLev        INTEGER nCheckLev
119          INTEGER nShap
120    
121  C--   COMMON /PARM_L/ Logical valued parameters used by the model.  C--   COMMON /PARM_L/ Logical valued parameters used by the model.
122  C     usingCartesianGrid - If TRUE grid generation will be in a cartesian  C     usingCartesianGrid - If TRUE grid generation will be in a cartesian
# Line 153  C     usingPCoords     - Set to indicate Line 162  C     usingPCoords     - Set to indicate
162  C                        coords.  C                        coords.
163  C     usingZCoords     - Set to indicate that we are working in height  C     usingZCoords     - Set to indicate that we are working in height
164  C                        coords.  C                        coords.
165    C     openBoundaries - Using open-boundaries
166        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
167       & momViscosity, momAdvection, momForcing, useCoriolis,       & momViscosity, momAdvection, momForcing, useCoriolis,
168       & momPressureForcing,tempDiffusion, tempAdvection, tempForcing,       & momPressureForcing,tempDiffusion, tempAdvection, tempForcing,
# Line 162  C                        coords. Line 172  C                        coords.
172       & metricTerms, usingSphericalPolarMTerms,       & metricTerms, usingSphericalPolarMTerms,
173       & useConstantF, useBetaPlaneF, useSphereF,       & useConstantF, useBetaPlaneF, useSphereF,
174       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,
175       & periodicExternalForcing, usingPCoords, usingZCoords       & periodicExternalForcing, usingPCoords, usingZCoords,
176         & openBoundaries
177        LOGICAL usingCartesianGrid        LOGICAL usingCartesianGrid
178        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
179        LOGICAL usingSphericalPolarMTerms        LOGICAL usingSphericalPolarMTerms
# Line 192  C                        coords. Line 203  C                        coords.
203        LOGICAL periodicExternalForcing        LOGICAL periodicExternalForcing
204        LOGICAL usingPCoords        LOGICAL usingPCoords
205        LOGICAL usingZCoords        LOGICAL usingZCoords
206          LOGICAL openBoundaries
207    
208  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
209  C     cg2dTargetResidual  C     cg2dTargetResidual
# Line 314  C                           number times Line 326  C                           number times
326  C     horiVertRatio      - Ratio on units in vertical to units in horizontal.  C     horiVertRatio      - Ratio on units in vertical to units in horizontal.
327  C     recip_horiVertRatio  ( 1 if horiz in m and vertical in m ).  C     recip_horiVertRatio  ( 1 if horiz in m and vertical in m ).
328  C                          ( g*rho if horiz in m and vertical in Pa ).  C                          ( g*rho if horiz in m and vertical in Pa ).
329    C     latFFTFiltLo       - Low latitude for FFT filtering of latitude
330    C                          circles ( see filter*.F )
331        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac,        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac,
332       & cg3dTargetResidual,       & cg3dTargetResidual,
333       & delP, delZ, delR, delX, delY,       & delP, delZ, delR, delX, delY,
# Line 332  C                          ( g*rho if ho Line 346  C                          ( g*rho if ho
346       & tauSaltClimRelax, lambdaSaltClimRelax,       & tauSaltClimRelax, lambdaSaltClimRelax,
347       & externForcingCycle, externForcingPeriod,       & externForcingCycle, externForcingPeriod,
348       & viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp,       & viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp,
349       & theta_S, specVol_S, horiVertRatio, recip_horiVertRatio       & theta_S, specVol_S, horiVertRatio, recip_horiVertRatio,
350         & latFFTFiltLo
351    
352        _RL cg2dTargetResidual        _RL cg2dTargetResidual
353        _RL cg3dTargetResidual        _RL cg3dTargetResidual
# Line 416  C                          ( g*rho if ho Line 431  C                          ( g*rho if ho
431        _RL externForcingPeriod        _RL externForcingPeriod
432        _RL horiVertRatio        _RL horiVertRatio
433        _RL recip_horiVertRatio        _RL recip_horiVertRatio
434          _RL latFFTFiltLo
435    
436        COMMON /PARM_A/ HeatCapacity_Cp,        COMMON /PARM_A/ HeatCapacity_Cp,
437       &                Lamba_theta       &                Lamba_theta
# Line 433  C     sBeta     - Linear EOS haline cont Line 449  C     sBeta     - Linear EOS haline cont
449        _RL sBeta        _RL sBeta
450        character*(6) eosType        character*(6) eosType
451    
452    C These are input arrays (of integers) that contain the *absolute*
453    C computational index of an open-boundary (OB) point.
454    C A zero (0) element means there is no corresponding OB in that column/row.
455    C The computational coordinate refers to "tracer" cells.
456    C For a northern/southern OB, the OB V point is to the south/north.
457    C For an eastern/western OB, the OB U point is to the west/east.
458    C eg.
459    C     OB_Jnorth(3)=34  means that:
460    C          T( 3 ,34) is a an OB point
461    C          U(3:4,34) is a an OB point
462    C          V( 4 ,34) is a an OB point
463    C while
464    C     OB_Jsouth(3)=1  means that:
465    C          T( 3 ,1) is a an OB point
466    C          U(3:4,1) is a an OB point
467    C          V( 4 ,2) is a an OB point
468    C
469    C For convenience, negative values for Jnorth/Ieast refer to
470    C points relative to the Northern/Eastern edges of the model
471    C eg. OB_Jnorth(3)=-1  means that the point (3,Ny-1) is a northern O-B.
472    C
473          COMMON /PARM_OB/
474         & OB_Jnorth,OB_Jsouth,OB_Ieast,OB_Iwest
475          INTEGER OB_Jnorth(Nx)
476          INTEGER OB_Jsouth(Nx)
477          INTEGER OB_Ieast(Ny)
478          INTEGER OB_Iwest(Ny)
Legend:
Removed from v.1.33  
changed lines
  Added in v.1.35
  ViewVC Help
Powered by ViewVC 1.1.22