--- a/scripts/optimization/glpktest1	Wed Mar 23 17:11:08 2005 +0000
+++ b/scripts/optimization/glpktest1	Wed Mar 23 21:28:46 2005 +0000
@@ -1,17 +1,20 @@
-clear;
-
-disp('1st problem');
-s=-1;
-c=[10,6,4]';
-a=[1,1,1;...
-   10,4,5;...
-   2,2,6];
-b=[100,600,300]';
-ctype=['U','U','U']';
-lb=[0,0,0]';
-ub=[]';
-vartype=['C','C','C']';
-param.msglev=3;
-lpsolver=1;
-save_pb=1;
-[xmin,fmin,status,extra]=glpk(s,c,a,b,ctype,lb,ub,vartype,param,lpsolver,save_pb)
+clear;
+
+disp('1st problem');
+s=-1;
+c=[10,6,4]';
+a=[1,1,1;...
+   10,4,5;...
+   2,2,6];
+b=[100,600,300]';
+ctype=['U','U','U']';
+lb=[0,0,0]';
+ub=[]';
+vartype=['C','C','C']';
+param.msglev=3;
+param.lpsolver=1;
+param.save=1;
+[xmin,fmin,status,extra]=glpk(c,a,b,lb,ub,ctype,vartype,s,param)
+lpsolver = param.lpsolver;
+save_pb = param.save;
+[xmin,fmin,status,extra]=glpkmex(s,c,a,b,ctype,lb,ub,vartype,param,lpsolver,save_pb)