LINGO PROGRAMMATION LINÉAIRE FORMULATION

LINGO PROGRAMMATION LINÉAIRE FORMULATION - Divers - Programmation

Marsh Posté le 08-06-2015 à 22:23:34    

Bonjour
Prière j`arrive pas à détecter l`erreur du programme linéaire suivant formulé sur LINGO: Le logiciel affiche à chaque fois une erreur au niveau des contraintes. merci infiniment  
 
la formulation Lingo du problème est la suivante, prière vous pouvez la copier sur le logiciel Lingo(À TELECHARGER DE http://www.lindo.com/index.php?opt [...] emid=20)et le tester.  
 
code lingo:
MODEL:
 
! Capacitated Plant Location Problem;
 
SETS:
 
   PLANTS: FPCOST, CAPP, OPENP;
 
     DSC:FDCOST,CAPD,OPEND;
 
   CUSTOMERS: DEM;
 
   ARCPD( PLANTS, DSC)  : COSTPD, VOLPD;
 
     ARCDC( DSC, CUSTOMERS): COSTDC, VOLDC;
 
 
 
 
ENDSETS
 
 
 
DATA:
 
 ! The plant, their fixed costs
 
   and capacity;
 
   PLANTS, FPCOST, CAPP =
 
     P1      91    39
 
     P2      70    35
 
     P3      24    31;
 
! The DSC, their fixed costs and capacity;
 
   DSC, FDCOST,   CAPD =
 
     D1      45    32
 
     D2      50    30
 
     D3      30    25
 
     D4      40    50;
 
! Customers and their demands;
 
   CUSTOMERS, DEM =    
 
     C1      15
 
     C2      19
 
     C3      22
 
     C4      13
 
         C4      15;
 
 ! The plant to cust cost/unit shipment matrix;
 
   COSTPD = 6  2  6  
 
            4  9  5  
 
            8  8  1  
 
            7  5  4;
 
! The DSC to cust cost/unit shipment matrix;
 
   COSTDC = 6  2  7 8
 
            4  9  3 6
 
            8  8  5 3
 
            6  2  7 6
 
            9  8  5 7;
 
ENDDATA
 
 
 
! The objective;
 
   [TTL_COST] MIN = @SUM( ARCPD(I,J): COSTPD(I,J) * VOLPD(I,J) +  @SUM( ARCDC(J,K): COSTDC(J,K) * VOLDC(J,K)  
 
    + @SUM( PLANTS: FPCOST * OPENP)+ @SUM( DSC: FDCOST * OPEND));
 
 
 
! The demand constraints;
 
   @FOR( CUSTOMERS( J):@SUM( DSC(J): VOLPD( J, K)) = DEM( K) );
 
 
 
! The PLANT CAPACITY;
 
   @FOR( PLANTS( I): @SUM( DSC( J): VOLPD( I, J)) <=  
 
     CAPP( I) * OPENP( I));
 
 ! The DSC CAPACITY;
 
   @FOR( DSC( I): @SUM( CUSTOMERS( K): VOLDC( J, K)) <=  
 
     CAPD( J) * OPEND( J));
 
! The FLOW BALANCE;
 
           @FOR( DSC(J):@SUM(PLANT(I):VOLPD(I,J))= @SUM(CUSTOMERS(I):VOLDC(J,K)));
 
 
 
! Make OPEN binary(0/1);
 
   @FOR( PLANTS: @BIN( OPENP));@FOR( DSC: @BIN( OPEND));
 
END

Reply

Marsh Posté le 08-06-2015 à 22:23:34   

Reply

Marsh Posté le 15-06-2015 à 09:59:04    

- TITRE EN MAJUSCULES http://forum.hardware.fr/hfr/Progr [...] 4544_1.htm [:hurle]  
- Balises code pour rendre le truc lisible stp


---------------
Topic .Net - C# @ Prog
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed