FICO
FICO Xpress Optimization Examples Repository
FICO Optimization Community FICO Xpress Optimization Home
Back to examples browser

Mosel files for the Mosel-Python comparison blog

Description

Mosel files for the blog post comparing Mosel and Python.

Instructions for running these files:
  1. Extract the data files into the same directory as the Mosel files
  2. To run a single file via the command line, call Mosel and pass the filename followed by "DATA_FILE_PREFIX=" and the first 2 digits of the data file. For example: mosel SparseGrouping_std.mos DATA_FILE_PREFIX=00
Further explanation of this example: See the blog 4 Main Takeaways from Comparing Xpress Mosel and Python for Optimization Models


Source Files

Data Files





QuantityDiscount_adv.mos

(!******************************************************
   Mosel Example Problems
   ====================== 

   file QuantityDiscount_adv.mos 
   `````````````````````````````
   Improved version of model 'QuantityDiscount_std.mos'.
   -- Multiple cases within a loop --
 
   (c) 2019-2025 Fair Isaac Corporation
       author: S.Heipcke
*******************************************************!)
model "Quantity Discount" 

    uses "mmsheet","mmsystem"

    parameters
        DATA_FILE_PREFIX = "00"
    end-parameters
    writeln("#E:IMPORT")

    writeln("#S:READ")
    declarations
        P: range
        V: array(P) of integer    
        W: array(P) of real
        S: real
        A: array(0..50) of real
    end-declarations

    initializations from "mmetc.diskdata:"
        V as "sparse,skiph," + DATA_FILE_PREFIX + "_H_QuantityDiscount_V.csv"
    end-initializations
    writeln("#E:READ")

    writeln("#S:PROC")
    A(0):=1.50; A(1):=1.45;
    forall(i in 2..5) A(i):=1.30; forall(i in 6..50) A(i):=1.25
 
    ! Local definition to replace multiple access to same array element
    forall(p in P,vp=V(p))
      W(p):=if(vp<=50, A(vp), 1.20)

    S := sum(p in P) V(p) * W(p)
    writeln("#E:PROC")

    writeln("#S:TEST")
    setparam("realfmt", "%.2f")
    writeln(S)
    writeln("#E:TEST")
end-model

Back to examples browser