| |||||||||||||||||||||||||
In-memory data exchange Description
Source Files By clicking on a file name, a preview is opened at the bottom of this page.
burglar7.mos (!****************************************************** Mosel User Guide Example Problems ================================= file burglar7.mos ````````````````` Same as burglar2.mos, with input from/output to calling application. *** Not intended to be run standalone - run from ugiosparse.c *** (c) 2008 Fair Isaac Corporation author: S. Heipcke, Mar. 2006 *******************************************************!) model Burglar7 uses "mmxprs" parameters DATA = '' ! Location of input data SOL = '' ! Location for solution data output WTMAX = 102 ! Maximum weight allowed end-parameters declarations ITEMS: set of string ! Index set for items VALUE: array(ITEMS) of real ! Value of items WEIGHT: array(ITEMS) of real ! Weight of items soltake: array(ITEMS) of real ! Solution values end-declarations initializations from 'raw:' [VALUE,WEIGHT] as DATA end-initializations declarations take: array(ITEMS) of mpvar ! 1 if we take item i; 0 otherwise end-declarations ! 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 ! Output solution to calling application forall(i in ITEMS) soltake(i):= getsol(take(i)) initializations to 'raw:' soltake as SOL end-initializations end-model | |||||||||||||||||||||||||
© Copyright 2023 Fair Isaac Corporation. |