╨╧рб▒с>■  ■                                                                                                                                                                                                                                                                                                                                                                                                                                                   Root Entry        *0_Ъю╧╗Є└Ё^аяP╒╛P╩@Contents                                     ■   ¤                   ■         ■                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       Root Entry        *0_Ъю╧╗Є└Ё^ mЕ╒╛P╩@Contents                                             ■   ¤   ■                    ■                                                                                                                                                                                                                                                                                                                                                                                                                                                                                    ■                                                                                                                                                                                                                                                                                                                                                                                                                                               ьЛ{\rtf1\ansi\ansicpg1252\deff0\deflang1046{\fonttbl{\f0\fnil\fcharset0 Courier New;}} {\colortbl ;\red0\green0\blue255;\red0\green0\blue0;} \viewkind4\uc1\pard\cf1\f0\fs32 sets\cf2 : \par Facilidades/\cf1 @ole\cf2 ('Medianas.xls','Facilidades')/:y; \par \pard Locais/\cf1 @ole\cf2 ('Medianas.xls','Locais')/:; \par Matriz(Facilidades, Locais): d, x; \par \pard\cf1 endsets\cf2 \par \par \cf1 data\cf2 : \par \pard d = \cf1 @ole\cf2 ('Medianas.xls','distancias'); \par p = \cf1 @ole\cf2 ( ■                                                                                                                                                                                                                                                                                                                                                                                                                                               ьЛ{\rtf1\ansi\ansicpg1252\deff0\deflang1046{\fonttbl{\f0\fnil\fcharset0 Courier New;}} {\colortbl ;\red0\green0\blue255;\red0\green0\blue0;} \viewkind4\uc1\pard\cf1\f0\fs32 sets\cf2 : \par Facilidades/\cf1 @ole\cf2 ('Medianas.xls','Facilidades')/:y; \par \pard Locais/\cf1 @ole\cf2 ('Medianas.xls','Locais')/:; \par Matriz(Facilidades, Locais): d, x; \par \pard\cf1 endsets\cf2 \par \par \cf1 data\cf2 : \par \pard d = \cf1 @ole\cf2 ('Medianas.xls','distancias'); \par p = \cf1 @ole\cf2 ('Medianas.xls','p'); \par \pard\cf1 enddata\cf2 \par \par [fo] \cf1 min\cf2 = \cf1 @sum\cf2 (Facilidades(i): \par \cf1 @sum\cf2 (Locais(j): d(i,j)*x(i,j))); \par \par \cf1 @for\cf2 (Locais(j): \par \cf1 @sum\cf2 (Facilidades(i): x(i,j)) = 1); \par \par \cf1 @sum\cf2 (Facilidades(i): y(i)) = p; \par \par \cf1 @for\cf2 (Facilidades(i): \par \cf1 @for\cf2 (Locais(j): x(i,j) <= y(i))); \par \par \cf1 @for\cf2 (Facilidades(i): \par \cf1 @bin\cf2 (y(i)); \par \cf1 @'Medianas.xls','p'); \par \pard\cf1 enddata\cf2 \par \par [fo] \cf1 min\cf2 = \cf1 @sum\cf2 (Facilidades(i): \par \cf1 @sum\cf2 (Locais(j): d(i,j)*x(i,j))); \par \par \cf1 @for\cf2 (Locais(j): \par \cf1 @sum\cf2 (Facilidades(i): x(i,j)) = 1); \par \par \cf1 @sum\cf2 (Facilidades(i): y(i)) = p; \par \par \cf1 @for\cf2 (Facilidades(i): \par \cf1 @for\cf2 (Locais(j): x(i,j) <= y(i))); \par \par \cf1 @for\cf2 (Facilidades(i): \par \cf1 @bin\cf2 (y(i)); \par \cf1 @for\cf2 (Locais(j): \cf1 @bin\cf2 (x(i,j)))); \par \par \cf1 data\cf2 : \par \cf1 @ole\cf2 ('Medianas.xls','x') = x; \par \pard \cf1 @ole\cf2 ('Medianas.xls','y') = y; \par \cf1 @ole\cf2 ('Medianas.xls','fo') = fo; \par \pard\cf1 enddata\cf2 \par } rd Locais/\cf1 @ole\cf2 ('Medianas.xls','Locais')/:; \par Matriz(Facilidades, Locais): d, x; \par \pard\cf1 endsets\cf2 \par \par \cf1 data\cf2 : \par \pard d = \cf1 @ole\cf2 ('Medianas.xls','distancias'); \par p = \cf1 @ole\cf2 (for\cf2 (Locais(j): \cf1 @bin\cf2 (x(i,j)))); \par \par \cf1 data\cf2 : \par \cf1 @ole\cf2 ('Medianas.xls','x') = x; \par \pard \cf1 @ole\cf2 ('Medianas.xls','y') = y; \par \cf1 @ole\cf2 ('Medianas.xls','fo') = fo; \par \pard\cf1 enddata\cf2 \par } rd Locais/\cf1 @ole\cf2 ('Medianas.xls','Locais')/:; \par Matriz(Facilidades, Locais): d, x; \par \pard\cf1 endsets\cf2 \par \par \cf1 data\cf2 : \par \pard d = \cf1 @ole\cf2 ('Medianas.xls','distancias'); \par p = \cf1 @ole\cf2 (