169 |
& 'AdamsBashforth_S =', |
& 'AdamsBashforth_S =', |
170 |
& ' /* apply Adams-Bashforth extrapolation on Salt */') |
& ' /* apply Adams-Bashforth extrapolation on Salt */') |
171 |
#ifdef GAD_SMOLARKIEWICZ_HACK |
#ifdef GAD_SMOLARKIEWICZ_HACK |
172 |
CALL WRITE_0D_R8( SmolarkiewiczMaxFrac, INDEX_NONE, |
CALL WRITE_0D_RL( SmolarkiewiczMaxFrac, INDEX_NONE, |
173 |
& 'SmolarkiewiczMaxFrac =', |
& 'SmolarkiewiczMaxFrac =', |
174 |
& ' /* maximal fraction of tracer to flow out of a cell */') |
& ' /* maximal fraction of tracer to flow out of a cell */') |
175 |
#endif |
#endif |