SUBROUTINE SetFlags(REAL MinScale)

Defined In:

contrib/astro/problem.f90

Inputs:

REAL MinScale. A lower-bound for the tolerance-scaling factor.

Description:

A local subroutine contained in problemErrFlag() that checks a 3D variable buffer (qbuf from problemErrFlag()) and set's the Info grid's ErrorFlags array. Any cells whose difference from their neighbors exceeds a certain tolerance level will be flagged.

This subroutine can handle 1D and 2D problems as well as 3D problems. Note that it assumes the NodeInfo structure Info is defined in problemErrFlag().

Called In:

Problem :: problemErrFlag().

Modules Used:

None.

Files Included:

None.