pkg/generic_advdiff/GAD_FLUX_LIMITER.h

C $Header: $
C $Name: $

C Statement function to describe flux limiter
      _RL Limiter
C Upwind        Limiter(Cr)=0.
C Lax-Wendroff  Limiter(Cr)=1.
C Suberbee      Limiter(Cr)=max(0.,max(min(1.,2*Cr),min(2.,Cr)))

c     Limiter(Cr)=0.
c     Limiter(Cr)=1.
      Limiter(Cr)=max(0.,max(min(1.,2*Cr),min(2.,Cr)))
1	C $Header: $
2	C $Name: $
3
4	C Statement function to describe flux limiter
5	_RL Limiter
6	C Upwind Limiter(Cr)=0.
7	C Lax-Wendroff Limiter(Cr)=1.
8	C Suberbee Limiter(Cr)=max(0.,max(min(1.,2*Cr),min(2.,Cr)))
9
10	c Limiter(Cr)=0.
11	c Limiter(Cr)=1.
12	Limiter(Cr)=max(0.,max(min(1.,2*Cr),min(2.,Cr)))