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