& saltAdvection, saltForcing,
LOGICAL saltAdvection
IF ( saltAdvection .AND.
& saltDiffusion, saltAdvection, saltForcing,
CALL WRITE_0D_L( saltAdvection, INDEX_NONE,
saltAdvection = saltStepping .AND. saltAdvection
saltImplVertAdv = saltAdvection .AND. saltImplVertAdv
calcAdvection = saltAdvection .AND. .NOT.saltMultiDimAdvec
saltAdvection = .TRUE.
saltMultiDimAdvec = multiDimAdvection .AND. saltAdvection