function truth = bsdone
% bsdone Returns 1 [0] if binary search is done [not done] [PHYS210-bs]
%  bsdone returns 1 if the fractional width of the search bracket
%  is <= the search tolerance, 0 otherwise.
   global Bs_low Bs_high Bs_tol Bs_progress;
   if ~ bsinitialized
      warning('Search not initialized.  Use bsnew(low, high)');
      return;
   end
   truth = abs(bsfraction) <= Bs_tol;
end
