function [frac_sum] = eval_prob_best_selection_at_m(n,m)
% 
% Written by:
% -- 
% John L. Weatherwax                2006-12-31
% 
% email: wax@alum.mit.edu
% 
% Please send comments and especially bug reports to the
% above email address.
% 
%-----

if( m < 1 ) 
  error( 'm must be larger than 1' );
end
if( m>=n )
  error( 'm must be lest than n' );
end

frac_sum = 0;
for ii=m:(n-1)
  frac_sum = frac_sum + (1./ii);
end
frac_sum = (m/n) * frac_sum;