module advection
  implicit none
  integer, parameter :: NADV = 0, NADVS=0 ! add'l boundary points
end module advection
