Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ave_one_equation_melt), | intent(in) | :: | this |
Whether this formulation of melting contributes terms to the salinity equation of the plume.
pure function one_equation_has_salt(this) result(has_salt)
class(ave_one_equation_melt), intent(in) :: this
logical :: has_salt
!! Whether this formulation of melting contributes terms to
!! the salinity equation of the plume.
has_salt = (this%sal_forcing /= 0._r8)
end function one_equation_has_salt