momentumFromMacroLSE Function

public function momentumFromMacroLSE(moleFraction, first_Moments, nFields, phi, resi_coeff, omega_fac, paramBInv) result(momentum)

derive untransformed pdf velocity of species by solving system of equations of nSpecies

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(in) :: moleFraction(nFields)

molefraction of all species

real(kind=rk), intent(in) :: first_Moments(3,nFields)

momentum from transformed pdf of all species

integer, intent(in) :: nFields

number of species

real(kind=rk), intent(in) :: phi(nFields)

molecular weight ratio of all species

real(kind=rk), intent(in) :: resi_coeff(nFields,nFields)

resistivity coefficients

real(kind=rk), intent(in) :: omega_fac

relaxation parameter, omega_diff*0.5_rk

real(kind=rk), intent(in) :: paramBInv

free parameter B

Return Value real(kind=rk)(3,nFields)

return actual momentum


Calls

proc~~momentumfrommacrolse~~CallsGraph proc~momentumfrommacrolse momentumFromMacroLSE proc~invert_matrix invert_matrix proc~momentumfrommacrolse->proc~invert_matrix

Called by

proc~~momentumfrommacrolse~~CalledByGraph proc~momentumfrommacrolse momentumFromMacroLSE proc~derivemommsliquid_fromstate deriveMomMSLiquid_FromState proc~derivemommsliquid_fromstate->proc~momentumfrommacrolse proc~derivevelmsliquid_fromstate deriveVelMSLiquid_FromState proc~derivevelmsliquid_fromstate->proc~momentumfrommacrolse proc~spc_blackbox_mem_solvent spc_blackbox_mem_solvent proc~spc_blackbox_mem_solvent->proc~momentumfrommacrolse proc~derivemomentamsliquid_fromstate deriveMomentaMSLiquid_FromState proc~derivemomentamsliquid_fromstate->proc~momentumfrommacrolse proc~calcdensandvelsfrompdf calcDensAndVelsFromPDF proc~calcdensandvelsfrompdf->proc~momentumfrommacrolse none~calcmacrosfrompdf calcMacrosFromPDF none~calcmacrosfrompdf->proc~momentumfrommacrolse proc~deriveauxmsliquid_fromstate deriveAuxMSLiquid_fromState proc~deriveauxmsliquid_fromstate->proc~momentumfrommacrolse proc~spc_molediff_flux spc_moleDiff_Flux proc~spc_molediff_flux->proc~momentumfrommacrolse proc~derivevelocitiesmsliquid_fromstate deriveVelocitiesMSLiquid_FromState proc~derivevelocitiesmsliquid_fromstate->proc~momentumfrommacrolse proc~deriveeqmsliquid_fromstate deriveEqMSLiquid_FromState proc~deriveeqmsliquid_fromstate->proc~momentumfrommacrolse proc~spc_blackbox_mem_ion spc_blackbox_mem_ion proc~spc_blackbox_mem_ion->proc~momentumfrommacrolse proc~spc_inflow spc_inflow proc~spc_inflow->none~calcmacrosfrompdf proc~spc_solvent_inflow spc_solvent_inflow proc~spc_solvent_inflow->proc~calcdensandvelsfrompdf proc~spc_outflow spc_outflow proc~spc_outflow->proc~calcdensandvelsfrompdf proc~spc_velocity_noneq_expol spc_velocity_noneq_expol proc~spc_velocity_noneq_expol->proc~calcdensandvelsfrompdf proc~spc_mole_fraction_noneq_expol spc_mole_fraction_noneq_expol proc~spc_mole_fraction_noneq_expol->proc~calcdensandvelsfrompdf proc~spc_solvent_outflow spc_solvent_outflow proc~spc_solvent_outflow->proc~calcdensandvelsfrompdf

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: ifield
integer, private :: ifieldDia
integer, private :: ifieldNonDia
integer, private :: icomp
real(kind=rk), private :: matrixA(nFields,nFields)
real(kind=rk), private :: invA(nFields,nFields)