| qinit.f90.html |   | 
  | Source file:   qinit.f90 | 
| Directory:    /home/rjl/git/rjleveque/clawpack-4.x/clawpack/2d/lib | 
| Converted:    Sun May 15 2011 at 19:15:44 
  using clawcode2html | 
| This documentation file will 
not reflect any later changes in the source file. | 
 
! Default qinit file
subroutine qinit(maxmx,maxmy,meqn,mbc,mx,my,xlower,ylower,dx,dy,q,maux,aux)
    implicit none
    
    integer, intent(in) :: maxmx,maxmy,meqn,mbc,mx,my,maux
    double precision, intent(in) :: xlower,ylower,dx,dy
    double precision, intent(inout) :: q(1-mbc:maxmx+mbc,1-mbc:maxmy+mbc,meqn)
    double precision, intent(inout) :: aux(1-mbc:maxmx+mbc,1-mbc:maxmy+mbc,maux)
end subroutine qinit