269 |
C useRealFreshWaterFlux :: if True (=Natural BCS), treats P+R-E flux |
C useRealFreshWaterFlux :: if True (=Natural BCS), treats P+R-E flux |
270 |
C as a real Fresh Water (=> changes the Sea Level) |
C as a real Fresh Water (=> changes the Sea Level) |
271 |
C if F, converts P+R-E to salt flux (no SL effect) |
C if F, converts P+R-E to salt flux (no SL effect) |
272 |
|
C- Pressure solver related parameters (PARM02) |
273 |
|
C useSRCGSolver :: Set to true to use conjugate gradient |
274 |
|
C solver with single reduction (only one call of |
275 |
|
C s/r mpi_allreduce), default is false |
276 |
C- Time-stepping params: |
C- Time-stepping params: |
277 |
C rigidLid :: Set to true to use rigid lid |
C rigidLid :: Set to true to use rigid lid |
278 |
C implicitFreeSurface :: Set to true to use implicit free surface |
C implicitFreeSurface :: Set to true to use implicit free surface |
367 |
& writePickupAtEnd, |
& writePickupAtEnd, |
368 |
& timeave_mdsio, snapshot_mdsio, monitor_stdio, |
& timeave_mdsio, snapshot_mdsio, monitor_stdio, |
369 |
& outputTypesInclusive, dumpInitAndLast, debugMode, |
& outputTypesInclusive, dumpInitAndLast, debugMode, |
370 |
& inAdMode, inAdTrue, inAdFalse, inAdExact |
& inAdMode, inAdTrue, inAdFalse, inAdExact, |
371 |
|
& useSRCGSolver |
372 |
|
|
373 |
LOGICAL fluidIsAir |
LOGICAL fluidIsAir |
374 |
LOGICAL fluidIsWater |
LOGICAL fluidIsWater |
460 |
LOGICAL dumpInitAndLast |
LOGICAL dumpInitAndLast |
461 |
LOGICAL debugMode |
LOGICAL debugMode |
462 |
LOGICAL inAdMode, inAdTrue, inAdFalse, inAdExact |
LOGICAL inAdMode, inAdTrue, inAdFalse, inAdExact |
463 |
|
LOGICAL useSRCGSolver |
464 |
|
|
465 |
C-- COMMON /PARM_R/ "Real" valued parameters used by the model. |
C-- COMMON /PARM_R/ "Real" valued parameters used by the model. |
466 |
C cg2dTargetResidual |
C cg2dTargetResidual |