/[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.50 by heimbach, Sun Mar 25 22:33:52 2001 UTC revision 1.53 by adcroft, Wed May 30 19:33:18 2001 UTC
# Line 103  C     writeStatePrec      - Precision us Line 103  C     writeStatePrec      - Precision us
103  C     writeBinaryPrec     - Precision used for writing binary files  C     writeBinaryPrec     - Precision used for writing binary files
104  C     readBinaryPrec      - Precision used for reading binary files  C     readBinaryPrec      - Precision used for reading binary files
105  C     nCheckLev           - Holds current checkpoint level  C     nCheckLev           - Holds current checkpoint level
 C     nShap               - "Order" of shapiro filter to apply to  
 C                           model prognositic fields.  
 C                           nShap == 1 => del2  
 C                           nShap == 2 => del4  
 C                           nShap == 3 => del6  
 C                           etc...  
106    
107        COMMON /PARM_I/        COMMON /PARM_I/
108       &        cg2dMaxIters,       &        cg2dMaxIters,
# Line 119  C                           etc... Line 113  C                           etc...
113       &        numStepsPerPickup,       &        numStepsPerPickup,
114       &        writeStatePrec, nCheckLev,       &        writeStatePrec, nCheckLev,
115       &        writeBinaryPrec, readBinaryPrec,       &        writeBinaryPrec, readBinaryPrec,
116       &        nShap, zonal_filt_sinpow, zonal_filt_cospow       &        zonal_filt_sinpow, zonal_filt_cospow
117        INTEGER cg2dMaxIters        INTEGER cg2dMaxIters
118        INTEGER cg2dChkResFreq        INTEGER cg2dChkResFreq
119        INTEGER cg3dMaxIters        INTEGER cg3dMaxIters
# Line 132  C                           etc... Line 126  C                           etc...
126        INTEGER writeBinaryPrec        INTEGER writeBinaryPrec
127        INTEGER readBinaryPrec        INTEGER readBinaryPrec
128        INTEGER nCheckLev        INTEGER nCheckLev
       INTEGER nShap  
129        INTEGER zonal_filt_sinpow        INTEGER zonal_filt_sinpow
130        INTEGER zonal_filt_cospow        INTEGER zonal_filt_cospow
131    
# Line 165  C     saltAdvection - Flag which turns a Line 158  C     saltAdvection - Flag which turns a
158  C                     and off.  C                     and off.
159  C     saltForcing   - Flag which turns external forcing of salinit on  C     saltForcing   - Flag which turns external forcing of salinit on
160  C                     and off.  C                     and off.
 C     implicitFreeSurface - Set to true to use implcit free surface  
161  C     rigidLid            - Set to true to use rigid lid  C     rigidLid            - Set to true to use rigid lid
162    C     implicitFreeSurface - Set to true to use implcit free surface
163    C     exactConserv   -   Set to true to conserve exactly the total Volume
164    C     nonlinFreeSurf -   Set to true to use non-linear free surface
165  C     momStepping   - Turns momentum equation time-stepping off  C     momStepping   - Turns momentum equation time-stepping off
166  C     tempStepping  - Turns temperature equation time-stepping off  C     tempStepping  - Turns temperature equation time-stepping off
167  C     saltStepping  - Turns salinity equation time-stepping off  C     saltStepping  - Turns salinity equation time-stepping off
# Line 189  C     globalFiles    - Selects between " Line 184  C     globalFiles    - Selects between "
184  C     allowFreezing  - Allows water to freeze and form ice  C     allowFreezing  - Allows water to freeze and form ice
185  C     groundAtK1  - put the surface(k=1) at the Lower Boundary (=ground)  C     groundAtK1  - put the surface(k=1) at the Lower Boundary (=ground)
186        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,        COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid,
187         & usingCurvilinearGrid,
188       & no_slip_sides,no_slip_bottom,       & no_slip_sides,no_slip_bottom,
189       & staggerTimeStep,       & staggerTimeStep,
190       & momViscosity, momAdvection, momForcing, useCoriolis,       & momViscosity, momAdvection, momForcing, useCoriolis,
191       & momPressureForcing,tempDiffusion, tempAdvection, tempForcing,       & momPressureForcing,tempDiffusion, tempAdvection, tempForcing,
192       & saltDiffusion, saltAdvection, saltForcing,       & saltDiffusion, saltAdvection, saltForcing,
193       & implicitFreeSurface, rigidLid,       & rigidLid, implicitFreeSurface, exactConserv, nonlinFreeSurf,
194       & momStepping, tempStepping, saltStepping,       & momStepping, tempStepping, saltStepping,
195       & metricTerms, usingSphericalPolarMTerms,       & metricTerms, usingSphericalPolarMTerms,
196       & useConstantF, useBetaPlaneF, useSphereF,       & useConstantF, useBetaPlaneF, useSphereF,
# Line 202  C     groundAtK1  - put the surface(k=1) Line 198  C     groundAtK1  - put the surface(k=1)
198       & doThetaClimRelax, doSaltClimRelax,       & doThetaClimRelax, doSaltClimRelax,
199       & periodicExternalForcing, usingPCoords, usingZCoords,       & periodicExternalForcing, usingPCoords, usingZCoords,
200       & nonHydrostatic, globalFiles,       & nonHydrostatic, globalFiles,
201       & allowFreezing, groundAtK1       & allowFreezing, groundAtK1,
202         & usePickupBeforeC35
203        LOGICAL usingCartesianGrid        LOGICAL usingCartesianGrid
204        LOGICAL usingSphericalPolarGrid        LOGICAL usingSphericalPolarGrid
205          LOGICAL usingCurvilinearGrid
206        LOGICAL usingSphericalPolarMTerms        LOGICAL usingSphericalPolarMTerms
207        LOGICAL no_slip_sides        LOGICAL no_slip_sides
208        LOGICAL no_slip_bottom        LOGICAL no_slip_bottom
# Line 220  C     groundAtK1  - put the surface(k=1) Line 218  C     groundAtK1  - put the surface(k=1)
218        LOGICAL saltDiffusion        LOGICAL saltDiffusion
219        LOGICAL saltAdvection        LOGICAL saltAdvection
220        LOGICAL saltForcing        LOGICAL saltForcing
       LOGICAL implicitFreeSurface  
221        LOGICAL rigidLid        LOGICAL rigidLid
222          LOGICAL implicitFreeSurface
223          LOGICAL exactConserv
224          LOGICAL nonlinFreeSurf
225        LOGICAL momStepping        LOGICAL momStepping
226        LOGICAL tempStepping        LOGICAL tempStepping
227        LOGICAL saltStepping        LOGICAL saltStepping
# Line 240  C     groundAtK1  - put the surface(k=1) Line 240  C     groundAtK1  - put the surface(k=1)
240        LOGICAL globalFiles        LOGICAL globalFiles
241        LOGICAL allowFreezing        LOGICAL allowFreezing
242        LOGICAL groundAtK1        LOGICAL groundAtK1
243          LOGICAL usePickupBeforeC35
244    
245  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.  C--   COMMON /PARM_R/ "Real" valued parameters used by the model.
246  C     cg2dTargetResidual  C     gg2dTargetResidual
247  C               - Target residual for cg2d solver.  C          - Target residual for cg2d solver; no unit (RHS normalisation)
248    C     cg2dTargetResWunit
249    C          - Target residual for cg2d solver; W unit (No RHS normalisation)
250  C     cg3dTargetResidual  C     cg3dTargetResidual
251  C               - Target residual for cg3d solver.  C               - Target residual for cg3d solver.
252  C     cg2dpcOffDFac - Averaging weight for preconditioner off-diagonal.  C     cg2dpcOffDFac - Averaging weight for preconditioner off-diagonal.
# Line 331  C     hFacMin      - Minimum fraction si Line 334  C     hFacMin      - Minimum fraction si
334  C     hFacMinDz    - Minimum dimesional size of a cell (affects hFacC etc..., m)  C     hFacMinDz    - Minimum dimesional size of a cell (affects hFacC etc..., m)
335  C     hFacMinDp    - Minimum dimesional size of a cell (affects hFacC etc..., Pa)  C     hFacMinDp    - Minimum dimesional size of a cell (affects hFacC etc..., Pa)
336  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)
337    C     hFacInf      - Threshold (inf and sup) for fraction size of surface cell
338    C     hFacSup        that control vanishing and creating levels
339  C     tauCD        - CD scheme coupling timescale ( 1/s )  C     tauCD        - CD scheme coupling timescale ( 1/s )
340  C     rCD          - CD scheme normalised coupling parameter ( 0-1 )  C     rCD          - CD scheme normalised coupling parameter ( 0-1 )
341  C     startTime     - Starting time for this integration ( s ).  C     startTime     - Starting time for this integration ( s ).
# Line 367  C     Ro_SeaLevel        - standard posi Line 372  C     Ro_SeaLevel        - standard posi
372  C                          starting value (k=1) for vertical coordinate (rf(1)=Ro_SeaLevel)  C                          starting value (k=1) for vertical coordinate (rf(1)=Ro_SeaLevel)
373  C     bottomDragLinear   - Drag coefficient built in to core dynamics  C     bottomDragLinear   - Drag coefficient built in to core dynamics
374  C         "     Quadratic  ( linear: 1/s, quadratic: 1/m )  C         "     Quadratic  ( linear: 1/s, quadratic: 1/m )
375        COMMON /PARM_R/ cg2dTargetResidual, cg2dpcOffDFac,        COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit,
376       & cg3dTargetResidual,       & cg2dpcOffDFac, cg3dTargetResidual,
377       & delP, delZ, delR, delX, delY,       & delP, delZ, delR, delX, delY,
378       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime,       & deltaT,deltaTmom, deltaTtracer, deltaTClock,abeps, startTime,
379       & phiMin, thetaMin, rSphere, recip_RSphere, f0, fCori, beta,       & phiMin, thetaMin, rSphere, recip_RSphere, f0, beta,
380         & fCori, fCoriG,
381       & viscAh,  viscAz,  viscA4,  viscAr,       & viscAh,  viscAz,  viscA4,  viscAr,
382       & diffKhT, diffKzT, diffK4T, diffKrT,       & diffKhT, diffKzT, diffK4T, diffKrT,
383       & diffKhS, diffKzS, diffK4S, diffKrS,       & diffKhS, diffKzS, diffK4S, diffKrS,
384       & delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow,       & delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow,
385       & hFacMin, hFacMinDz,       & hFacMin, hFacMinDz, hFacInf, hFacSup,
386       & gravity, recip_Gravity, gBaro, rhonil, recip_rhonil,       & gravity, recip_Gravity, gBaro, rhonil, recip_rhonil,
387       & recip_rhoConst, rhoConst, tRef, sRef,       & recip_rhoConst, rhoConst, tRef, sRef,
388       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq,       & endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq, monitorFreq,
389       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,       & afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom,
390       & cosPower,       & cosPower,
391       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,       & cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax,
# Line 391  C         "     Quadratic  ( linear: 1/s Line 397  C         "     Quadratic  ( linear: 1/s
397       & bottomDragLinear,bottomDragQuadratic       & bottomDragLinear,bottomDragQuadratic
398    
399        _RL cg2dTargetResidual        _RL cg2dTargetResidual
400          _RL cg2dTargetResWunit
401        _RL cg3dTargetResidual        _RL cg3dTargetResidual
402        _RL cg2dpcOffDFac        _RL cg2dpcOffDFac
403        _RL delZ(Nr)        _RL delZ(Nr)
# Line 415  C         "     Quadratic  ( linear: 1/s Line 422  C         "     Quadratic  ( linear: 1/s
422        _RL hFacMinDz        _RL hFacMinDz
423        _RL hFacMinDp        _RL hFacMinDp
424        _RL hFacMinDr        _RL hFacMinDr
425          _RL hFacInf
426          _RL hFacSup
427        _RL beta        _RL beta
428        _RL viscAh        _RL viscAh
429        _RL viscAz        _RL viscAz
# Line 445  C         "     Quadratic  ( linear: 1/s Line 454  C         "     Quadratic  ( linear: 1/s
454        _RL tRef(Nr)        _RL tRef(Nr)
455        _RL theta_S(Nr)        _RL theta_S(Nr)
456        _RL sRef(Nr)        _RL sRef(Nr)
457        _RS Fcori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS fCori(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
458          _RS fCoriG(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
459        _RL startTime        _RL startTime
460        _RL endTime        _RL endTime
461        _RL chkPtFreq        _RL chkPtFreq
462        _RL pChkPtFreq        _RL pChkPtFreq
463        _RL dumpFreq        _RL dumpFreq
464        _RL taveFreq        _RL taveFreq
465          _RL monitorFreq
466        _RL afFacMom        _RL afFacMom
467        _RL vfFacMom        _RL vfFacMom
468        _RL pfFacMom        _RL pfFacMom
# Line 499  C Logical flags for selecting packages Line 510  C Logical flags for selecting packages
510        LOGICAL useOBCS        LOGICAL useOBCS
511        LOGICAL useAIM        LOGICAL useAIM
512        LOGICAL useECCO        LOGICAL useECCO
513          LOGICAL useSHAP_FILT
514        COMMON /PARM_PACKAGES/        COMMON /PARM_PACKAGES/
515       &        useKPP, useGMRedi, useOBCS, useAIM, useECCO       &        useKPP, useGMRedi, useOBCS, useAIM, useECCO, useSHAP_FILT
516    
Legend:
Removed from v.1.50  
changed lines
  Added in v.1.53
  ViewVC Help
Powered by ViewVC 1.1.22