FICO Xpress Optimization Examples Repository
 FICO Optimization Community FICO Xpress Optimization Home

Workshop - Displaying solution information

Description
A small planning problem. The example composes constraints, LP solves the problem and then prints the variables.

Model version 'xbworkrng' shows how to retrieve ranging information for variables and constraints and how to change the number-printing format.

Source Files
By clicking on a file name, a preview is opened at the bottom of this page.

xbworks.c

/********************************************************
BCL Example Problems
====================

file xbworks.c

Workshop planning example.

(c) 2008 Fair Isaac Corporation
author: S.Heipcke, Jan. 2000, rev. Mar. 2011
********************************************************/

#include <stdio.h>
#include "xprb.h"

#define NProd 2                  /* Number of products */
#define NShop 3                  /* Number of workshops */
#define WMAX 40                  /* Maximum weekly working time */

/****DATA****/
int DUR[][NShop] =  {{5, 9, 7},  /* Duration of product p on shop s */
{10, 2, 5}};
int RES[]   = {10, 8};           /* Man hours per unit */
int PRICE[] = {108, 84};         /* Selling price per unit */

/***********************************************************************/

int main(int argc, char **argv)
{
int p,s;
XPRBctr c;
XPRBvar x[NProd];                   /* Amount of product p */
XPRBprob prob;

prob=XPRBnewprob("Workshop");       /* Initialize a new problem in BCL */

/****VARIABLES****/
for(p=0;p<NProd;p++)
x[p] = XPRBnewvar(prob,XPRB_PL,"x",0,XPRB_INFINITY);

/****OBJECTIVE****/
c = XPRBnewctr(prob,"OBJ",XPRB_N);  /* Objective: Maximize Benefit */
for(p=0;p<NProd;p++)
XPRBsetobj(prob,c);                 /* Select objective function */

/****CONSTRAINTS****/
for(s=0;s<NShop;s++)                /* Limit on weekly working hours */
{
c=XPRBnewctr(prob,"ResMax",XPRB_L);
for(p=0;p<NProd;p++)
}

/****SOLVING + OUTPUT****/
XPRBsetsense(prob,XPRB_MAXIM);      /* Set obj. sense to maximization */
XPRBexportprob(prob,XPRB_MPS,"Works");  /* Output the matrix in MPS format */
XPRBlpoptimize(prob,"");            /* Solve the LP-problem */
printf("Objective: %g\n",XPRBgetobjval(prob));  /* Get objective value */
for(p=0;p<NProd;p++)                /* Print the solution values */
printf("%s:%g, ", XPRBgetvarname(x[p]), XPRBgetsol(x[p]));
printf("\n");

return 0;
}