Function to melt two properties together. The resulting property holds the union of firstPrp and secondPrp.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | firstPrp |
The first property to be melted. |
||
integer, | intent(in) | :: | secondPrp |
The second property to be melted. |
The resulting property (the union of the first and second property)
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