mus_calc_MS_DiffMatrix_single Subroutine

  1. mus_eNRTL_dummy.f90
  2. mus_eNRTL_module
  3. mus_calc_MS_DiffMatrix_single

private subroutine mus_calc_MS_DiffMatrix_single(nFields, temp, press, mole_dens, D_ij_out)

Dummy routine which sets diffusivity coeff matrix to diagonal matrix

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: nFields

number of fields in mixture
real(kind=rk), intent(in) :: temp

mixture temperature
real(kind=rk), intent(in) :: press

mixture pressure
real(kind=rk), intent(in) :: mole_dens(nFields)

mole density of all species of single element
real(kind=rk), intent(out) :: D_ij_out(nFields,nFields)

thermodynamic factor matrix

Called by

proc~~mus_calc_ms_diffmatrix_single~2~~CalledByGraph proc~mus_calc_ms_diffmatrix_single~2 mus_calc_MS_DiffMatrix_single interface~mus_calc_ms_diffmatrix~2 mus_calc_MS_DiffMatrix interface~mus_calc_ms_diffmatrix~2->proc~mus_calc_ms_diffmatrix_single~2

Contents

None