vtf-logo

src/2d/dummy-routines/flx2xx.f

c
c =========================================================
      subroutine flx2(ixy,maxmx,meqn,mbc,mx,q,maux,aux,f)
c =========================================================
c
c     # Dummy flux-function. If slope-limiting is applied (method(2)>2), this
c     # function is required.
c
c     # The flux is computed in x-direction if ixy=1 
c     #                              or in y-direction if ixy=2.
c
      implicit double precision (a-h,o-z)
      dimension q(1-mbc:maxmx+mbc, meqn)
      dimension aux(1-mbc:maxmx+mbc, maux)
      dimension f(1-mbc:maxmx+mbc, meqn)
      common /param/  gamma,gamma1
c
      return
      end

<