compute_weight Subroutine

private subroutine compute_weight(weights, nFoundSources, neighDir, targetBary, intp_config, cxDirRK)

This routine computes weights for weighted_average interpolation.

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(out), allocatable :: weights(:)

computed weight
integer, intent(in) :: nFoundSources

Number of source elements found
integer, intent(in) :: neighDir(nFoundSources)

cxDir for found sounce elements
real(kind=rk), intent(in) :: targetBary(3)

child bary relative to parent
type(mus_interpolation_config_type), intent(in) :: intp_config

Interpolation config info
real(kind=rk), intent(in) :: cxDirRK(:,:)

cxDir of current source

Calls

proc~~compute_weight~~CallsGraph proc~compute_weight compute_weight tem_abort tem_abort proc~compute_weight->tem_abort

Called by

proc~~compute_weight~~CalledByGraph proc~compute_weight compute_weight proc~mus_intp_update_depfromcoarser mus_intp_update_depFromCoarser proc~mus_intp_update_depfromcoarser->proc~compute_weight proc~mus_construct mus_construct proc~mus_construct->proc~mus_intp_update_depfromcoarser proc~mus_initialize mus_initialize proc~mus_initialize->proc~mus_construct proc~mus_perform_dynloadbal mus_perform_dynLoadBal proc~mus_perform_dynloadbal->proc~mus_construct program~mus_harvesting mus_harvesting program~mus_harvesting->proc~mus_construct proc~mus_solve mus_solve proc~mus_solve->proc~mus_perform_dynloadbal program~musubi musubi program~musubi->proc~mus_initialize