function timedelay(n)
%% time delay 

%%  Kriging Software Package  version 1.0 beta,   October 29, 1998
%%  Copyright (c) 1998, property of Dezhang Chu and Woods Hole Oceanographic
%%  Institution.  All Rights Reserved.

m=100;
for i=1:n
   pp=rand(m,m);
   pcnd=cond(pp);
end