钢管下料问题2（剩余材料最少）lingo求解

大家好，我是小鸭酱，博客地址为：http://www.cnblogs.com/xiaoyajiang

!钢管下料问题2（剩余材料最少）

题目：

钢管原料   每根19m

客户需求   4m   50根

5m   10根

6m   20根

8m   15根

如何下料最节省？;

model :

sets :

H/1..3/ : x , y ;

L/1..4/ : m , g ;

link(H,L): r ;

endsets

data :

m = 4 5 6 8 ;

g = 50 10 20 15 ;

enddata

@for(H(i) : y(i) = 19 - @sum( L(j) : r(i,j) *m(j)) ) ;

min = @sum( H(i) : y*x ) ;

@for( L(j) : @sum( H(i) : x(i) * r( i , j ) ) >= g(j) ) ;

@for( H(i) : @sum( L(j) : m(j) * r( i , j ) ) >= 16 ) ;

@for( H(i) : @sum( L(j) : m(j) * r( i , j ) ) <= 19 ) ;

@sum( H(i) : x ) <= 31 ;

@sum( H(i) : x ) >= 26 ;

@for( H(i) : @gin( x(i) ) );

@for(link : @gin(r)) ;

end