GetSlaveCellNumber
Inheritence
This method is inherited from the AbstractMesh class.
GetSlaveCellNumber
Returns the slave cell number of a facet element.
Interface
MODULE FUNCTION GetSlaveCellNumber(obj, facetElement, elementType) RESULT(ans)
CLASS(AbstractMesh_), INTENT(IN) :: obj
INTEGER(I4B), INTENT(IN) :: facetElement
INTEGER(I4B), INTENT(IN) :: elementType
INTEGER(I4B) :: ans
END FUNCTION GetSlaveCellNumber
Description
This function returns the global element number of the slave cell associated with a facet element. The slave cell is the second cell that contains the facet (if any). For boundary facets, the slave cell number is typically 0.
Arguments
obj
: The abstract mesh object.facetElement
: The local facet element number.elementType
: The element type of the facet.
Returns
ans
: The global element number of the slave cell, or 0 if the facet is on a boundary.
Example
INTEGER(I4B) :: facetNum = 8, facetType = 3, slaveCell
slaveCell = mesh%GetSlaveCellNumber(facetNum, facetType)
IF (slaveCell > 0) THEN
PRINT*, "Slave cell number:", slaveCell
ELSE
PRINT*, "Facet is on a boundary (no slave cell)"
END IF