# HG changeset patch # User Robert McIntyre # Date 1344306491 14400 # Node ID 2bec949444600e5a0c2ff0927e8bd094f7ada6d0 # Parent 0f6ace87343af17e22a0c028be515ea81c0eabf8 changed macro lp-solve to work in other namespaces. diff -r 0f6ace87343a -r 2bec94944460 org/lpsolve.org --- a/org/lpsolve.org Mon Aug 06 17:26:48 2012 -0400 +++ b/org/lpsolve.org Mon Aug 06 22:28:11 2012 -0400 @@ -421,7 +421,7 @@ (defn initialize-lpsolve-row-oriented "fill in an lpsolve instance using a constraint matrix =A=, the objective function =c=, and the right-hand-side =b=" - [#^LpSolve lps A b c] + [#^lpsolve.LpSolve lps A b c] ;; set the name of the last column to _something_ ;; this appears to be necessary to ensure proper initialization. (.setColName lps (count c) (str "C" (count c))) @@ -598,7 +598,6 @@ ;; ONE based indexing!!! (range 1 (inc (.getNrows lps)))))) - (defn set-discrete "sets every variable in an lps problem to be a discrete rather than continuous variable"