one_equation_has_salt Function

private pure function one_equation_has_salt(this) result(has_salt)

Arguments

Type IntentOptional AttributesName
class(ave_one_equation_melt), intent(in) :: this

Return Value logical

Whether this formulation of melting contributes terms to the salinity equation of the plume.


Contents

Source Code


Source Code

  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