ࡱ> Root Entry*0_^QWcGContents Root Entry*0_^3jGContents  {\rtf1\ansi\ansicpg1252\deff0\deflang1046{\fonttbl{\f0\fnil\fcharset0 Courier New;}} {\colortbl ;\red0\green0\blue255;\red0\green0\blue0;\red0\green175\blue0;} \viewkind4\uc1\pard\cf1\f0\fs36 sets\cf2 : \par Pilhas / \cf1 @ole\cf2 ('Mistura.xls','Pilhas') /: y, \cf3 ! y=1 se for retomado minerio;\cf2 \par x, \cf3 ! qtidade minerio pilha i;\cf2 \par Qu, \cf3 ! massa da pilha i;\cf2 \par {\rtf1\ansi\ansicpg1252\deff0\deflang1046{\fonttbl{\f0\fnil\fcharset0 Courier New;}} {\colortbl ;\red0\green0\blue255;\red0\green0\blue0;\red0\green175\blue0;} \viewkind4\uc1\pard\cf1\f0\fs36 sets\cf2 : \par Pilhas / \cf1 @ole\cf2 ('Mistura.xls','Pilhas') /: y, \cf3 ! y=1 se for retomado minerio;\cf2 \par x, \cf3 ! qtidade minerio pilha i;\cf2 \par Qu, \cf3 ! massa da pilha i;\cf2 \par desconsiderar, \cf3 ! desconsiderar =1 se a pilha n\'e3o for usada;\cf2 \par retomar, \par dppilha, \par dnpilha; \par Parametros /\cf1 @ole\cf2 ('Mistura.xls','Parametros')/: extrapolar, \par tu, \par tl, \par tr, \par dpe, \par dne, \par dnm, \par dpm, \par wne, \par wpe, \par wnm, \par wpm; \par Matriz(Pilhas, Parametros): t; \par \cf1 endsets\cf2 \par \par \cf1 data\cf2 : \par extrapolar = \cf1 @ole\cf2 ('Mistura.xls','extrapolar'); \par retmin = \cf1 @ole\cf2 ('Mistura.xls','retmin'); \par retomar = \cf1 @ole\cf2 ('Mistura.xls','retomar'); \par desconsiderar = \cf1 @ole\cf2 ('Mistura.xls','desconsiderar'); \par Qu = \cf1 @ole\cf2 ('Mistura.xls','Qu'); \par tu = \cf1 @ole\cf2 ('Mistura.xls','tu'); \par tl = \cf1 @ole\cf2 ('Mistura.xls','tl'); \par tr = \cf1 @ole\cf2 ('Mistura.xls','tr'); \par wnm = \cf1 @ole\cf2 ('Mistura.xls','wnm'); \par wpm = \cf1 @ole\cf2 ('Mistura.xls','wnm'); \par wne = \cf1 @ole\cf2 ('Mistura.xls','wne'); \par wpe = \cf1 @ole\cf2 ('Mistura.xls','wpe'); \par p = \cf1 @ole\cf2 ('Mistura.xls','p'); \par t = \cf1 @ole\cf2 ('Mistura.xls','t'); \par \cf1 enddata\cf2 \par \par [fo] \cf1 min\cf2 = \cf1 @sum\cf2 (Parametros(j): \par wne(j)*dne(j) + wpe(j)*dpe(j) + \par wnm(j)*dnm(j) + wpm(j)*dpm(j) ); \par \par \cf1 @sum\cf2 (Pilhas(i): x(i)) = p; \par \par \cf1 @for\cf2 (Pilhas(i): \par x(i) <= Qu(i)); \par \par \cf1 @for\cf2 (Parametros(j): \par \cf1 @sum\cf2 (Pilhas(i): ( t(i,j) - tu(j) ) * x(i)) - \par dpe(j) * extrapolar(j) <= 0); \par \par \cf1 @for\cf2 (Parametros(j): \par \cf1 @sum\cf2 (Pilhas(i): ( t(i,j) - tl(j) )*x(i)) + \par extrapolar(j)*dne(j) >= 0); \par \par \cf1 @for\cf2 (Parametros(j): \par \cf1 @sum\cf2 (Pilhas(i): ( t(i,j) - tr(j) )*x(i)) \par - dpm(j) + dnm(j) = 0); \par \par \cf1 @for\cf2 (Pilhas(i) | Qu(i) #ne# 0: \par y(i) >= x(i) / Qu(i)); \par \par \cf1 @for\cf2 (Pilhas(i): \par x(i) >= retmin * y(i)); \par \par \cf1 @for\cf2 (Pilhas(i): \par x(i) + dnpilha(i) = Qu(i)*y(i)); \par \par \cf1 @for\cf2 (Pilhas(i): \par \cf1 @bin\cf2 (y(i))); \par \par \par \par \par \cf1 data\cf2 : \par \cf1 @ole\cf2 ('Mistura.xls','x') = x; \par \cf1 @ole\cf2 ('{\rtf1\ansi\ansicpg1252\deff0\deflang1046{\fonttbl{\f0\fnil\fcharset0 Courier New;}} {\colortbl ;\red0\green0\blue255;\red0\green0\blue0;\red0\green175\blue0;} \viewkind4\uc1\pard\cf1\f0\fs36 sets\cf2 : \par Pilhas / \cf1 @ole\cf2 ('Mistura.xls','Pilhas') /: y, \cf3 ! y=1 se for retomado minerio;\cf2 \par x, \cf3 ! qtidade minerio pilha i;\cf2 \par Qu, \cf3 ! massa da pilha i;\cf2 \par desconsiderar, \cf3 ! desconsiderar =1 se a pilha n\'e3o for usada;\cf2 \par retomar, \par dppilha, \par z, \cf3 !;\cf2 \par dnpilha; \par Parametros /\cf1 @ole\cf2 ('Mistura.xls','Parametros')/: extrapolar, \par tu, \par tl, \par tr, \par dpe, \par dne, \par dnm, \par dpm, \par wne, \par wpe, \par wnm, \par wpm; \par Matriz(Pilhas, Parametros): t; \par \cf1 endsets\cf2 \par \par \cf1 data\cf2 : \par extrapolar = \cf1 @ole\cf2 ('Mistura.xls','extrapolar'); \par retmin = \cf1 @ole\cf2 ('Mistura.xls','retmin'); \par retomar = \cf1 @ole\cf2 ('Mistura.xls','retomar'); \par desconsiderar = \cf1 @ole\cf2 ('Mistura.xls','desconsiderar'); \par Qu = \cf1 @ole\cf2 ('Mistura.xls','Qu'); \par tu = \cf1 @ole\cf2 ('Mistura.xls','tu'); \par tl = \cf1 @ole\cf2 ('Mistura.xls','tl'); \par tr = \cf1 @ole\cf2 ('Mistura.xls','tr'); \par wnm = \cf1 @ole\cf2 ('Mistura.xls','wnm'); \par wpm = \cf1 @ole\cf2 ('Mistura.xls','wnm'); \par wne = \cf1 @ole\cf2 ('Mistura.xls','wne'); \par wpe = \cf1 @ole\cf2 ('Mistura.xls','wpe'); \par p = \cf1 @ole\cf2 ('Mistura.xls','p'); \par t = \cf1 @ole\cf2 ('Mistura.xls','t'); \par \cf1 enddata\cf2 \par \par [fo] \cf1 min\cf2 = \cf1 @sum\cf2 (Parametros(j): \par wne(j)*dne(j) + wpe(j)*dpe(j) + \par wnm(j)*dnm(j) + wpm(j)*dpm(j) ) \par + \par \cf1 @sum\cf2 (Pilhas(i): 1000000*dnpilha(i)); \par \par \par \cf1 @sum\cf2 (Pilhas(i): x(i)) = p; \par \par \cf1 @for\cf2 (Pilhas(i): \par x(i) <= Qu(i)); \par \par \cf1 @for\cf2 (Parametros(j): \par \cf1 @sum\cf2 (Pilhas(i): ( t(i,j) - tu(j) ) * x(i)) - \par dpe(j) * extrapolar(j) <= 0); \par \par \cf1 @for\cf2 (Parametros(j): \par \cf1 @sum\cf2 (Pilhas(i): ( t(i,j) - tl(j) )*x(i)) + \par dne(j) >= 0); \par \par \cf1 @for\cf2 (Parametros(j): \par \cf1 @sum\cf2 (Pilhas(i): ( t(i,j) - tr(j) )*x(i)) \par - dpm(j) + dnm(j) = 0); \par \par \cf1 @for\cf2 (Pilhas(i) | Qu(i) #ne# 0: \par y(i) >= x(i) / Qu(i)); \par \par \cf1 @for\cf2 (Pilhas(i): \par x(i) >= retmin * y(i)); \par \par \cf1 @for\cf2 (Pilhas(i): \par x(i) + dnpilha(i) = Qu(i)*y(i)); \par \par \cf1 @for\cf2 (Pilhas(i): \par \cf1 @bin\cf2 (y(i))); \par \par \cf1 @for\cf2 (Pilhas(i): \par \cf1 @gin\cf2 (z(i))); \par \par \cf1 @for\cf2 (Pilhas(i): \par z(i) = x(i) / 100); \par \par \cf1 @for\cf2 (Pilhas(i) | retomar(i) #eq# 1: \par x(i) = Qu(i) - dnpilha(i) ); \par \par \cf1 @for\cf2 (Pilhas(i) | desconsiderar(i) #eq# 1: \par x(i) = 0); \par \par \cf1 data\cf2 : \par \cf1 @ole\cf2 ('Mistura.xls','x') = x; \par \cf1 @ole\cf2 ('Mistura.xls','dne') = dne; \par \cf1 @ole\cf2 ('Mistura.xls','dpe'Mistura.xls','dne') = dne; \par \cf1 @ole\cf2 ('Mistura.xls','dpe') = dpe; \par \cf1 @ole\cf2 ('Mistura.xls','fo') = fo; \par \cf1 @ole\cf2 ('Mistura.xls','dnm') = dnm; \par \cf1 @ole\cf2 ('Mistura.xls','dpm') = dpm; \par \cf1 enddata\cf2 \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \fs32 \par } pilha i;\cf2 \par ) = dpe; \par \cf1 @ole\cf2 ('Mistura.xls','fo') = fo; \par \cf1 @ole\cf2 ('Mistura.xls','dnm') = dnm; \par \cf1 @ole\cf2 ('Mistura.xls','dpm') = dpm; \par \cf1 enddata\cf2 \par \fs32 \par } par \par \par \par \par \par \fs32 \par } \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \par \fs32 \par } ar \par \par \par \fs32 \par } par \par \fs32 \par }