** Next:** advect_sca.F
** Up:** The Proudman Oceanographic Laboratory
** Previous:** aaksetr.F

**Subsections**

#

advdif_spm.F

##

subroutine advdif_spm

The subroutine calls advection routines advpbu_n
and advpbv_n
to advect a number (nseds) of sediment scalar variables. The order of advection
changes on alternate time steps, such that on odd timesteps u advection is
followed by v advection and on even timesteps v advection is followed by
u advection. Logical variable **adv_bc** is always set to false for these
calls, to give a no net flux boundary condition.
The subroutine then calls diffuseb_n
to diffuse these scalar variables in the vertical.

**oddstep** logical variable telling whether timestep is odd

**i,j** grid indices
**advbc** logical variable to save vale of **adv_bc**

**spm**

- none

- Initialise depths
- Call scalar advection routines for
multiple variables in order determined by odd or even timestep

- advpbu_n
- advpbu_n
- diffuseb_n

- b3drun

- none

- none

Limitations of directional splitting not resolved by alternating order

** Next:** advect_sca.F
** Up:** The Proudman Oceanographic Laboratory
** Previous:** aaksetr.F
The AMMP Project
2005-04-20