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.
|
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...
|
|
◆ 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] | s | salinity [ppt]. |
[in] | pres | pressure [Pa]. |
[out] | t_fr | Freezing point potential temperature [degC]. |
[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, [degC]. |
[in] | dtfr_ds | The derivative of freezing point with salinity, [degC PSU-1]. |
[in] | dtfr_dp | The derivative of freezing point with pressure, [degC Pa-1]. |
Definition at line 62 of file MOM_TFreeze.F90.
62 real,
dimension(:),
intent(in) :: S
63 real,
dimension(:),
intent(in) :: pres
64 real,
dimension(:),
intent(out) :: T_Fr
65 integer,
intent(in) :: start
66 integer,
intent(in) :: npts
67 real,
intent(in) :: TFr_S0_P0
68 real,
intent(in) :: dTFr_dS
70 real,
intent(in) :: dTFr_dp
74 do j=start,start+npts-1
75 t_fr(j) = (tfr_s0_p0 + dtfr_ds*s(j)) + dtfr_dp*pres(j)
◆ 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] | s | salinity [ppt]. |
[in] | pres | pressure [Pa]. |
[out] | t_fr | Freezing point potential temperature [degC]. |
[in] | tfr_s0_p0 | The freezing point at S=0, p=0 [degC]. |
[in] | dtfr_ds | The derivative of freezing point with salinity, [degC ppt-1]. |
[in] | dtfr_dp | The derivative of freezing point with pressure, [degC Pa-1]. |
Definition at line 44 of file MOM_TFreeze.F90.
45 real,
intent(in) :: pres
46 real,
intent(out) :: T_Fr
47 real,
intent(in) :: TFr_S0_P0
48 real,
intent(in) :: dTFr_dS
50 real,
intent(in) :: dTFr_dp
53 t_fr = (tfr_s0_p0 + dtfr_ds*s) + dtfr_dp*pres
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_TFreeze.F90