33 |
C and read pickup files with this suffix (max 10 Char.) |
C and read pickup files with this suffix (max 10 Char.) |
34 |
C mdsioLocalDir :: read-write tiled file from/to this directory name |
C mdsioLocalDir :: read-write tiled file from/to this directory name |
35 |
C (+ 4 digits Processor-Rank) instead of current dir. |
C (+ 4 digits Processor-Rank) instead of current dir. |
36 |
C adTapeDir :: read-write checkpointing tape files from/to this |
C adTapeDir :: read-write checkpointing tape files from/to this |
37 |
C directory name instead of current dir. Conflicts |
C directory name instead of current dir. Conflicts |
38 |
C mdsioLocalDir, so only one of the two can be set. |
C mdsioLocalDir, so only one of the two can be set. |
39 |
C In contrast to mdsioLocalDir, if specified adTapeDir |
C In contrast to mdsioLocalDir, if specified adTapeDir |
357 |
C dumpInitAndLast :: dumps model state to files at Initial (nIter0) |
C dumpInitAndLast :: dumps model state to files at Initial (nIter0) |
358 |
C & Last iteration, in addition multiple of dumpFreq iter. |
C & Last iteration, in addition multiple of dumpFreq iter. |
359 |
C debugMode :: controls printing of debug msg (sequence of S/R calls). |
C debugMode :: controls printing of debug msg (sequence of S/R calls). |
360 |
|
C printDomain :: controls printing of domain fields (bathy, hFac ...). |
361 |
|
|
362 |
COMMON /PARM_L/ |
COMMON /PARM_L/ |
363 |
& fluidIsAir, fluidIsWater, |
& fluidIsAir, fluidIsWater, |
378 |
& tempAdvection, tempIsActiveTr, tempForcing, |
& tempAdvection, tempIsActiveTr, tempForcing, |
379 |
& saltAdvection, saltIsActiveTr, saltForcing, |
& saltAdvection, saltIsActiveTr, saltForcing, |
380 |
& maskIniTemp, maskIniSalt, checkIniTemp, checkIniSalt, |
& maskIniTemp, maskIniSalt, checkIniTemp, checkIniSalt, |
381 |
& useRealFreshWaterFlux, |
& useRealFreshWaterFlux, useSRCGSolver, |
382 |
& rigidLid, implicitFreeSurface, exactConserv, linFSConserveTr, |
& rigidLid, implicitFreeSurface, exactConserv, linFSConserveTr, |
383 |
& uniformLin_PhiSurf, |
& uniformLin_PhiSurf, |
384 |
& quasiHydrostatic, nonHydrostatic, |
& quasiHydrostatic, nonHydrostatic, |
396 |
& pickup_read_mdsio, pickup_write_mdsio, pickup_write_immed, |
& pickup_read_mdsio, pickup_write_mdsio, pickup_write_immed, |
397 |
& writePickupAtEnd, |
& writePickupAtEnd, |
398 |
& timeave_mdsio, snapshot_mdsio, monitor_stdio, |
& timeave_mdsio, snapshot_mdsio, monitor_stdio, |
399 |
& outputTypesInclusive, dumpInitAndLast, debugMode, |
& outputTypesInclusive, dumpInitAndLast, |
400 |
& inAdMode, inAdTrue, inAdFalse, inAdExact, |
& debugMode, printDomain, |
401 |
& useSRCGSolver |
& inAdMode, inAdTrue, inAdFalse, inAdExact |
402 |
|
|
403 |
LOGICAL fluidIsAir |
LOGICAL fluidIsAir |
404 |
LOGICAL fluidIsWater |
LOGICAL fluidIsWater |
415 |
LOGICAL useNHMTerms |
LOGICAL useNHMTerms |
416 |
LOGICAL no_slip_sides |
LOGICAL no_slip_sides |
417 |
LOGICAL no_slip_bottom |
LOGICAL no_slip_bottom |
418 |
|
LOGICAL useFullLeith |
419 |
|
LOGICAL useStrainTensionVisc |
420 |
|
LOGICAL useAreaViscLength |
421 |
LOGICAL momViscosity |
LOGICAL momViscosity |
422 |
LOGICAL momAdvection |
LOGICAL momAdvection |
423 |
LOGICAL momForcing |
LOGICAL momForcing |
435 |
LOGICAL checkIniTemp |
LOGICAL checkIniTemp |
436 |
LOGICAL checkIniSalt |
LOGICAL checkIniSalt |
437 |
LOGICAL useRealFreshWaterFlux |
LOGICAL useRealFreshWaterFlux |
438 |
LOGICAL useFullLeith |
LOGICAL useSRCGSolver |
|
LOGICAL useStrainTensionVisc |
|
|
LOGICAL useAreaViscLength |
|
439 |
LOGICAL rigidLid |
LOGICAL rigidLid |
440 |
LOGICAL implicitFreeSurface |
LOGICAL implicitFreeSurface |
441 |
LOGICAL exactConserv |
LOGICAL exactConserv |
485 |
LOGICAL timeave_mdsio, snapshot_mdsio, monitor_stdio |
LOGICAL timeave_mdsio, snapshot_mdsio, monitor_stdio |
486 |
LOGICAL outputTypesInclusive |
LOGICAL outputTypesInclusive |
487 |
LOGICAL dumpInitAndLast |
LOGICAL dumpInitAndLast |
488 |
LOGICAL debugMode |
LOGICAL debugMode, printDomain |
489 |
LOGICAL inAdMode, inAdTrue, inAdFalse, inAdExact |
LOGICAL inAdMode, inAdTrue, inAdFalse, inAdExact |
|
LOGICAL useSRCGSolver |
|
490 |
|
|
491 |
C-- COMMON /PARM_R/ "Real" valued parameters used by the model. |
C-- COMMON /PARM_R/ "Real" valued parameters used by the model. |
492 |
C cg2dTargetResidual |
C cg2dTargetResidual |