& use3Dsolver, implicitIntGravWave, staggerTimeStep,
LOGICAL use3Dsolver
IF ( use3Dsolver ) THEN
IF (nonlinFreeSurf.NE.0 .AND. use3Dsolver) THEN
IF (use3Dsolver) THEN
IF ( use3Dsolver .AND. zeroPsNH ) THEN
ELSEIF ( use3Dsolver ) THEN
CALL WRITE_0D_L( use3Dsolver, INDEX_NONE,
use3Dsolver = nonHydrostatic.OR. implicitIntGravWave