prescribed_haline_contraction Function

  1. prescribed_salinity_eos.F90
  2. prescribed_eos_mod
  3. prescribed_haline_contraction

private function prescribed_haline_contraction(this, temperature, salinity) result(coef)

Returns the haline contraction coefficient.

Arguments

Type IntentOptional AttributesName
class(prescribed_eos), intent(in) :: this
class(scalar_field), intent(in) :: temperature
class(scalar_field), intent(in) :: salinity

Return Value class(scalar_field), allocatable


Calls

proc~~prescribed_haline_contraction~~CallsGraph proc~prescribed_haline_contraction prescribed_haline_contraction uniform_scalar_field uniform_scalar_field proc~prescribed_haline_contraction->uniform_scalar_field

Contents

Source Code

prescribed_haline_contraction

Source Code

  function prescribed_haline_contraction(this, temperature, salinity) result(coef)
    !* Author: Chris MacMackin
    !  Date: June 2017
    !
    ! Returns the haline contraction coefficient.
    !
    class(prescribed_eos), intent(in)    :: this
    class(scalar_field), intent(in)  :: temperature
    class(scalar_field), intent(in)  :: salinity
    class(scalar_field), allocatable :: coef
    allocate(uniform_scalar_field :: coef)
    coef = uniform_scalar_field(this%beta_s)
  end function prescribed_haline_contraction