tem_melt_facePrp Function

private function tem_melt_facePrp(firstPrp, secondPrp) result(meltedPrp)

Function to melt two properties together. The resulting property holds the union of firstPrp and secondPrp.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: firstPrp

The first property to be melted.
integer, intent(in) :: secondPrp

The second property to be melted.

Return Value integer

The resulting property (the union of the first and second property)


Source Code

  function tem_melt_facePrp(firstPrp, secondPrp) result(meltedPrp)
    ! --------------------------------------------------------------------------
    !> The first property to be melted.
    integer, intent(in) :: firstPrp
    !> The second property to be melted.
    integer, intent(in) :: secondPrp
    !> The resulting property (the union of the first and second property)
    integer :: meltedPrp
    ! --------------------------------------------------------------------------

    ! Apply a bitwise OR operation to melt the two properties.
    meltedPrp = ior(firstPrp, secondPrp)

  end function tem_melt_facePrp