FICO Xpress Optimization Examples Repository: Basic embedding tasks

FICO Xpress Optimization Examples Repository

FICO Optimization Community

FICO Xpress Optimization Home

Basic embedding tasks

Description

ugcomp.c: Compiling a model into a BIM file (requires burglar2.mos, burglar.dat)
ugcomptmp.c: Compiling a model into a BIM file saved in Mosel's temporary directory (requires burglar2.mos, burglar.dat)
ugexec.c: Execute (compile/load/run) a model (requires burglar2.mos, burglar.dat)
ugrun.c: Executing a BIM file (requires burglar2.bim, burglar.dat)
ugdefstream.c: Redirecting the model output (requires burglar2.mos, burglar.dat)
ugarray1.c, ugarray2.c: Accessing modeling objects: sparse arrays (requires transport.mos, transprt.dat)
ugcb.c: Retrieve model output via a callback (requires burglar2.mos, burglar.dat)
ugparam1.c, ugparam2.c: Passing parameters to a Mosel model (requires prime2.mos)
ugsol1.c, ugsol2.c: Accessing modeling objects and solution information (requires burglar3.mos, burglar.dat)

ugc.zip

[download all files]

Source Files

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

ugcomp.c	[download]
ugcomptmp.c	[download]
ugexec.c	[download]
ugrun.c	[download]
ugdefstream.c	[download]
ugarray1.c	[download]
ugarray2.c	[download]
ugcb.c	[download]
ugsol1.c	[download]
ugsol2.c	[download]
ugparam1.c	[download]
ugparam2.c	[download]
burglar2.mos	[download]
transport.mos	[download]
prime2.mos	[download]
burglar3.mos	[download]

Data Files

burglar.dat	[download]
transprt.dat	[download]

burglar2.mos

(!******************************************************
   Mosel User Guide Example Problems
   ================================= 

   file burglar2.mos
   `````````````````
   Use of index sets.
   
   (c) 2008 Fair Isaac Corporation
       author: S. Heipcke, 2001, rev. 2006
*******************************************************!)

model Burglar2
 uses "mmxprs"
 
 declarations
  WTMAX = 102                    ! Maximum weight allowed
  ITEMS = {"camera", "necklace", "vase", "picture", "tv", "video", 
           "chest", "brick"}     ! Index set for items
  
  VALUE: array(ITEMS) of real    ! Value of items
  WEIGHT: array(ITEMS) of real   ! Weight of items
  
  take: array(ITEMS) of mpvar    ! 1 if we take item i; 0 otherwise
 end-declarations

 initializations from 'burglar.dat'
  VALUE  WEIGHT
 end-initializations

! Objective: maximize total value
 MaxVal:= sum(i in ITEMS) VALUE(i)*take(i) 

! Weight restriction
 sum(i in ITEMS) WEIGHT(i)*take(i) <= WTMAX

! All variables are 0/1
 forall(i in ITEMS) take(i) is_binary  

 maximize(MaxVal)                 ! Solve the MIP-problem

! Print out the solution
 writeln("Solution:\n Objective: ", getobjval)
 forall(i in ITEMS)  writeln(" take(", i, "): ", getsol(take(i)))
end-model