upbnd
- Signature:
subroutine upbnd(listbc, val, nvar, mitot, mjtot, maxsp,
iused, mptr)
- Arguments:
integer, intent(in)
:
listbc(5,maxsp)
: Coarse boundary lists for the input grid.
nvar
: Number of solution variables.
mitot
: Horizontal dimension of the input grid, including
ghost cells.
mjtot
: Vertical dimension of the input grid, including
ghost cells.
maxsp
: Space needed for each field in the coarse boundary
lists.
mptr
: Pointer to the coarse grid being corrected.
integer, intent(out)
:
iused(mitot,mjtot)
: Used to indicate where flux updates
have been performed.
double precision, intent(inout)
:
val(mitot,mjtot,nvar)
: Array of solution values on grid
mptr
.
- Description:
- Corrects the coarse grid
mptr
with the flux differences stored
with each of the fine grids.