diff options
author | Alberto Ruiz <aruiz@um.es> | 2010-02-23 18:22:57 +0000 |
---|---|---|
committer | Alberto Ruiz <aruiz@um.es> | 2010-02-23 18:22:57 +0000 |
commit | e0605467b60f65478d0f5cc8f82ba14a99168f7b (patch) | |
tree | 876e81ae0ee77f4cd01f5729ab35902ec9980789 /packages/glpk/examples/simplex4.hs | |
parent | 5587a094afa3e24698cd38301c805e6ee5876c73 (diff) |
error checking for simplex
Diffstat (limited to 'packages/glpk/examples/simplex4.hs')
-rw-r--r-- | packages/glpk/examples/simplex4.hs | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/packages/glpk/examples/simplex4.hs b/packages/glpk/examples/simplex4.hs index 8496f6d..dd65002 100644 --- a/packages/glpk/examples/simplex4.hs +++ b/packages/glpk/examples/simplex4.hs | |||
@@ -7,12 +7,12 @@ prob = Minimize [0.03, 0.08, 0.17, 0.12, 0.15, 0.21, 0.38] | |||
7 | 7 | ||
8 | constr = Sparse | 8 | constr = Sparse |
9 | [ [1#1,1#2,1#3,1#4,1#5,1#6,1#7] :==: 2000 | 9 | [ [1#1,1#2,1#3,1#4,1#5,1#6,1#7] :==: 2000 |
10 | , [0.15#1, 0.04#2, 0.02#3, 0.04#4, 0.2#5,0.01#6, 0.03#7] :<: 60 | 10 | , [0.15#1, 0.04#2, 0.02#3, 0.04#4, 0.2#5,0.01#6, 0.03#7] :<: 60 |
11 | , [0.03#1, 0.05#2, 0.08#3, 0.02#4, 0.06#5, 0.01#6] :<: 100 | 11 | , [0.03#1, 0.05#2, 0.08#3, 0.02#4, 0.06#5, 0.01#6] :<: 100 |
12 | , [0.02#1, 0.04#2, 0.01#3, 0.02#4, 0.02#5] :<: 40 | 12 | , [0.02#1, 0.04#2, 0.01#3, 0.02#4, 0.02#5] :<: 40 |
13 | , [0.02#1, 0.03#2, 0.01#5] :<: 30 | 13 | , [0.02#1, 0.03#2, 0.01#5] :<: 30 |
14 | , [0.7#1, 0.75#2, 0.8#3, 0.75#4, 0.8#5, 0.97#6] :>: 1500 | 14 | , [0.7#1, 0.75#2, 0.8#3, 0.75#4, 0.8#5, 0.97#6] :>: 1500 |
15 | , [0.02#1, 0.06#2, 0.08#3, 0.12#4, 0.02#5, 0.01#6, 0.97#7] :&: (250,300) | 15 | , [0.02#1, 0.06#2, 0.08#3, 0.12#4, 0.02#5, 0.01#6, 0.97#7] :&: (250,300) |
16 | ] | 16 | ] |
17 | 17 | ||
18 | bounds = [ 1 :&: (0,200) | 18 | bounds = [ 1 :&: (0,200) |