Código de error de Lingo 163, por favor ayúdenme, gracias

!MODELO:

Título Optimización de la Producción de Electricidad;

conjuntos:

tiempo/1..7/:t,tp ;

!t=tiempo,tp=potencia total;

máquina/1..4/:b,e,s,minp,maxp,mq;

!b=producción básica,e=producción perimetral,s=capital inicial,minp=minpower,maxp=maxpower,mp=maxquantity;

link(time,machine):q,p;

!q=cantidad,p=potencia;

conjuntos finales

datos:

t=6,3,3,2,4 ,4,2;

tp=12000,32000,25000,36000,25000,30000,18000;

b=2250,1800,3750,4800;

e=2.7,2.2,1.8,3.8;

s=5000,1600,2400,1200;

minp=750,1000,1200,1800;

maxp=1750,1500,2000,3500;

mq=10,4,8,3;

enddata

!objeción; p>

min=@sum(enlace(i,j):q(i,j)*b(j)*t(i)+e(j)*t(i)*(p(i ,j )-q(i,j)*minp(j))+q(1,j)*b(j)+@if(i#ge#2,0.5*b(j)*((q(i ,j )-q(i-1,j)+@abs(q(i,j)-q(i-1,j)))*s(j)),0));

@ for(enlace(i,j):q(i,j)<=mq(j));

@for(time(i):@sum(machine(j):p( i, j))>=tp(i));

@for(link(i,j):p(i,j)>=q(i,j)*minp(j)) ;

@for(enlace(i,j):p(i,j)<=q(i,j)*maxp(j));

@for(enlace (i ,j):@gin(q(i,j)));

!end