& exactConserv, linFSConserveTr, useRealFreshWaterFlux,
LOGICAL linFSConserveTr
IF (linFSConserveTr) THEN
IF ( linFSConserveTr .AND. nonlinFreeSurf.NE.0 ) THEN
CALL WRITE_0D_L( linFSConserveTr, INDEX_NONE,
& exactConserv, linFSConserveTr, uniformLin_PhiSurf,
linFSConserveTr = .FALSE.
IF ( linFSConserveTr ) THEN