配色问题lingo实现

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

 

!调配颜色

要依次调配红、兰、白、黑、黄五种颜色

   红  兰  白  黑  黄

红  0  6  18  4   8

兰  7  0  17  3   7

白  4  5   0  4   5

黑20  19 24  0  22

黄  8  8  16  6  0          ;

model :

sets :

A : NU;

link(A,A) : strategy , paint ;

endsets

data :

NU = 0 0 0 0 0 ;

paint = 100 6 18 4 8

        7 100 17 3 7

        4 5 100 4 5

        20 19 24 100 22

        8 8 16 6 100;

enddata

min = @sum( link :strategy*paint ) ;

@for(A(i) : @sum(A(j) :strategy(i,j)) <= 1 ) ;

@for(A(j) : @sum(A(i) :strategy(i,j)) <= 1 ) ;

@sum(link : strategy ) = 4 ;

@for(link : @bin(strategy) );

end