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