203 |
C globalFiles :: Selects between "global" and "tiled" files |
C globalFiles :: Selects between "global" and "tiled" files |
204 |
C allowFreezing :: Allows water to freeze and form ice |
C allowFreezing :: Allows water to freeze and form ice |
205 |
C groundAtK1 :: put the surface(k=1) at the Lower Boundary (=ground) |
C groundAtK1 :: put the surface(k=1) at the Lower Boundary (=ground) |
206 |
|
C useJamartWetPoints :: Use wet-point method for Coriolis (Jamart and Ozer, 1986) |
207 |
COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid, |
COMMON /PARM_L/ usingCartesianGrid, usingSphericalPolarGrid, |
208 |
& usingCurvilinearGrid, |
& usingCurvilinearGrid, |
209 |
& no_slip_sides,no_slip_bottom, |
& no_slip_sides,no_slip_bottom, |
223 |
& allowFreezing, groundAtK1, |
& allowFreezing, groundAtK1, |
224 |
& usePickupBeforeC35, debugMode, |
& usePickupBeforeC35, debugMode, |
225 |
& readPickupWithTracer, writePickupWithTracer, |
& readPickupWithTracer, writePickupWithTracer, |
226 |
& multiDimAdvection, useEnergyConservingCoriolis |
& multiDimAdvection, useEnergyConservingCoriolis, |
227 |
|
& useJamartWetPoints |
228 |
LOGICAL usingCartesianGrid |
LOGICAL usingCartesianGrid |
229 |
LOGICAL usingSphericalPolarGrid |
LOGICAL usingSphericalPolarGrid |
230 |
LOGICAL usingCurvilinearGrid |
LOGICAL usingCurvilinearGrid |
274 |
LOGICAL writePickupWithTracer |
LOGICAL writePickupWithTracer |
275 |
LOGICAL multiDimAdvection |
LOGICAL multiDimAdvection |
276 |
LOGICAL useEnergyConservingCoriolis |
LOGICAL useEnergyConservingCoriolis |
277 |
|
LOGICAL useJamartWetPoints |
278 |
|
|
279 |
C-- COMMON /PARM_R/ "Real" valued parameters used by the model. |
C-- COMMON /PARM_R/ "Real" valued parameters used by the model. |
280 |
C gg2dTargetResidual |
C gg2dTargetResidual |