function CalTemp = thermocal(Tempfreq,A,B,C,D,Fo)

%  thermocal -- calibrate raw data of SBE 3 Oceanographic
%      Thermometer  (Sea Bird Electronics, Bellevue, WA)
%
%      Tempfreq is the thermometer output frequency in Hz.
%      A, B, C, D, and Fo are calibration constants.
%      CalTemp is temperature in degrees Celsius.
% 
%      Fran Hotchkiss, December 8, 1997.

logratio = log(Fo./Tempfreq);
denom= polyval([D C B A],logratio);
CalTemp = (1 ./ denom) - 273.14;