mom_eos_linear::calculate_density_linear Interface Reference

Detailed Description

Compute the density of sea water (in kg/m^3), or its anomaly from a reference density, using a simple linear equation of state from salinity (in psu), potential temperature (in deg C) and pressure [Pa].

Definition at line 27 of file MOM_EOS_linear.F90.

Private functions
subroutine	calculate_density_scalar_linear (T, S, pressure, rho, Rho_T0_S0, dRho_dT, dRho_dS, rho_ref)
	This subroutine computes the density of sea water with a trivial linear equation of state (in [kg m-3]) from salinity (sal [PSU]), potential temperature (T [degC]), and pressure [Pa]. More...
subroutine	calculate_density_array_linear (T, S, pressure, rho, start, npts, Rho_T0_S0, dRho_dT, dRho_dS, rho_ref)
	This subroutine computes the density of sea water with a trivial linear equation of state (in kg/m^3) from salinity (sal in psu), potential temperature (T [degC]), and pressure [Pa]. More...

Functions and subroutines

calculate_density_array_linear()

subroutine mom_eos_linear::calculate_density_linear::calculate_density_array_linear ( real, dimension(:), intent(in)  T, real, dimension(:), intent(in)  S, real, dimension(:), intent(in)  pressure, real, dimension(:), intent(out)  rho, integer, intent(in)  start, integer, intent(in)  npts, real, intent(in)  Rho_T0_S0, real, intent(in)  dRho_dT, real, intent(in)  dRho_dS, real, intent(in), optional  rho_ref  )

private

This subroutine computes the density of sea water with a trivial linear equation of state (in kg/m^3) from salinity (sal in psu), potential temperature (T [degC]), and pressure [Pa].

Parameters

[in]	t	potential temperature relative to the surface [degC].
[in]	s	salinity [PSU].
[in]	pressure	pressure [Pa].
[out]	rho	in situ density [kg m-3].
[in]	start	the starting point in the arrays.
[in]	npts	the number of values to calculate.
[in]	rho_t0_s0	The density at T=0, S=0 [kg m-3].
[in]	drho_dt	The derivatives of density with temperature [kg m-3 degC-1].
[in]	drho_ds	The derivatives of density with salinity in [kg m-3 ppt-1].
[in]	rho_ref	A reference density [kg m-3].

Definition at line 82 of file MOM_EOS_linear.F90.

  real, dimension(:), intent(in)  :: T        !< potential temperature relative to the surface [degC].
  real, dimension(:), intent(in)  :: S        !< salinity [PSU].
  real, dimension(:), intent(in)  :: pressure !< pressure [Pa].
  real, dimension(:), intent(out) :: rho      !< in situ density [kg m-3].
  integer,            intent(in)  :: start    !< the starting point in the arrays.
  integer,            intent(in)  :: npts     !< the number of values to calculate.
  real,               intent(in)  :: Rho_T0_S0 !< The density at T=0, S=0 [kg m-3].
  real,               intent(in)  :: dRho_dT  !< The derivatives of density with temperature
                                              !! [kg m-3 degC-1].
  real,               intent(in)  :: dRho_dS  !< The derivatives of density with salinity
                                              !! in [kg m-3 ppt-1].
  real,     optional, intent(in)  :: rho_ref  !< A reference density [kg m-3].
  ! Local variables
  integer :: j
 
  if (present(rho_ref)) then ; do j=start,start+npts-1
    rho(j) = (rho_t0_s0 - rho_ref) + (drho_dt*t(j) + drho_ds*s(j))
  enddo ; else ; do j=start,start+npts-1
    rho(j) = rho_t0_s0 + drho_dt*t(j) + drho_ds*s(j)
  enddo ; endif
 

calculate_density_scalar_linear()

subroutine mom_eos_linear::calculate_density_linear::calculate_density_scalar_linear ( real, intent(in)  T, real, intent(in)  S, real, intent(in)  pressure, real, intent(out)  rho, real, intent(in)  Rho_T0_S0, real, intent(in)  dRho_dT, real, intent(in)  dRho_dS, real, intent(in), optional  rho_ref  )

private

This subroutine computes the density of sea water with a trivial linear equation of state (in [kg m-3]) from salinity (sal [PSU]), potential temperature (T [degC]), and pressure [Pa].

Parameters

[in]	t	Potential temperature relative to the surface [degC].
[in]	s	Salinity [PSU].
[in]	pressure	pressure [Pa].
[out]	rho	In situ density [kg m-3].
[in]	rho_t0_s0	The density at T=0, S=0 [kg m-3].
[in]	drho_dt	The derivatives of density with temperature [kg m-3 degC-1].
[in]	drho_ds	The derivatives of density with salinity in [kg m-3 ppt-1].
[in]	rho_ref	A reference density [kg m-3].

Definition at line 58 of file MOM_EOS_linear.F90.

  real,           intent(in)  :: T        !< Potential temperature relative to the surface [degC].
  real,           intent(in)  :: S        !< Salinity [PSU].
  real,           intent(in)  :: pressure !< pressure [Pa].
  real,           intent(out) :: rho      !< In situ density [kg m-3].
  real,           intent(in)  :: Rho_T0_S0 !< The density at T=0, S=0 [kg m-3].
  real,           intent(in)  :: dRho_dT  !< The derivatives of density with temperature
                                          !! [kg m-3 degC-1].
  real,           intent(in)  :: dRho_dS  !< The derivatives of density with salinity
                                          !! in [kg m-3 ppt-1].
  real, optional, intent(in)  :: rho_ref  !< A reference density [kg m-3].
 
  if (present(rho_ref)) then
    rho = (rho_t0_s0 - rho_ref) + (drho_dt*t + drho_ds*s)
  else
    rho = rho_t0_s0 + drho_dt*t + drho_ds*s
  endif
 

---

The documentation for this interface was generated from the following file:

• /glade/work/altuntas/cesm.sandboxes/cesm2_2_alpha_X_mom/components/mom/MOM6/src/equation_of_state/MOM_EOS_linear.F90