mus_calcBndForce Subroutine

public subroutine mus_calcBndForce(bndForce, posInBndID, nBCs, field, globBC, minLevel, maxLevel, state, pdf, levelDesc, layout, varSys)

This routine computes force on boundary elements which are used to compute lift and drag coefficient on boundary


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

Boundary force on wall boundary

integer, intent(in) :: posInBndID(:)

Mapping from global tree%treeid to global boundary%boundaryID

integer, intent(in) :: nBCs

number of BC

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

fluid parameters and properties

type(glob_boundary_type), intent(in) :: globBC(:)

scheme global boundary type

integer, intent(in) :: minLevel

minlevel and maxLevel

integer, intent(in) :: maxLevel

minlevel and maxLevel

type(array2D_type), intent(in) :: state(minLevel:maxLevel)

state arrays fo current iLevel both now and next

type(pdf_data_type), intent(in) :: pdf(minLevel:maxLevel)

contains global state vector

type(tem_levelDesc_type), intent(in) :: levelDesc(minLevel:maxLevel)

Level Descriptor

type(mus_scheme_layout_type), intent(in) :: layout

scheme layout type

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

scheme variable system

Called by

proc~~mus_calcbndforce~~CalledByGraph proc~mus_calcbndforce mus_calcBndForce program~mus_harvesting mus_harvesting program~mus_harvesting->proc~mus_calcbndforce proc~check_flow_status check_flow_status proc~check_flow_status->proc~mus_calcbndforce proc~mus_solve mus_solve proc~mus_solve->proc~check_flow_status program~musubi musubi program~musubi->proc~mus_solve



integer, private :: iLevel
integer, private :: iBnd
integer, private :: nFields