Advection-diffusion equation solved with a fractional step method. The diffusion equation is solved in src1.f using Crank-Nicolson. The tridiagonal system is solved using the LAPACK routine in tridiag.f
Example [book/chap17/advdiff] to accompany the book Finite Volume Methods for Hyperbolic Problems by R. J. LeVeque.
Converted to Clawpack 5.0 form in 2013.