NAME
Heat_computeDt
SYNOPSIS
Heat_computeDt ( integer(IN) : blockID,
real(IN): x(:),
real(IN): dx(:),
real(IN): uxgrid(:),
real(IN): y(:),
real(IN): dy(:),
real(IN): uygrid(:),
real(IN): z(:),
real(IN): dz(:),
real(IN): uzgrid(:),
real,pointer : solnData(:,:,:,:),
real,(INOUT): dt_check,
integer(INOUT): dt_minloc(:) )
DESCRIPTION
Computes the timestep limiter for heating source term solver.
ARGUMENTS
blockID local block ID
x, y, z three, directional coordinates
d* deltas in each {*=x, y z} directions
u*grid velocity of grid expansion in {*=x, y z} directions
solnData the physical, solution data from grid
dt_check variable to hold timestep constraint
dt_minloc(5) array to hold limiting zone info: zone indices