function [epsfeas,epsopt,iprint,ncomp] = param
  
%     [epsfeas,epsopt,iprint,ncomp] = param
% 

      epsfeas = 1.0d-08;
      epsopt  = 1.0d-08;

      iprint  = 10;
      ncomp   = 6;

      
end