mom_tfreeze::calculate_tfreeze_linear Interface Reference

Detailed Description

Definition at line 33 of file MOM_TFreeze.F90.

Private functions
subroutine	calculate_tfreeze_linear_scalar (S, pres, T_Fr, TFr_S0_P0, dTFr_dS, dTFr_dp)
subroutine	calculate_tfreeze_linear_array (S, pres, T_Fr, start, npts, TFr_S0_P0, dTFr_dS, dTFr_dp)
	This subroutine computes the freezing point potential temparature (in deg C) from salinity (in psu), and pressure (in Pa) using a simple linear expression, with coefficients passed in as arguments. More...

Functions and subroutines

calculate_tfreeze_linear_array()

subroutine mom_tfreeze::calculate_tfreeze_linear::calculate_tfreeze_linear_array ( real, dimension(:), intent(in)  S, real, dimension(:), intent(in)  pres, real, dimension(:), intent(out)  T_Fr, integer, intent(in)  start, integer, intent(in)  npts, real, intent(in)  TFr_S0_P0, real, intent(in)  dTFr_dS, real, intent(in)  dTFr_dp  )

private

This subroutine computes the freezing point potential temparature (in deg C) from salinity (in psu), and pressure (in Pa) using a simple linear expression, with coefficients passed in as arguments.

Parameters

[in]	s	salinity in PSU.
[in]	pres	pressure in Pa.
[out]	t_fr	Freezing point potential temperature in deg C.
[in]	start	the starting point in the arrays.
[in]	npts	the number of values to calculate.
[in]	tfr_s0_p0	The freezing point at S=0, p=0, in deg C.
[in]	dtfr_ds	The derivative of freezing point with salinity, in deg C PSU-1.
[in]	dtfr_dp	The derivative of freezing point with pressure, in deg C Pa-1.

Definition at line 74 of file MOM_TFreeze.F90.

  real,  dimension(:), intent(in)  :: s         !< salinity in PSU.
  real,  dimension(:), intent(in)  :: pres      !< pressure in Pa.
  real,  dimension(:), intent(out) :: t_fr      !< Freezing point potential temperature in deg C.
  integer,             intent(in)  :: start     !< the starting point in the arrays.
  integer,             intent(in)  :: npts      !< the number of values to calculate.
  real,                intent(in)  :: tfr_s0_p0 !< The freezing point at S=0, p=0, in deg C.
  real,                intent(in)  :: dtfr_ds   !< The derivative of freezing point with salinity,
                                                !! in deg C PSU-1.
  real,                intent(in)  :: dtfr_dp   !< The derivative of freezing point with pressure,
                                                !! in deg C Pa-1.

!    This subroutine computes the freezing point potential temparature
!  (in deg C) from salinity (in psu), and pressure (in Pa) using a simple
!  linear expression, with coefficients passed in as arguments.
!
! Arguments: S - salinity in PSU.
!  (in)      pres - pressure in Pa.
!  (out)     T_Fr - Freezing point potential temperature in deg C.
!  (in)      start - the starting point in the arrays.
!  (in)      npts - the number of values to calculate.
!  (in)      TFr_S0_P0 - The freezing point at S=0, p=0, in deg C.
!  (in)      dTFr_dS - The derivative of freezing point with salinity, in
!                      deg C PSU-1.
!  (in)      dTFr_dp - The derivative of freezing point with pressure, in
!                      deg C Pa-1.
  integer :: j

  do j=start,start+npts-1
    t_fr(j) = (tfr_s0_p0 + dtfr_ds*s(j)) + dtfr_dp*pres(j)
  enddo

calculate_tfreeze_linear_scalar()

subroutine mom_tfreeze::calculate_tfreeze_linear::calculate_tfreeze_linear_scalar ( real, intent(in)  S, real, intent(in)  pres, real, intent(out)  T_Fr, real, intent(in)  TFr_S0_P0, real, intent(in)  dTFr_dS, real, intent(in)  dTFr_dp  )

private

Definition at line 49 of file MOM_TFreeze.F90.

  real,    intent(in)  :: s, pres
  real,    intent(out) :: t_fr
  real,    intent(in)  :: tfr_s0_p0, dtfr_ds, dtfr_dp
!    This subroutine computes the freezing point potential temparature
!  (in deg C) from salinity (in psu), and pressure (in Pa) using a simple
!  linear expression, with coefficients passed in as arguments.
!
! Arguments: S - salinity in PSU.
!  (in)      pres - pressure in Pa.
!  (out)     T_Fr - Freezing point potential temperature in deg C.
!  (in)      TFr_S0_P0 - The freezing point at S=0, p=0, in deg C.
!  (in)      dTFr_dS - The derivatives of freezing point with salinity, in
!                      deg C PSU-1.
!  (in)      dTFr_dp - The derivatives of freezing point with pressure, in
!                      deg C Pa-1.

  t_fr = (tfr_s0_p0 + dtfr_ds*s) + dtfr_dp*pres

---

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

• /home/adcroft/GitHub/workspace/Gaea-stats-MOM6-examples/MOM6-examples/src/MOM6/src/equation_of_state/MOM_TFreeze.F90