COIN-OR::LEMON - Graph Library

source: glpk-cmake/examples/sample.c @ 1:c445c931472f

Last change on this file since 1:c445c931472f was 1:c445c931472f, checked in by Alpar Juttner <alpar@…>, 10 years ago

Import glpk-4.45

  • Generated files and doc/notes are removed
File size: 1.8 KB
Line 
1/* sample.c */
2
3#include <stdio.h>
4#include <stdlib.h>
5#include <glpk.h>
6
7int main(void)
8{     glp_prob *lp;
9      int ia[1+1000], ja[1+1000];
10      double ar[1+1000], z, x1, x2, x3;
11s1:   lp = glp_create_prob();
12s2:   glp_set_prob_name(lp, "sample");
13s3:   glp_set_obj_dir(lp, GLP_MAX);
14s4:   glp_add_rows(lp, 3);
15s5:   glp_set_row_name(lp, 1, "p");
16s6:   glp_set_row_bnds(lp, 1, GLP_UP, 0.0, 100.0);
17s7:   glp_set_row_name(lp, 2, "q");
18s8:   glp_set_row_bnds(lp, 2, GLP_UP, 0.0, 600.0);
19s9:   glp_set_row_name(lp, 3, "r");
20s10:  glp_set_row_bnds(lp, 3, GLP_UP, 0.0, 300.0);
21s11:  glp_add_cols(lp, 3);
22s12:  glp_set_col_name(lp, 1, "x1");
23s13:  glp_set_col_bnds(lp, 1, GLP_LO, 0.0, 0.0);
24s14:  glp_set_obj_coef(lp, 1, 10.0);
25s15:  glp_set_col_name(lp, 2, "x2");
26s16:  glp_set_col_bnds(lp, 2, GLP_LO, 0.0, 0.0);
27s17:  glp_set_obj_coef(lp, 2, 6.0);
28s18:  glp_set_col_name(lp, 3, "x3");
29s19:  glp_set_col_bnds(lp, 3, GLP_LO, 0.0, 0.0);
30s20:  glp_set_obj_coef(lp, 3, 4.0);
31s21:  ia[1] = 1, ja[1] = 1, ar[1] =  1.0; /* a[1,1] =  1 */
32s22:  ia[2] = 1, ja[2] = 2, ar[2] =  1.0; /* a[1,2] =  1 */
33s23:  ia[3] = 1, ja[3] = 3, ar[3] =  1.0; /* a[1,3] =  1 */
34s24:  ia[4] = 2, ja[4] = 1, ar[4] = 10.0; /* a[2,1] = 10 */
35s25:  ia[5] = 3, ja[5] = 1, ar[5] =  2.0; /* a[3,1] =  2 */
36s26:  ia[6] = 2, ja[6] = 2, ar[6] =  4.0; /* a[2,2] =  4 */
37s27:  ia[7] = 3, ja[7] = 2, ar[7] =  2.0; /* a[3,2] =  2 */
38s28:  ia[8] = 2, ja[8] = 3, ar[8] =  5.0; /* a[2,3] =  5 */
39s29:  ia[9] = 3, ja[9] = 3, ar[9] =  6.0; /* a[3,3] =  6 */
40s30:  glp_load_matrix(lp, 9, ia, ja, ar);
41s31:  glp_simplex(lp, NULL);
42s32:  z = glp_get_obj_val(lp);
43s33:  x1 = glp_get_col_prim(lp, 1);
44s34:  x2 = glp_get_col_prim(lp, 2);
45s35:  x3 = glp_get_col_prim(lp, 3);
46s36:  printf("\nz = %g; x1 = %g; x2 = %g; x3 = %g\n",
47         z, x1, x2, x3);
48s37:  glp_delete_prob(lp);
49      return 0;
50}
51
52/* eof */
Note: See TracBrowser for help on using the repository browser.