MOM6
mom_tfreeze::calculate_tfreeze_linear Interface Reference

Detailed Description

Compute the freezing point potential temperature [degC] from salinity [ppt] and pressure [Pa] using a simple linear expression, with coefficients passed in as arguments.

Definition at line 18 of file MOM_TFreeze.F90.

Private functions

subroutine calculate_tfreeze_linear_scalar (S, pres, T_Fr, TFr_S0_P0, dTFr_dS, dTFr_dp)
 This subroutine computes the freezing point potential temperature [degC] from salinity [ppt], and pressure [Pa] using a simple linear expression, with coefficients passed in as arguments. More...
 
subroutine calculate_tfreeze_linear_array (S, pres, T_Fr, start, npts, TFr_S0_P0, dTFr_dS, dTFr_dp)
 This subroutine computes an array of freezing point potential temperatures [degC] from salinity [ppt], and pressure [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 an array of freezing point potential temperatures [degC] from salinity [ppt], and pressure [Pa] using a simple linear expression, with coefficients passed in as arguments.

Parameters
[in]ssalinity [ppt].
[in]prespressure [Pa].
[out]t_frFreezing point potential temperature [degC].
[in]startthe starting point in the arrays.
[in]nptsthe number of values to calculate.
[in]tfr_s0_p0The freezing point at S=0, p=0, [degC].
[in]dtfr_dsThe derivative of freezing point with salinity, [degC PSU-1].
[in]dtfr_dpThe derivative of freezing point with pressure, [degC Pa-1].

Definition at line 62 of file MOM_TFreeze.F90.

62  real, dimension(:), intent(in) :: S !< salinity [ppt].
63  real, dimension(:), intent(in) :: pres !< pressure [Pa].
64  real, dimension(:), intent(out) :: T_Fr !< Freezing point potential temperature [degC].
65  integer, intent(in) :: start !< the starting point in the arrays.
66  integer, intent(in) :: npts !< the number of values to calculate.
67  real, intent(in) :: TFr_S0_P0 !< The freezing point at S=0, p=0, [degC].
68  real, intent(in) :: dTFr_dS !< The derivative of freezing point with salinity,
69  !! [degC PSU-1].
70  real, intent(in) :: dTFr_dp !< The derivative of freezing point with pressure,
71  !! [degC Pa-1].
72  integer :: j
73 
74  do j=start,start+npts-1
75  t_fr(j) = (tfr_s0_p0 + dtfr_ds*s(j)) + dtfr_dp*pres(j)
76  enddo
77 

◆ 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

This subroutine computes the freezing point potential temperature [degC] from salinity [ppt], and pressure [Pa] using a simple linear expression, with coefficients passed in as arguments.

Parameters
[in]ssalinity [ppt].
[in]prespressure [Pa].
[out]t_frFreezing point potential temperature [degC].
[in]tfr_s0_p0The freezing point at S=0, p=0 [degC].
[in]dtfr_dsThe derivative of freezing point with salinity, [degC ppt-1].
[in]dtfr_dpThe derivative of freezing point with pressure, [degC Pa-1].

Definition at line 44 of file MOM_TFreeze.F90.

44  real, intent(in) :: S !< salinity [ppt].
45  real, intent(in) :: pres !< pressure [Pa].
46  real, intent(out) :: T_Fr !< Freezing point potential temperature [degC].
47  real, intent(in) :: TFr_S0_P0 !< The freezing point at S=0, p=0 [degC].
48  real, intent(in) :: dTFr_dS !< The derivative of freezing point with salinity,
49  !! [degC ppt-1].
50  real, intent(in) :: dTFr_dp !< The derivative of freezing point with pressure,
51  !! [degC Pa-1].
52 
53  t_fr = (tfr_s0_p0 + dtfr_ds*s) + dtfr_dp*pres
54 

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