{VERSION 3 0 "IBM INTEL LINUX" "3.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 } {CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 }{PSTYLE " Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 "" 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple O utput" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {XPPEDIT 18 0 "" "6#%#%?G" }{MPLTEXT 1 0 14 "with(simplex);" }}{PARA 7 "" 1 "" {TEXT -1 33 "Warning, new defi nition for basis" }}{PARA 7 "" 1 "" {TEXT -1 38 "Warning, new definiti on for convexhull" }}{PARA 7 "" 1 "" {TEXT -1 33 "Warning, new definit ion for cterm" }}{PARA 7 "" 1 "" {TEXT -1 35 "Warning, new definition \+ for display" }}{PARA 7 "" 1 "" {TEXT -1 32 "Warning, new definition fo r dual" }}{PARA 7 "" 1 "" {TEXT -1 36 "Warning, new definition for fea sible" }}{PARA 7 "" 1 "" {TEXT -1 36 "Warning, new definition for maxi mize" }}{PARA 7 "" 1 "" {TEXT -1 36 "Warning, new definition for pivot var" }}{PARA 7 "" 1 "" {TEXT -1 33 "Warning, new definition for ratio " }}{PARA 7 "" 1 "" {TEXT -1 33 "Warning, new definition for setup" }} {PARA 12 "" 1 "" {XPPMATH 20 "6#71%&basisG%+convexhullG%&ctermG%,defin e_zeroG%(displayG%%dualG%)feasibleG%)maximizeG%)minimizeG%&pivotG%)piv oteqnG%)pivotvarG%&ratioG%&setupG%,standardizeG" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 59 "Constraints:=\{x1<=1,20*x1+x2 <=100,200*x1+20* x2+x3<=10000\};" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%,ConstraintsG<%1% #x1G\"\"\"1,&F'\"#?%#x2GF(\"$+\"1,(F'\"$+#F,F+%#x3GF(\"&++\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "maximize(100*x1+10*x2+x3,Con straints,NONNEGATIVE);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#<%/%#x1G\"\" !/%#x2GF&/%#x3G\"&++\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "m inimize(10*x2+x3,Constraints,NONNEGATIVE);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#<%/%#x1G\"\"!/%#x2GF&/%#x3GF&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "help(setup);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "C:=setup(Constraints);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"CG<%/%%_SL1G,&\"\"\"F)%#x1G!\"\"/%%_SL2G,(\"$+\"F)F*!#?%#x2G F+/%%_SL3G,*\"&++\"F)F*!$+#F1F0%#x3GF+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "C:=C union \{z=100*x1+10*x2+x3\};" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%\"CG<&/%%_SL1G,&\"\"\"F)%#x1G!\"\"/%%_SL2G,(\"$+\"F )F*!#?%#x2GF+/%%_SL3G,*\"&++\"F)F*!$+#F1F0%#x3GF+/%\"zG,(F*F/F1\"#5F7F )" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "C1:=pivot(C,x1,[op(1,C )]);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#C1G<&/%#x1G,&%%_SL1G!\"\"\" \"\"F+/%%_SL2G,(\"#!)F+F)\"#?%#x2GF*/%%_SL3G,*\"%+)*F+F)\"$+#F1!#?%#x3 GF*/%\"zG,*F)!$+\"\"$+\"F+F1\"#5F8F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "C2:=pivot(C1,x2,[op(2,C1)]);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#C2G<&/%#x2G,(%%_SL2G!\"\"\"#!)\"\"\"%%_SL1G\"#?/%%_S L3G,*\"%+#)F,F-!$+#F)F.%#x3GF*/%\"zG,*F-\"$+\"\"$+*F,F)!#5F4F,/%#x1G,& F-F*F,F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "help(dual);" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "11" 0 } {VIEWOPTS 1 1 0 1 1 1803 }