-
Notifications
You must be signed in to change notification settings - Fork 0
/
gsw_SR_from_SP.m
executable file
·49 lines (42 loc) · 1.57 KB
/
gsw_SR_from_SP.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
function SR = gsw_SR_from_SP(SP)
% gsw_SR_from_SP Reference Salinity from Practical Salinity
%==========================================================================
%
% USAGE:
% SR = gsw_SR_from_SP(SP)
%
% DESCRIPTION:
% Calculates Reference Salinity from Practical Salinity.
%
% INPUT:
% SP = Practical Salinity (PSS-78) [ unitless ]
%
% OUTPUT:
% SR = Reference Salinity [ g/kg ]
%
% AUTHOR:
% Trevor McDougall and Paul Barker [ [email protected] ]
%
% VERSION NUMBER: 3.05 (27th January 2015)
%
% REFERENCES:
% IOC, SCOR and IAPSO, 2010: The international thermodynamic equation of
% seawater - 2010: Calculation and use of thermodynamic properties.
% Intergovernmental Oceanographic Commission, Manuals and Guides No. 56,
% UNESCO (English), 196 pp. Available from http://www.TEOS-10.org
%
% The software is available from http://www.TEOS-10.org
%
%==========================================================================
%--------------------------------------------------------------------------
% Check variables
%--------------------------------------------------------------------------
if ~(nargin == 1)
error('gsw_SR_from_SP: Requires only one input')
end %if
%--------------------------------------------------------------------------
% Start of the calculation
%--------------------------------------------------------------------------
u_PS = 1.004715428571429; % u_PS = (35.16504/35)
SR = u_PS.*SP;
end