• VTF
  • FSI
  • AMROC
  • SFC
  • Motion
  • STLIB
  • Main Page
  • 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
    

<