mom_eos_teos10 mom_eos_teos10::calculate_density_derivs_teos10 mom_eos_teos10::calculate_density_second_derivs_teos10 mom_eos_teos10::calculate_density_teos10 mom_eos_teos10::calculate_spec_vol_teos10 real, parameter real, parameter mom_eos_teos10::pa2db pa2db = 1.e-4 The conversion factor from Pa to dbar. calculate_compress_teos10 calculate_density_array_teos10 calculate_density_derivs_array_teos10 calculate_density_derivs_scalar_teos10 calculate_density_second_derivs_array_teos10 calculate_density_second_derivs_scalar_teos10 calculate_spec_vol_array_teos10 calculate_specvol_derivs_teos10 subroutine subroutine mom_eos_teos10::calculate_density_scalar_teos10 (T, S, pressure, rho, rho_ref) calculate_density_scalar_teos10 T T S S pressure pressure rho rho rho_ref rho_ref This subroutine computes the in situ density of sea water (rho in [kg m-3]) from absolute salinity (S [g kg-1]), conservative temperature (T [degC]), and pressure [Pa]. It uses the expression from the TEOS10 website. t Conservative temperature [degC]. s Absolute salinity [g kg-1]. pressure pressure [Pa]. rho In situ density [kg m-3]. rho_ref A reference density [kg m-3]. calculate_density_array_teos10 subroutine subroutine mom_eos_teos10::calculate_density_array_teos10 (T, S, pressure, rho, start, npts, rho_ref) calculate_density_array_teos10 T T S S pressure pressure rho rho start start npts npts rho_ref rho_ref This subroutine computes the in situ density of sea water (rho in [kg m-3]) from absolute salinity (S [g kg-1]), conservative temperature (T [degC]), and pressure [Pa]. It uses the expression from the TEOS10 website. t Conservative temperature [degC]. s Absolute salinity [g kg-1] pressure pressure [Pa]. rho in situ density [kg m-3]. start the starting point in the arrays. npts the number of values to calculate. rho_ref A reference density [kg m-3]. pa2db calculate_density_scalar_teos10 subroutine subroutine mom_eos_teos10::calculate_spec_vol_scalar_teos10 (T, S, pressure, specvol, spv_ref) calculate_spec_vol_scalar_teos10 T T S S pressure pressure specvol specvol spv_ref spv_ref This subroutine computes the in situ specific volume of sea water (specvol in [m3 kg-1]) from absolute salinity (S [g kg-1]), conservative temperature (T [degC]) and pressure [Pa], using the TEOS10 equation of state. If spv_ref is present, specvol is an anomaly from spv_ref. t Conservative temperature [degC]. s Absolute salinity [g kg-1] pressure pressure [Pa]. specvol in situ specific volume [m3 kg-1]. spv_ref A reference specific volume [m3 kg-1]. calculate_spec_vol_array_teos10 subroutine subroutine mom_eos_teos10::calculate_spec_vol_array_teos10 (T, S, pressure, specvol, start, npts, spv_ref) calculate_spec_vol_array_teos10 T T S S pressure pressure specvol specvol start start npts npts spv_ref spv_ref This subroutine computes the in situ specific volume of sea water (specvol in [m3 kg-1]) from absolute salinity (S [g kg-1]), conservative temperature (T [degC]) and pressure [Pa], using the TEOS10 equation of state. If spv_ref is present, specvol is an anomaly from spv_ref. t Conservative temperature relative to the surface [degC]. s salinity [g kg-1]. pressure pressure [Pa]. specvol in situ specific volume [m3 kg-1]. start the starting point in the arrays. npts the number of values to calculate. spv_ref A reference specific volume [m3 kg-1]. pa2db calculate_spec_vol_scalar_teos10 subroutine subroutine mom_eos_teos10::calculate_density_derivs_array_teos10 (T, S, pressure, drho_dT, drho_dS, start, npts) calculate_density_derivs_array_teos10 T T S S pressure pressure drho_dT drho_dT drho_dS drho_dS start start npts npts For a given thermodynamic state, calculate the derivatives of density with conservative temperature and absolute salinity, using the TEOS10 expressions. t Conservative temperature [degC]. s Absolute salinity [g kg-1]. pressure pressure [Pa]. drho_dt The partial derivative of density with conservative temperature [kg m-3 degC-1]. drho_ds The partial derivative of density with absolute salinity, [kg m-3 (g/kg)-1]. start The starting point in the arrays. npts The number of values to calculate. pa2db subroutine subroutine mom_eos_teos10::calculate_density_derivs_scalar_teos10 (T, S, pressure, drho_dT, drho_dS) calculate_density_derivs_scalar_teos10 T T S S pressure pressure drho_dT drho_dT drho_dS drho_dS For a given thermodynamic state, calculate the derivatives of density with conservative temperature and absolute salinity, using the TEOS10 expressions. t Conservative temperature [degC] s Absolute Salinity [g kg-1] pressure pressure [Pa]. drho_dt The partial derivative of density with conservative temperature [kg m-3 degC-1]. drho_ds The partial derivative of density with absolute salinity, [kg m-3 (g/kg)-1]. pa2db subroutine, public subroutine, public mom_eos_teos10::calculate_specvol_derivs_teos10 (T, S, pressure, dSV_dT, dSV_dS, start, npts) calculate_specvol_derivs_teos10 T T S S pressure pressure dSV_dT dSV_dT dSV_dS dSV_dS start start npts npts For a given thermodynamic state, calculate the derivatives of specific volume with conservative temperature and absolute salinity, using the TEOS10 expressions. t Conservative temperature [degC]. s Absolute salinity [g kg-1]. pressure pressure [Pa]. dsv_dt The partial derivative of specific volume with conservative temperature [m3 kg-1 degC-1]. dsv_ds The partial derivative of specific volume with absolute salinity [m3 kg-1 (g/kg)-1]. start The starting point in the arrays. npts The number of values to calculate. pa2db subroutine subroutine mom_eos_teos10::calculate_density_second_derivs_scalar_teos10 (T, S, pressure, drho_dS_dS, drho_dS_dT, drho_dT_dT, drho_dS_dP, drho_dT_dP) calculate_density_second_derivs_scalar_teos10 T T S S pressure pressure drho_dS_dS drho_dS_dS drho_dS_dT drho_dS_dT drho_dT_dT drho_dT_dT drho_dS_dP drho_dS_dP drho_dT_dP drho_dT_dP Calculate the 5 second derivatives of the equation of state for scalar inputs. t Conservative temperature [degC] s Absolute Salinity [g kg-1] pressure pressure [Pa]. drho_ds_ds Partial derivative of beta with respect to S drho_ds_dt Partial derivative of beta with resepct to T drho_dt_dt Partial derivative of alpha with respect to T drho_ds_dp Partial derivative of beta with respect to pressure drho_dt_dp Partial derivative of alpha with respect to pressure pa2db subroutine subroutine mom_eos_teos10::calculate_density_second_derivs_array_teos10 (T, S, pressure, drho_dS_dS, drho_dS_dT, drho_dT_dT, drho_dS_dP, drho_dT_dP, start, npts) calculate_density_second_derivs_array_teos10 T T S S pressure pressure drho_dS_dS drho_dS_dS drho_dS_dT drho_dS_dT drho_dT_dT drho_dT_dT drho_dS_dP drho_dS_dP drho_dT_dP drho_dT_dP start start npts npts Calculate the 5 second derivatives of the equation of state for scalar inputs. t Conservative temperature [degC] s Absolute Salinity [g kg-1] pressure pressure [Pa]. drho_ds_ds Partial derivative of beta with respect to S drho_ds_dt Partial derivative of beta with resepct to T drho_dt_dt Partial derivative of alpha with respect to T drho_ds_dp Partial derivative of beta with respect to pressure drho_dt_dp Partial derivative of alpha with respect to pressure start The starting point in the arrays. npts The number of values to calculate. pa2db subroutine, public subroutine, public mom_eos_teos10::calculate_compress_teos10 (T, S, pressure, rho, drho_dp, start, npts) calculate_compress_teos10 T T S S pressure pressure rho rho drho_dp drho_dp start start npts npts This subroutine computes the in situ density of sea water (rho in [kg m-3]) and the compressibility (drho/dp = C_sound^-2) (drho_dp [s2 m-2]) from absolute salinity (sal in g/kg), conservative temperature (T [degC]), and pressure [Pa]. It uses the subroutines from TEOS10 website. t Conservative temperature [degC]. s Absolute salinity [g kg-1]. pressure Pressure [Pa]. rho In situ density [kg m-3]. drho_dp The partial derivative of density with pressure (also the inverse of the square of sound speed) [s2 m-2]. start The starting point in the arrays. npts The number of values to calculate. pa2db The equation of state using the TEOS10 expressions.