find_possIntpOrderAndUpdateMySources Subroutine

private subroutine find_possIntpOrderAndUpdateMySources(intp, mySources, neighDir, nFoundSources, childNum, intpOrder)

Find maximum possible interpolation order which can be used for fillFinerFromMe by comparing nFoundSources with nMaxSources of different interpolation order starting from interpolation order defined by user

Arguments

Type IntentOptional Attributes Name
type(mus_interpolation_type), intent(in) :: intp

interpolation type

integer, intent(inout) :: mySources(:)

position of found source elements in total list Update this list if intpStencil%isActive

integer, intent(inout) :: neighDir(:)

cxDir for found sounce elements

integer, intent(inout) :: nFoundSources

Number of source elements found

integer, intent(in) :: childNum

Curent finer ghost child number

integer, intent(out) :: intpOrder

interpolation order