Mercurial > hg > octave-nkf

annotate scripts/optimization/glpktest1 @ 20296:23fb65b45d8c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
do not call custom editor at startup and when debugging (bug #44701) * file-editor.cc (call_custom_editor): return with true but without opening a file; (empty_script): do not open an empty script in the cutom editor at startup
author Torsten <ttl@justmail.de>
date Fri, 17 Apr 2015 19:55:24 +0200
parents 652e8aa49fa7
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
5237
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
1 clear;
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
2
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
3 disp('1st problem');
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
4 s=-1;
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
5 c=[10,6,4]';
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
6 a=[1,1,1;...
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
7 10,4,5;...
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
8 2,2,6];
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
9 b=[100,600,300]';
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
10 ctype=['U','U','U']';
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
11 lb=[0,0,0]';
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
12 ub=[]';
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
13 vartype=['C','C','C']';
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
14 param.msglev=3;
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
15 param.lpsolver=1;
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
16 param.save=1;
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
17 [xmin,fmin,status,extra]=glpk(c,a,b,lb,ub,ctype,vartype,s,param)
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
18 lpsolver = param.lpsolver;
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
19 save_pb = param.save;
652e8aa49fa7 [project @ 2005-03-23 21:28:45 by jwe]
jwe
parents: 5232
diff changeset
20 [xmin,fmin,status,extra]=glpkmex(s,c,a,b,ctype,lb,ub,vartype,param,lpsolver,save_pb)