2° parte parcial- 2 de octubre...punto 8.3-4

$title  transporte

Sets

         i nado /dorso, pecho, mariposa, libre/

         j nadador /carlos, cristina, david, antonio, jose/;

Parameters

         A(i) tipo de nado

         /       dorso 1

                 pecho 1

                 mariposa 1

                 libre 1

                                  /

         B(j) demanda de nadador

         /       carlos 1

                 cristina 1

                 david 1

                 antonio 1

                 jose 1

                                     /

Table G(i,j) ganancia por unidad distribuida entre i y j

         carlos  cristina david   antonio jose

dorso    37.7    32.9     33.8    37      35.4

pecho    43.3    33.1     42.2    34.7    46.8

mariposa 33.3    28.5     38.9    30.4    33.6

libre    29.2    26.4     24.6    28.5    31.1

                                                          ;

Variables

         x(i,j)  unidades transportadas entre i y j

         GT      ganancia por unidad distribuida          ;

positive variable x;

Equations

         ganancia     ganancia total del transporte

         capacidad(i) capacidad maxima de cada planta (i)

         demanda(j)   demanda maxima de cada cliente (j)  ;

         ganancia ..        GT =e= sum((i,j), G(i,j)*x(i,j));

         capacidad (i) .. sum(j, x(i,j)) =L= A(i);

         demanda (j) .. sum(i, x(i,j)*1) =G= B(j) ;

model transporte / ganancia, capacidad, demanda/

solve transporte  using lp maximizing GT

Display x.l, x.m ;