%rand('seed',0);
for i=1:100,
  s=sprintf('Random test %d', i);
  disp(s);
  d=10;
  p=1+round(10*rand(d,1));
  nb=sum(p);
  a=(10*rand(nb,1));
  m=(10*rand(nb,1));
%   m=zeros(nb,1);						% To get an LP :-)
  c=(100*rand(nb,1));
  lb=ones(nb,1)*.90;
  ub=ones(nb,1)*2;
  t=sum(c)*1.4;
  optx=plsimplex(d,p,c,m,a,lb,ub,t);
end
