% jleonard 3/10/02   13.002J/10.002J

n = 1000;
result0 = zeros(n,1);
for i=1:n
  result0(i) = lets_make_a_deal(0);
end



n = 1000;
result1 = zeros(n,1);
for i=1:n
  result1(i) = lets_make_a_deal(1);
end

fprintf('\n\nno switch: probability of winning is: %f\n', ...
	length(find(result0))/n);
fprintf('switch: probability of winning is: %f\n', ...
	length(find(result1))/n);

