急求高手修改下LINGO程序

急需一个lingo程序的修改，那位高手帮忙改一下吧，不胜感激！
我的原程序也附在上面了，多谢多谢，万分感谢啦！
min u[a]
s.t.∑x(i,j,a)=1 1≤a≤90.（对j求和）
　 ∑x(i,j,a)=2 1≤a≤90.(对i求和）
u[a]≥(i-1)*10+0.5*∑(j-1)*x(i,j,a)+300 （这是对j求和）
x(i,j,a)=0,1 i=1...6, j=1...3, a=1...90.
x(i,j,a)≠x(i,j,b) a≠b, 1≤a,b≤90

model:
sets:
AC/1..90/:a,b;
IC/1..6/:i;
JC/1..3/:j;
link(IC,JC,AC):xija;
UC(AC):u;
endsets

min=@min(AC(a): u(a));

@for(AC(a): @for(IC(i): @sum(JC(j): xija(i,j,a))= 1);
@for(JC(j): @sum(IC(i): xija(i,j,a))= 2));
@for(AC(a): u(a)=@max(IC(i): ((i-1)*10+0.5*(@sum(JC(j): (j*xija(i,j,a))))*0.5/0.5-3+300)));

@for(link(IC,JC,AC): @BIN(xija));