/[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.34 by cnh, Fri Nov 6 22:44:43 1998 UTC revision 1.36 by adcroft, Tue Dec 15 00:20:34 1998 UTC
# Line 23  C     Symbolic values Line 23  C     Symbolic values
23  C     precXXXX - Used to indicate what precision to use for  C     precXXXX - Used to indicate what precision to use for
24  C                dumping model state.  C                dumping model state.
25        INTEGER precFloat32        INTEGER precFloat32
26        PARAMETER ( precFloat32 = 0 )        PARAMETER ( precFloat32 = 32 )
27        INTEGER precFloat64        INTEGER precFloat64
28        PARAMETER ( precFloat64 = 1 )        PARAMETER ( precFloat64 = 64 )
29  C     UNSET_xxx - Used to indicate variables that have not been given a value  C     UNSET_xxx - Used to indicate variables that have not been given a value
30        Real*8 UNSET_FLOAT8        Real*8 UNSET_FLOAT8
31        PARAMETER ( UNSET_FLOAT8 = 1.234567D5 )        PARAMETER ( UNSET_FLOAT8 = 1.234567D5 )
# Line 123  C     usingCartesianGrid - If TRUE grid Line 123  C     usingCartesianGrid - If TRUE grid
123  C                          coordinate frame.  C                          coordinate frame.
124  C     usingSphericalPolarGrid - If TRUE grid generation will be in a  C     usingSphericalPolarGrid - If TRUE grid generation will be in a
125  C                               spherical polar frame.  C                               spherical polar frame.
126    C     no_slip_sides - Impose "no-slip" at lateral boundaries.
127    C     no_slip_bottom- Impose "no-slip" at bottom boundary.
128  C     momViscosity  - Flag which turns momentum friction terms on and off.  C     momViscosity  - Flag which turns momentum friction terms on and off.
129  C     momAdvection  - Flag which turns advection of momentum on and off.  C     momAdvection  - Flag which turns advection of momentum on and off.
130  C     momForcing    - Flag which turns external forcing of momentum on  C     momForcing    - Flag which turns external forcing of momentum on
# Line 162  C     usingPCoords     - Set to indicate Line 164  C     usingPCoords     - Set to indicate
164  C                        coords.  C                        coords.
165  C     usingZCoords     - Set to indicate that we are working in height  C     usingZCoords     - Set to indicate that we are working in height
166  C                        coords.  C                        coords.
167    C     openBoundaries - Using open-boundaries
168        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
169         & no_slip_sides,no_slip_bottom,
170       & momViscosity, momAdvection, momForcing, useCoriolis,       & momViscosity, momAdvection, momForcing, useCoriolis,
171       & momPressureForcing,tempDiffusion, tempAdvection, tempForcing,       & momPressureForcing,tempDiffusion, tempAdvection, tempForcing,
172       & saltDiffusion, saltAdvection, saltForcing,       & saltDiffusion, saltAdvection, saltForcing,
# Line 171  C                        coords. Line 175  C                        coords.
175       & metricTerms, usingSphericalPolarMTerms,       & metricTerms, usingSphericalPolarMTerms,
176       & useConstantF, useBetaPlaneF, useSphereF,       & useConstantF, useBetaPlaneF, useSphereF,
177       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,       & implicitDiffusion, doThetaClimRelax, doSaltClimRelax,
178       & periodicExternalForcing, usingPCoords, usingZCoords       & periodicExternalForcing, usingPCoords, usingZCoords,
179         & openBoundaries
180        LOGICAL usingCartesianGrid        LOGICAL usingCartesianGrid
181        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
182        LOGICAL usingSphericalPolarMTerms        LOGICAL usingSphericalPolarMTerms
183          LOGICAL no_slip_sides
184          LOGICAL no_slip_bottom
185        LOGICAL momViscosity        LOGICAL momViscosity
186        LOGICAL momAdvection        LOGICAL momAdvection
187        LOGICAL momForcing        LOGICAL momForcing
# Line 201  C                        coords. Line 208  C                        coords.
208        LOGICAL periodicExternalForcing        LOGICAL periodicExternalForcing
209        LOGICAL usingPCoords        LOGICAL usingPCoords
210        LOGICAL usingZCoords        LOGICAL usingZCoords
211          LOGICAL openBoundaries
212    
213  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
214  C     cg2dTargetResidual  C     cg2dTargetResidual
# Line 430  C                          circles ( see Line 438  C                          circles ( see
438        _RL recip_horiVertRatio        _RL recip_horiVertRatio
439        _RL latFFTFiltLo        _RL latFFTFiltLo
440    
441        COMMON /PARM_A/ HeatCapacity_Cp,        COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp,
442       &                Lamba_theta       &                Lamba_theta
443        _RL HeatCapacity_Cp        _RL HeatCapacity_Cp
444        _RL Lamba_theta        _RL Lamba_theta
445          _RL recip_Cp
446    
447  C Equation of State (polynomial coeffients)  C Equation of State (polynomial coeffients)
448        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS        COMMON /PARM_EOS_NL/ eosC,eosSig0,eosRefT,eosRefS
# Line 446  C     sBeta     - Linear EOS haline cont Line 455  C     sBeta     - Linear EOS haline cont
455        _RL sBeta        _RL sBeta
456        character*(6) eosType        character*(6) eosType
457    
458    C These are input arrays (of integers) that contain the *absolute*
459    C computational index of an open-boundary (OB) point.
460    C A zero (0) element means there is no corresponding OB in that column/row.
461    C The computational coordinate refers to "tracer" cells.
462    C For a northern/southern OB, the OB V point is to the south/north.
463    C For an eastern/western OB, the OB U point is to the west/east.
464    C eg.
465    C     OB_Jnorth(3)=34  means that:
466    C          T( 3 ,34) is a an OB point
467    C          U(3:4,34) is a an OB point
468    C          V( 4 ,34) is a an OB point
469    C while
470    C     OB_Jsouth(3)=1  means that:
471    C          T( 3 ,1) is a an OB point
472    C          U(3:4,1) is a an OB point
473    C          V( 4 ,2) is a an OB point
474    C
475    C For convenience, negative values for Jnorth/Ieast refer to
476    C points relative to the Northern/Eastern edges of the model
477    C eg. OB_Jnorth(3)=-1  means that the point (3,Ny-1) is a northern O-B.
478    C
479          COMMON /PARM_OB/
480         & OB_Jnorth,OB_Jsouth,OB_Ieast,OB_Iwest
481          INTEGER OB_Jnorth(Nx)
482          INTEGER OB_Jsouth(Nx)
483          INTEGER OB_Ieast(Ny)
484          INTEGER OB_Iwest(Ny)
Legend:
Removed from v.1.34  
changed lines
  Added in v.1.36
  ViewVC Help
Powered by ViewVC 1.1.22