Advertisement
Guest User

Untitled

a guest
Jul 29th, 2015
200
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.34 KB | None | 0 0
  1. inequalities = {Y[5], Y[7], Y[9], Y[10],
  2. 155 + 27 Y[5] - 13 Y[7] - 65 Y[9] - 13 Y[10], 162 - 27 Y[5],
  3. 45 - 9 Y[7] + 43 Y[9] + 12 Y[10], 374 + 105 Y[9] - 51 Y[10],
  4. 1288 + 23 Y[7] - 759 Y[9] + 3 Y[10], 1 + Y[7] - Y[9] + Y[10],
  5. 3 + 3 Y[7] + 4 Y[9] - 2 Y[10]}
  6.  
  7. ToRules[
  8. Reduce[# >= 0 & /@ inequalities, Variables[inequalities], Integers]]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement