322 |
& ' /* Non-Hyd (free-)Surface option */') |
& ' /* Non-Hyd (free-)Surface option */') |
323 |
CALL WRITE_0D_L( quasiHydrostatic, INDEX_NONE, |
CALL WRITE_0D_L( quasiHydrostatic, INDEX_NONE, |
324 |
& 'quasiHydrostatic =', ' /* Quasi-Hydrostatic on/off flag */') |
& 'quasiHydrostatic =', ' /* Quasi-Hydrostatic on/off flag */') |
325 |
|
CALL WRITE_0D_L( calc_wVelocity, INDEX_NONE, 'calc_wVelocity =', |
326 |
|
& ' /* vertical velocity calculation on/off flag */') |
327 |
CALL WRITE_0D_L( momStepping, INDEX_NONE, |
CALL WRITE_0D_L( momStepping, INDEX_NONE, |
328 |
& 'momStepping =', ' /* Momentum equation on/off flag */') |
& 'momStepping =', ' /* Momentum equation on/off flag */') |
329 |
CALL WRITE_0D_L( vectorInvariantMomentum, INDEX_NONE, |
CALL WRITE_0D_L( vectorInvariantMomentum, INDEX_NONE, |