% 
% 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.
% 
%-----

clc; 
close all; 

denom = 0.;
for k=0:10
  denom = denom + ( ( k/10 )^10 ) * nchoosek(10,k);
end
prob = 1/denom