vtf-logo

src/1d/dummy-routines/saux1xx.f

c
c     =====================================================
      subroutine setaux(maxmx,meqn,mbc,ibx,mx,q,
     &     aux,maux,cornx,dx,t,dt)
c     =====================================================
c
c      # dummy subroutine for use when equation has no aux array.
c      # If method(7)=0 then this routine is never called, but its
c      # existence is required.
c
      implicit double precision (a-h, o-z)      
      dimension q(meqn, 1-ibx*mbc:maxmx+ibx*mbc)
      dimension aux(maux, 1-ibx*mbc:maxmx+ibx*mbc)
c
      return
      end

<