402 |
&' /* Convective adjustment interval ( s ) */') |
&' /* Convective adjustment interval ( s ) */') |
403 |
CALL WRITE_0D_L( forcing_In_AB,INDEX_NONE,'forcing_In_AB =', |
CALL WRITE_0D_L( forcing_In_AB,INDEX_NONE,'forcing_In_AB =', |
404 |
&' /* put T,S Forcing in Adams-Bash. stepping */') |
&' /* put T,S Forcing in Adams-Bash. stepping */') |
405 |
|
CALL WRITE_0D_L( doAB_onGtGs, INDEX_NONE, 'doAB_onGtGs =', |
406 |
|
& ' /* apply AB on Tendencies (rather than on T,S)*/') |
407 |
CALL WRITE_0D_R8( abEps, INDEX_NONE,'abEps =', |
CALL WRITE_0D_R8( abEps, INDEX_NONE,'abEps =', |
408 |
&' /* Adams-Bashforth-2 stabilizing weight */') |
&' /* Adams-Bashforth-2 stabilizing weight */') |
409 |
#ifdef ALLOW_ADAMSBASHFORTH_3 |
#ifdef ALLOW_ADAMSBASHFORTH_3 |