Unary operator - cons.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(conservative_compressible), | intent(in) | :: | self | Conservative. |
Operator result.
function negative(self) result(operator_result)
!< Unary operator `- cons`.
class(conservative_compressible), intent(in) :: self !< Conservative.
class(conservative_object), allocatable :: operator_result !< Operator result.
allocate(conservative_compressible :: operator_result)
select type(operator_result)
class is(conservative_compressible)
operator_result%density = - self%density
operator_result%momentum = - self%momentum
operator_result%energy = - self%energy
endselect
endfunction negative