& rigidLid, implicitFreeSurface, exactConserv, linFSConserveTr,
LOGICAL exactConserv
ELSEIF (exactConserv) THEN
IF (exactConserv) THEN
IF (rigidLid .AND. exactConserv) THEN
IF (nonlinFreeSurf.NE.0 .AND. .NOT.exactConserv) THEN
IF (select_rStar.NE.0 .AND. .NOT.exactConserv) THEN
IF ( useRealFreshWaterFlux .AND. exactConserv
IF ( useRealFreshWaterFlux .AND. .NOT.exactConserv
IF (useRealFreshWaterFlux .AND. .NOT.exactConserv
IF ( nonHydrostatic .AND. .NOT.exactConserv
CALL WRITE_0D_L( exactConserv, INDEX_NONE,
ELSEIF ( .NOT.exactConserv ) THEN
IF ( exactConserv .AND. dPhiNHstatus.EQ.0 ) THEN
& exactConserv, linFSConserveTr, uniformLin_PhiSurf,
IF ( exactConserv ) THEN
IF (exactConserv .AND. myTime.NE.startTime) THEN
IF ( exactConserv .AND. implicDiv2Dflow .NE. 0. _d 0)
IF ( nonHydrostatic .AND. exactConserv ) THEN
IF (exactConserv)
exactConserv = .FALSE.
& .OR. .NOT.exactConserv
ELSEIF ( exactConserv ) THEN
oldFreeSurfTerm = use3Dsolver .AND. .NOT.exactConserv