% SALSP  Salinity and sound speed.
%    [SAL,SPD] = SALSP( cond(s/m), temp(deg C), pressure(dbar) )

function [sal,spd] = salsp( c, t, p )

sal = sw_salt( 10*c/sw_c3515, t, p );

if nargout > 1
    spd = sw_svel( sal, t, p );
end
