%
%   OILTANKB.M   Function evaluation for FZERO step in OILTANK.M
%
%   Evaluate function f(h) = V(h) - Vo  for some h 
%
%   File prepared by J. R. White, UMass-Lowell (July 2003)
%
      function f = oiltankb(h)
      global PP Vo
      f = ppval(PP,h)-Vo;  
% 
%   end of function