Learn R Programming

oce (version 0.1.67)

sw.viscosity: Seawater viscosity

Description

Compute viscosity of seawater, in $Pa\cdot s$

Usage

v <- sw.viscosity(S, t);

Arguments

S
in-situ salinity [PSU]
t
in-situ temperature [$^\circ$C]

Value

  • Viscosity of seawater in $Pa\cdot s$. Divide by density to get kinematic viscosity in $m^2/s$.

Details

Derived from a curve fit to table 87 of Dorsey (1940). The fit matches the table to within 0.2 percent at worst, and with average absolute error of 0.07 percent. The maximum deviation from the table is one unit in the last decimal place.

No pressure dependence was reported by Dorsey (1940).

It would be a good idea to look for other values to check those used here, and of course to get an idea of pressure dependence. Therefore, this subroutine is provisional. -- Dan Kelley 2006-01-21.

References

N. Ernest Dorsey (1940), Properties of ordinary Water-substance, American Chemical Society Monograph Series. Reinhold Publishing.

See Also

N/A.

Examples

Run this code
v <- sw.viscosity(30,10); # 0.001383779

Run the code above in your browser using DataLab