MOM6
MOM_EOS_Wright.F90 File Reference
#include <MOM_memory.h>
Include dependency graph for MOM_EOS_Wright.F90:

Go to the source code of this file.

Data Types

interface  mom_eos_wright::calculate_density_wright
 Compute the in situ density of sea water (in [kg m-3]), or its anomaly with respect to a reference density, from salinity (in psu), potential temperature (in deg C), and pressure [Pa], using the expressions from Wright, 1997, J. Atmos. Ocean. Tech., 14, 735-740. More...
 
interface  mom_eos_wright::calculate_spec_vol_wright
 Compute the in situ specific volume of sea water (in [m3 kg-1]), or an anomaly with respect to a reference specific volume, from salinity (in psu), potential temperature (in deg C), and pressure [Pa], using the expressions from Wright, 1997, J. Atmos. Ocean. Tech., 14, 735-740. More...
 
interface  mom_eos_wright::calculate_density_derivs_wright
 For a given thermodynamic state, return the derivatives of density with temperature and salinity. More...
 
interface  mom_eos_wright::calculate_density_second_derivs_wright
 For a given thermodynamic state, return the second derivatives of density with various combinations of temperature, salinity, and pressure. More...
 

Modules

module  mom_eos_wright
 The equation of state using the Wright 1997 expressions.
 
real, parameter mom_eos_wright::a0 = 7.057924e-4
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::a1 = 3.480336e-7
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::a2 = -1.112733e-7
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::b0 = 5.790749e8
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::b1 = 3.516535e6
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::b2 = -4.002714e4
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::b3 = 2.084372e2
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::b4 = 5.944068e5
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::b5 = -9.643486e3
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::c0 = 1.704853e5
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::c1 = 7.904722e2
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::c2 = -7.984422
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::c3 = 5.140652e-2
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::c4 = -2.302158e2
 Parameters in the Wright equation of state. More...
 
real, parameter mom_eos_wright::c5 = -3.079464
 Parameters in the Wright equation of state. More...
 
subroutine mom_eos_wright::calculate_density_scalar_wright (T, S, pressure, rho, rho_ref)
 This subroutine computes the in situ density of sea water (rho in [kg m-3]) from salinity (S [PSU]), potential temperature (T [degC]), and pressure [Pa]. It uses the expression from Wright, 1997, J. Atmos. Ocean. Tech., 14, 735-740. More...
 
subroutine mom_eos_wright::calculate_density_array_wright (T, S, pressure, rho, start, npts, rho_ref)
 This subroutine computes the in situ density of sea water (rho in [kg m-3]) from salinity (S [PSU]), potential temperature (T [degC]), and pressure [Pa]. It uses the expression from Wright, 1997, J. Atmos. Ocean. Tech., 14, 735-740. More...
 
subroutine mom_eos_wright::calculate_spec_vol_scalar_wright (T, S, pressure, specvol, spv_ref)
 This subroutine computes the in situ specific volume of sea water (specvol in [m3 kg-1]) from salinity (S [PSU]), potential temperature (T [degC]) and pressure [Pa]. It uses the expression from Wright, 1997, J. Atmos. Ocean. Tech., 14, 735-740. If spv_ref is present, specvol is an anomaly from spv_ref. More...
 
subroutine mom_eos_wright::calculate_spec_vol_array_wright (T, S, pressure, specvol, start, npts, spv_ref)
 This subroutine computes the in situ specific volume of sea water (specvol in [m3 kg-1]) from salinity (S [PSU]), potential temperature (T [degC]) and pressure [Pa]. It uses the expression from Wright, 1997, J. Atmos. Ocean. Tech., 14, 735-740. If spv_ref is present, specvol is an anomaly from spv_ref. More...
 
subroutine mom_eos_wright::calculate_density_derivs_array_wright (T, S, pressure, drho_dT, drho_dS, start, npts)
 For a given thermodynamic state, return the thermal/haline expansion coefficients. More...
 
subroutine mom_eos_wright::calculate_density_derivs_scalar_wright (T, S, pressure, drho_dT, drho_dS)
 The scalar version of calculate_density_derivs which promotes scalar inputs to a 1-element array and then demotes the output back to a scalar. More...
 
subroutine mom_eos_wright::calculate_density_second_derivs_array_wright (T, S, P, drho_ds_ds, drho_ds_dt, drho_dt_dt, drho_ds_dp, drho_dt_dp, start, npts)
 Second derivatives of density with respect to temperature, salinity, and pressure. More...
 
subroutine mom_eos_wright::calculate_density_second_derivs_scalar_wright (T, S, P, drho_ds_ds, drho_ds_dt, drho_dt_dt, drho_ds_dp, drho_dt_dp)
 Second derivatives of density with respect to temperature, salinity, and pressure for scalar inputs. Inputs promoted to 1-element array and output demoted to scalar. More...
 
subroutine, public mom_eos_wright::calculate_specvol_derivs_wright (T, S, pressure, dSV_dT, dSV_dS, start, npts)
 For a given thermodynamic state, return the partial derivatives of specific volume with temperature and salinity. More...
 
subroutine, public mom_eos_wright::calculate_compress_wright (T, S, pressure, rho, drho_dp, start, 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 salinity (sal in psu), potential temperature (T [degC]), and pressure [Pa]. It uses the expressions from Wright, 1997, J. Atmos. Ocean. Tech., 14, 735-740. Coded by R. Hallberg, 1/01. More...
 
subroutine, public mom_eos_wright::int_density_dz_wright (T, S, z_t, z_b, rho_ref, rho_0, G_e, HII, HIO, dpa, intz_dpa, intx_dpa, inty_dpa, bathyT, dz_neglect, useMassWghtInterp)
 This subroutine calculates analytical and nearly-analytical integrals of pressure anomalies across layers, which are required for calculating the finite-volume form pressure accelerations in a Boussinesq model. More...
 
subroutine, public mom_eos_wright::int_spec_vol_dp_wright (T, S, p_t, p_b, spv_ref, HI, dza, intp_dza, intx_dza, inty_dza, halo_size, bathyP, dP_neglect, useMassWghtInterp)
 This subroutine calculates analytical and nearly-analytical integrals in pressure across layers of geopotential anomalies, which are required for calculating the finite-volume form pressure accelerations in a non-Boussinesq model. There are essentially no free assumptions, apart from the use of Bode's rule to do the horizontal integrals, and from a truncation in the series for log(1-eps/1+eps) that assumes that |eps| < 0.34. More...