Calculate the derivatives of density with temperature and salinity from T, S, and P.
Definition at line 70 of file MOM_EOS.F90.
|
subroutine | calculate_density_derivs_scalar (T, S, pressure, drho_dT, drho_dS, EOS) |
| Calls the appropriate subroutines to calculate density derivatives by promoting a scalar to a one-element array. More...
|
|
subroutine | calculate_density_derivs_array (T, S, pressure, drho_dT, drho_dS, start, npts, EOS) |
| Calls the appropriate subroutine to calculate density derivatives for 1-D array inputs. More...
|
|
◆ calculate_density_derivs_array()
subroutine mom_eos::calculate_density_derivs::calculate_density_derivs_array |
( |
real, dimension(:), intent(in) |
T, |
|
|
real, dimension(:), intent(in) |
S, |
|
|
real, dimension(:), intent(in) |
pressure, |
|
|
real, dimension(:), intent(out) |
drho_dT, |
|
|
real, dimension(:), intent(out) |
drho_dS, |
|
|
integer, intent(in) |
start, |
|
|
integer, intent(in) |
npts, |
|
|
type(eos_type), pointer |
EOS |
|
) |
| |
|
private |
Calls the appropriate subroutine to calculate density derivatives for 1-D array inputs.
- Parameters
-
[in] | t | Potential temperature referenced to the surface [degC] |
[in] | s | Salinity [ppt] |
[in] | pressure | Pressure [Pa] |
[out] | drho_dt | The partial derivative of density with potential temperature [kg m-3 degC-1]. |
[out] | drho_ds | The partial derivative of density with salinity, in [kg m-3 ppt-1]. |
[in] | start | Starting index within the array |
[in] | npts | The number of values to calculate |
| eos | Equation of state structure |
Definition at line 337 of file MOM_EOS.F90.
337 real,
dimension(:),
intent(in) :: T
338 real,
dimension(:),
intent(in) :: S
339 real,
dimension(:),
intent(in) :: pressure
340 real,
dimension(:),
intent(out) :: drho_dT
342 real,
dimension(:),
intent(out) :: drho_dS
344 integer,
intent(in) :: start
345 integer,
intent(in) :: npts
346 type(EOS_type),
pointer :: EOS
348 if (.not.
associated(eos))
call mom_error(fatal, &
349 "calculate_density_derivs called with an unassociated EOS_type EOS.")
351 select case (eos%form_of_EOS)
353 call calculate_density_derivs_linear(t, s, pressure, drho_dt, drho_ds, eos%Rho_T0_S0, &
354 eos%dRho_dT, eos%dRho_dS, start, npts)
356 call calculate_density_derivs_unesco(t, s, pressure, drho_dt, drho_ds, start, npts)
358 call calculate_density_derivs_wright(t, s, pressure, drho_dt, drho_ds, start, npts)
360 call calculate_density_derivs_teos10(t, s, pressure, drho_dt, drho_ds, start, npts)
362 call calculate_density_derivs_nemo(t, s, pressure, drho_dt, drho_ds, start, npts)
364 call mom_error(fatal, &
365 "calculate_density_derivs_array: EOS%form_of_EOS is not valid.")
◆ calculate_density_derivs_scalar()
subroutine mom_eos::calculate_density_derivs::calculate_density_derivs_scalar |
( |
real, intent(in) |
T, |
|
|
real, intent(in) |
S, |
|
|
real, intent(in) |
pressure, |
|
|
real, intent(out) |
drho_dT, |
|
|
real, intent(out) |
drho_dS, |
|
|
type(eos_type), pointer |
EOS |
|
) |
| |
|
private |
Calls the appropriate subroutines to calculate density derivatives by promoting a scalar to a one-element array.
- Parameters
-
[in] | t | Potential temperature referenced to the surface [degC] |
[in] | s | Salinity [ppt] |
[in] | pressure | Pressure [Pa] |
[out] | drho_dt | The partial derivative of density with potential temperature [kg m-3 degC-1]. |
[out] | drho_ds | The partial derivative of density with salinity, in [kg m-3 ppt-1]. |
| eos | Equation of state structure |
Definition at line 373 of file MOM_EOS.F90.
373 real,
intent(in) :: T
374 real,
intent(in) :: S
375 real,
intent(in) :: pressure
376 real,
intent(out) :: drho_dT
378 real,
intent(out) :: drho_dS
380 type(EOS_type),
pointer :: EOS
381 if (.not.
associated(eos))
call mom_error(fatal, &
382 "calculate_density_derivs called with an unassociated EOS_type EOS.")
384 select case (eos%form_of_EOS)
386 call calculate_density_derivs_linear(t, s, pressure, drho_dt, drho_ds, &
387 eos%Rho_T0_S0, eos%dRho_dT, eos%dRho_dS)
389 call calculate_density_derivs_wright(t, s, pressure, drho_dt, drho_ds)
391 call calculate_density_derivs_teos10(t, s, pressure, drho_dt, drho_ds)
393 call mom_error(fatal, &
394 "calculate_density_derivs_scalar: EOS%form_of_EOS is not valid.")
The documentation for this interface was generated from the following file:
- /home/docs/checkouts/readthedocs.org/user_builds/mom6-doctesting/checkouts/brokenbreathe/src/equation_of_state/MOM_EOS.F90