mus_source_module Module

Module containing subroutines for initialize Musubi source variables and update source terms


Uses

Used by

  • module~~mus_source_module~~UsedByGraph module~mus_source_module mus_source_module module~mus_control_module mus_control_module module~mus_control_module->module~mus_source_module module~mus_aux_module mus_aux_module module~mus_control_module->module~mus_aux_module module~mus_aux_module->module~mus_source_module module~mus_dynloadbal_module mus_dynLoadBal_module module~mus_dynloadbal_module->module~mus_source_module module~mus_program_module mus_program_module module~mus_program_module->module~mus_control_module module~mus_program_module->module~mus_aux_module module~mus_program_module->module~mus_dynloadbal_module program~musubi musubi program~musubi->module~mus_control_module program~musubi->module~mus_aux_module program~musubi->module~mus_program_module

Contents


Subroutines

public subroutine mus_init_sourceTerms(field, nFields, globSrc, varSys, tree, nElems_solve, levelDesc)

This routine does set_params and setupIndices for all sources terms by gathering points to apply souce term before.

Arguments

TypeIntentOptionalAttributesName
type(mus_field_type), intent(inout) :: field(:)

contains sources of all fields

integer, intent(in) :: nFields

Number of fields

type(mus_source_type), intent(inout) :: globSrc

global source

type(tem_varSys_type), intent(in) :: varSys

global variable system

type(treelmesh_type), intent(in) :: tree

global treelm mesh

integer, intent(in) :: nElems_solve(tree%global%minLevel:)

Number of elements to solve in all levels nFluids + nGhosts

type(tem_levelDesc_type), intent(in) :: levelDesc(tree%global%minLevel:)

Level descriptors

public subroutine mus_apply_sourceTerms(field, nFields, globSrc, pdf, varSys, iLevel, time, tree, phyConvFac, state, auxField, derVarPos)

Apply all source terms i.e field specific source and global source on all fields.

Arguments

TypeIntentOptionalAttributesName
type(mus_field_type), intent(in) :: field(nFields)

contains sources of all fields

integer, intent(in) :: nFields

Number of fields

type(mus_source_type), intent(in) :: globSrc

global source

type(pdf_data_type), intent(inout) :: pdf

pdf datatype

type(tem_varSys_type), intent(in) :: varSys

global variable system

integer, intent(in) :: iLevel

current level

type(tem_time_type), intent(in) :: time

current timing information

type(treelmesh_type), intent(in) :: tree

global tree information

type(mus_convertFac_type), intent(in) :: phyConvFac

Physics conversion factor for current level

real(kind=rk), intent(inout) :: state(:,:)

state type containing the state vector to update

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

auxField array

type(mus_derVarPos_type), intent(in) :: derVarPos(:)

position of derived quantities in varsys

private subroutine mus_setupIndices_forSrc(source, varSys, nSolve, bary, iLevel, tree)

This routines does setup indices for given source within a field or global. Index are stored for points which source term is active

Arguments

TypeIntentOptionalAttributesName
type(mus_source_type), intent(inout) :: source

Source term to fill in

type(tem_varSys_type), intent(in) :: varSys

global variable system

integer, intent(in) :: nSolve

Number of elements to apply source term on this level

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

Space coordinates to apply source terms

integer, intent(in) :: iLevel

Current level

type(treelmesh_type), intent(in) :: tree

global treelm mesh