function bsstatus()
% bsstatus Returns status of binary search [PHYS210-bs]
   global Bs_low Bs_high Bs_tol Bs_progress;
   if ~ bsinitialized
      warning('Search not initialized.  Use bsnew(low, high)');
      return;
   end
   strLast = cell(1,2);
   strLast{1} = 'Low';
   strLast{2} = 'High';
   fprintf('Low:          %.15e\n', bslowv);
   fprintf('High:         %.15e\n', bshighv);
   fprintf('Midpoint      %.15e\n', bscurrent);
   fprintf('Frac. width:  %.15e\n', bsfraction);
   fprintf('Tolerance:    %.15e\n', bstolerance);
   if length(Bs_progress)
      fprintf('Last          %s\n', strLast{Bs_progress(end)+1});
   else
      fprintf('Taken:        %d\n', length(Bs_progress));
      fprintf('Remaining:    %d\n', max([0, fix(log2(bsfraction/bstolerance))]));
   end
end

