Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

using replicateM in newVars

  • Loading branch information...
commit aa3978bda8d88b469f129994a6507e11b6ccf580 1 parent ac61232
@mcmaniac authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/Numeric/LinearProgramming/Easy.hs
View
2  src/Numeric/LinearProgramming/Easy.hs
@@ -134,7 +134,7 @@ newVar = Simplex $ do
-- | Create a list of @n@ new variables.
newVars :: Int -> Simplex [SimplexVar]
-newVars i = mapM (const newVar) [1..i]
+newVars n = replicateM n newVar
minimize :: SimplexExpr -> [SimplexConstraints] -> Simplex Solution
Please sign in to comment.
Something went wrong with that request. Please try again.