/* ------------------------------------------------------------------*/ /* Formulação Tchebichev - minimização do máximo desvio (DMAX) */ /* (com um "grande" peso para DMAX, se comparado aos pesos de F e S) */ /* ------------------------------------------------------------------*/ /* Função objetivo */ Min: F + S + 1000 DMAX; /* sujeito a: */ /* Define endógena para VTP */ VAL: 9296.61 U1C1P66 + 9229.09 U1C1P67 + 9042.78 U1C1P68 + 9322.90 U1C1P76 + 9267.23 U1C1P77 + 9068.17 U1C1P78 + 9254.70 U1C1P86 + 9199.29 U1C1P87 + 9008.16 U1C1P88 + 9798.41 U2C1P66 + 9692.53 U2C1P67 + 9420.77 U2C1P68 + 9841.57 U2C1P76 + 9722.94 U2C1P77 + 9454.24 U2C1P78 + 9776.64 U2C1P86 + 9664.42 U2C1P87 + 9404.26 U2C1P88 + 6121.57 U3C1P66 + 6102.85 U3C1P67 + 6013.65 U3C1P68 + 6151.44 U3C1P76 + 6133.31 U3C1P77 + 5929.91 U3C1P78 + 5932.28 U3C1P86 + 5927.24 U3C1P87 + 5877.21 U3C1P88 + 4202.39 U4C1P66 + 4253.65 U4C1P67 + 4248.71 U4C1P68 + 4297.25 U4C1P76 + 4342.53 U4C1P77 + 4336.44 U4C1P78 + 4313.26 U4C1P86 + 4354.55 U4C1P87 + 4348.75 U4C1P88 + 5899.25 U5C1P66 + 5853.77 U5C1P67 + 5714.45 U5C1P68 + 5890.00 U5C1P76 + 5846.37 U5C1P77 + 5710.43 U5C1P78 + 5820.09 U5C1P86 + 5782.18 U5C1P87 + 5653.15 U5C1P88 + 5482.86 U6C1P66 + 5510.78 U6C1P67 + 5388.40 U6C1P68 + 5591.81 U6C1P76 + 5579.43 U6C1P77 + 5454.9 U6C1P78 + 5597.56 U6C1P86 + 5585.04 U6C1P87 + 5462.32 U6C1P88 - VTP = 0; /* Define desvios [falta (F) e sobra (S)] com relação ao VTP */ DVTP: VTP + F - S = 3580000; /* Restrições de área */ U1C1: U1C1P66 + U1C1P67 + U1C1P68 + U1C1P76 + U1C1P77 + U1C1P78 + U1C1P86 + U1C1P87 + U1C1P88 <= 147.90; U2C1: U2C1P66 + U2C1P67 + U2C1P68 + U2C1P76 + U2C1P77 + U2C1P78 + U2C1P86 + U2C1P87 + U2C1P88 <= 72.23; U3C1: U3C1P66 + U3C1P67 + U3C1P68 + U3C1P76 + U3C1P77 + U3C1P78 + U3C1P86 + U3C1P87 + U3C1P88 <= 54.11; U4C1: U4C1P66 + U4C1P67 + U4C1P68 + U4C1P76 + U4C1P77 + U4C1P78 + U4C1P86 + U4C1P87 + U4C1P88 <= 77.70; U5C1: U5C1P66 + U5C1P67 + U5C1P68 + U5C1P76 + U5C1P77 + U5C1P78 + U5C1P86 + U5C1P87 + U5C1P88 <= 71.96; U6C1: U6C1P66 + U6C1P67 + U6C1P68 + U6C1P76 + U6C1P77 + U6C1P78 + U6C1P86 + U6C1P87 + U6C1P88 <= 71.97; /* Define endógenas de produção */ Ano01: 324 U1C1P66 + 324 U1C1P76 + 324 U1C1P86 - P01 = 0; Ano02: 378 U1C1P67 + 378 U1C1P77 + 378 U1C1P87 + 366 U2C1P66 + 366 U2C1P76 + 366 U2C1P86 + 179 U4C1P66 + 179 U4C1P67 + 179 U4C1P68 - P02 = 0; Ano03: 425 U1C1P68 + 425 U1C1P78 + 425 U1C1P88 + 423 U2C1P67 + 423 U2C1P77 + 423 U2C1P87 + 214 U4C1P76 + 214 U4C1P77 + 214 U4C1P78 + 235 U6C1P66 + 235 U6C1P76 + 235 U6C1P86 - P03 = 0; Ano04: 471 U2C1P68 + 471 U2C1P78 + 471 U2C1P88 + 246 U4C1P86 + 246 U4C1P87 + 246 U4C1P88 + 253 U5C1P66 + 253 U5C1P76 + 253 U5C1P86 + 274 U6C1P67 + 274 U6C1P77 + 274 U6C1P87 - P04 = 0; Ano05: 295 U5C1P67 + 295 U5C1P77 + 295 U5C1P87 + 306 U6C1P68 + 306 U6C1P78 + 306 U6C1P88 - P05 = 0; Ano06: 306 U3C1P66 + 306 U3C1P67 + 306 U3C1P68 + 331 U5C1P68 + 331 U5C1P78 + 331 U5C1P88 - P06 = 0; Ano07: 355 U1C1P66 + 362 U3C1P76 + 362 U3C1P77 + 362 U3C1P78 - P07 = 0; Ano08: 355 U1C1P67 + 422 U1C1P76 + 380 U2C1P66 + 410 U3C1P86 + 410 U3C1P87 + 410 U3C1P88 + 163 U4C1P66 - P08 = 0; Ano09: 355 U1C1P68 + 422 U1C1P77 + 479 U1C1P86 + 380 U2C1P67 + 455 U2C1P76 + 192 U4C1P67 + 163 U4C1P76 + 262 U6C1P66 - P09 = 0; Ano10: 422 U1C1P78 + 479 U1C1P87 + 380 U2C1P68 + 455 U2C1P77 + 520 U2C1P86 + 217 U4C1P68 + 192 U4C1P77 + 163 U4C1P86 + 287 U5C1P66 + 262 U6C1P67 + 319 U6C1P76 - P10 = 0; Ano11: 479 U1C1P88 + 455 U2C1P78 + 520 U2C1P87 + 217 U4C1P78 + 192 U4C1P87 + 287 U5C1P67 + 337 U5C1P76 + 262 U6C1P68 + 319 U6C1P77 + 369 U6C1P86 - P11 = 0; Ano12: 520 U2C1P88 + 293 U3C1P66 + 217 U4C1P88 + 287 U5C1P68 + 337 U5C1P77 + 379 U5C1P86 + 319 U6C1P78 + 369 U6C1P87 - P12 = 0; Ano13: 324 U1C1P66 + 338 U3C1P67 + 293 U3C1P76 + 337 U5C1P78 + 379 U5C1P87 + 369 U6C1P88 - P13 = 0; Ano14: 324 U1C1P76 + 366 U2C1P66 + 375 U3C1P68 + 338 U3C1P77 + 293 U3C1P86 + 179 U4C1P66 + 379 U5C1P88 - P14 = 0; Ano15: 378 U1C1P67 + 324 U1C1P86 + 366 U2C1P76 + 375 U3C1P78 + 338 U3C1P87 + 179 U4C1P67 + 235 U6C1P66 - P15 = 0; Ano16: 378 U1C1P77 + 423 U2C1P67 + 366 U2C1P86 + 375 U3C1P88 + 179 U4C1P68 + 214 U4C1P76 + 253 U5C1P66 + 235 U6C1P76 - P16 = 0; Ano17: 425 U1C1P68 + 378 U1C1P87 + 423 U2C1P77 + 214 U4C1P77 + 253 U5C1P76 + 274 U6C1P67 + 235 U6C1P86 - P17 = 0; Ano18: 425 U1C1P78 + 471 U2C1P68 + 423 U2C1P87 + 306 U3C1P66 + 214 U4C1P78 + 246 U4C1P86 + 295 U5C1P67 + 253 U5C1P86 + 274 U6C1P77 - P18 = 0; Ano19: 355 U1C1P66 + 425 U1C1P88 + 471 U2C1P78 + 306 U3C1P67 + 246 U4C1P87 + 295 U5C1P77 + 306 U6C1P68 + 274 U6C1P87 - P19 = 0; Ano20: 380 U2C1P66 + 471 U2C1P88 + 306 U3C1P68 + 362 U3C1P76 + 163 U4C1P66 + 246 U4C1P88 + 331 U5C1P68 + 295 U5C1P87 + 306 U6C1P78 - P20 = 0; Ano21: 355 U1C1P67 + 422 U1C1P76 + 362 U3C1P77 + 331 U5C1P78 + 262 U6C1P66 + 306 U6C1P88 - P21 = 0; /* Define desvios [sobra (F) e falta (S)] c/ relação à meta anual de produção */ Dsv01: P01 - SAno01 + FAno01 = 24000; Dsv02: P02 - SAno02 + FAno02 = 24000; Dsv03: P03 - SAno03 + FAno03 = 24000; Dsv04: P04 - SAno04 + FAno04 = 24000; Dsv05: P05 - SAno05 + FAno05 = 24000; Dsv06: P06 - SAno06 + FAno06 = 24000; Dsv07: P07 - SAno07 + FAno07 = 24000; Dsv08: P08 - SAno08 + FAno08 = 24000; Dsv09: P09 - SAno09 + FAno09 = 24000; Dsv10: P10 - SAno10 + FAno10 = 24000; Dsv11: P11 - SAno11 + FAno11 = 24000; Dsv12: P12 - SAno12 + FAno12 = 24000; Dsv13: P13 - SAno13 + FAno13 = 24000; Dsv14: P14 - SAno14 + FAno14 = 24000; Dsv15: P15 - SAno15 + FAno15 = 24000; Dsv16: P16 - SAno16 + FAno16 = 24000; Dsv17: P17 - SAno17 + FAno17 = 24000; Dsv18: P18 - SAno18 + FAno18 = 24000; Dsv19: P19 - SAno19 + FAno19 = 24000; Dsv20: P20 - SAno20 + FAno20 = 24000; Dsv21: P21 - SAno21 + FAno21 = 24000; /* Define Desvio Máximo (DMAX) */ Dsv01: SAno01 + FAno01 - DMAX <= 0; Dsv02: SAno02 + FAno02 - DMAX <= 0; Dsv03: SAno03 + FAno03 - DMAX <= 0; Dsv04: SAno04 + FAno04 - DMAX <= 0; Dsv05: SAno05 + FAno05 - DMAX <= 0; Dsv06: SAno06 + FAno06 - DMAX <= 0; Dsv07: SAno07 + FAno07 - DMAX <= 0; Dsv08: SAno08 + FAno08 - DMAX <= 0; Dsv09: SAno09 + FAno09 - DMAX <= 0; Dsv10: SAno10 + FAno10 - DMAX <= 0; Dsv11: SAno11 + FAno11 - DMAX <= 0; Dsv12: SAno12 + FAno12 - DMAX <= 0; Dsv13: SAno13 + FAno13 - DMAX <= 0; Dsv14: SAno14 + FAno14 - DMAX <= 0; Dsv15: SAno15 + FAno15 - DMAX <= 0; Dsv16: SAno16 + FAno16 - DMAX <= 0; Dsv17: SAno17 + FAno17 - DMAX <= 0; Dsv18: SAno18 + FAno18 - DMAX <= 0; Dsv19: SAno19 + FAno19 - DMAX <= 0; Dsv20: SAno20 + FAno20 - DMAX <= 0; Dsv21: SAno21 + FAno21 - DMAX <= 0;