residual_mod.f File Reference

Go to the source code of this file.

Modules
module	residual

Functions/Subroutines
character(len=4) function	residual::get_resid_string (INDEX)
character(len=8) function	residual::get_resid_grp_string (INDEX)
double precision function	residual::get_resid (INDEX)
double precision function	residual::get_resid_grp (INDEX)

Variables
integer, parameter	residual::max_resid_index = 8
integer, parameter	residual::resid_p = 1
integer, parameter	residual::resid_ro = 2
integer, parameter	residual::resid_u = 3
integer, parameter	residual::resid_v = 4
integer, parameter	residual::resid_w = 5
integer, parameter	residual::resid_t = 6
integer, parameter	residual::resid_th = 7
integer, parameter	residual::resid_sc = 8
integer, parameter	residual::nresid = 8 + DIM_N
integer, parameter	residual::resid_ke = 9
integer, parameter	residual::resid_x = 10
integer, parameter	residual::nprefix = 10
integer, parameter	residual::hydro_grp = 1
integer, parameter	residual::theta_grp = 2
integer, parameter	residual::energy_grp = 3
integer, parameter	residual::species_grp = 4
integer, parameter	residual::scalar_grp = 5
integer, parameter	residual::ke_grp = 6
character, dimension(nprefix), parameter	residual::resid_prefix = (/ 'P', 'R', 'U', 'V', 'W', 'T', 'G', 'S', 'K', 'X' /)
double precision, dimension(:,:), allocatable	residual::resid
double precision, dimension(:,:), allocatable	residual::max_resid
double precision	residual::sum5_resid
integer, dimension(:,:), allocatable	residual::ijk_resid
double precision, dimension(:,:), allocatable	residual::num_resid
double precision, dimension(:,:), allocatable	residual::den_resid
double precision, dimension(:), allocatable	residual::resid_pack
logical	residual::group_resid
double precision, dimension(6)	residual::resid_grp
character(len=4), dimension(max_resid_index)	residual::resid_string
character(len=8), dimension(6)	residual::resid_grp_string
integer, dimension(max_resid_index, 2)	residual::resid_index
double precision	residual::accum_resid_g
double precision, dimension(dim_m)	residual::accum_resid_s