function ctd_pres = cCTD_pres(p, pitch);

% ctd_pres = cCTD_pres(p, pitch);
%
%   Correct CTD pressure for attitude of vehicle. 
%   Assumes units of decibar.
%
% J. G. Bellingham

dx = 0.3; dy = 0.2;  % position of CTD intake valid for MABay98

ctd_pres = p + (dx * sin(pitch) - dy * cos(pitch))/10;
