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