Konkretisierung mit:
I:{w1,w2}, J:{s1,s2,s3], K:{g1,g2}
\(D \, := \, \left(\begin{array}{rr}6.1&7.1\\5.6&5.4\\5.1&3.6\\\end{array}\right), C \, := \, \left(\begin{array}{rrr}7&11&8\\9&6&10\\\end{array}\right), S \, := \, \left(\begin{array}{rrr}20\\21\\\end{array}\right)\)
minimize_lp(
(6.1*w1g1s1)+(5.6*w1g1s2)+(5.1*w1g1s3)+(6.1*w1g2s1)+(5.6*w1g2s2)+(5.1*w1g2s3)+
(7.1*w2g1s1)+(5.4*w2g1s2)+(3.6*w2g1s3)+(7.1*w2g2s1)+(5.4*w2g2s2)+(3.6*w2g2s3), [
w1g1s1+w2g1s1<=7,
w1g2s1+w2g2s1<=9,
w1g1s2+w2g1s2<=11,
w1g2s2+w2g2s2<=6,
w1g1s3+w2g1s3<=8,
w1g2s3+w2g2s3<=10,
w1g1s1+w2g1s1+w1g1s2+w2g1s2+w1g1s3+w2g1s3=20,
w1g2s1+w2g2s1+w1g2s2+w2g2s2+w1g2s3+w2g2s3=21
]), nonegative_lp=true;
[193.2,[
w2g2s3=10,w1g2s3=0,w2g1s3=8,w1g1s3=0,
w2g2s2=6,w1g2s2=0,w2g1s2=11,w1g1s2=0,
w2g2s1=0,w1g2s1=5,w2g1s1=0,w1g1s1=1]]
Scheint zu funktionieren....