
clear all

teste = strvcat('test1','test12');
N = size(teste,1);
NM = 5;

x0 = [-1.2 1;
       8   9];

n = [2; 2];

maxit = 5000;

exec Complex.sci;
exec univar.sci;
exec rosembr.sci;
exec powell.sci;
exec hkjeeves.sci;

for i = 1:N
   
problema = deblank(teste(i,:));

tic
[xo, Ot, nS]=Complex(problema,x0(i,1:n(i)),0,[],[],[],[],maxit);
f(i,1)=toc;

tic
[xo, Ot, nS]=univar(problema,x0(i,1:n(i)),0,1,[],[],[],[],maxit);
f(i,2) = toc;

tic
[xo, Ot, nS]=rosembr(problema,x0(i,1:n(i)),0,[],[],[],[],maxit);
f(i,3) = toc;

tic
[xo, Ot, nS]=powell(problema,x0(i,1:n(i)),0,1,[],[],[],[],maxit);
f(i,4) = toc;

tic
[xo, Ot, nS]=hkjeeves(problema,x0(i,1:n(i)),0,[],[],[],[],maxit);
f(i,5) = toc;


end

minT = min(f,[],2);
Teta = (100/N)*sum(repmat(minT,1,NM)./f);

