c
c =====================================================
subroutine setaux(maxmx,maxmy,meqn,mbc,ibx,iby,mx,my,q,
& aux,maux,cornx,corny,dx,dy,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,
& 1-iby*mbc:maxmy+iby*mbc)
dimension aux(maux, 1-ibx*mbc:maxmx+ibx*mbc,
& 1-iby*mbc:maxmy+iby*mbc)
c
write(6,*) '*** Dummy function for setaux() called.'
write(6,*) '*** Use own function or set method(7)=0.'
stop
end