NAME
RadTrans
SYNOPSIS
call RadTrans_computeDt(integer(IN) :: blockID, integer(IN) :: blkLimits(2,MDIM), integer(IN) :: blkLimitsGC(2,MDIM), real(IN),pointer:: solnData(:,:,:,:), real(OUT) :: dt_radtrans, real(OUT) :: dt_minloc(5))
DESCRIPTION
Compute radiative transfer time step
ARGUMENTS
blockID -- local block ID blkLimits -- the indices for the interior endpoints of the block blkLimitsGC -- the indices for endpoints including the guardcells solnData -- the physical, solution data from grid dt_radtrans -- variable to hold timestep constraint dt_minloc(5) -- array to hold limiting zone info: zone indices