$ontext Gams Model for the Pooling Problem Author: Mohit Tawarmalani model: rt2 $offtext $eolcom # # Set Declarations set comp /1*3/; set pro /1*3/; set qual /1*4/; set pool /1*2/; # components related parameters table compparams(comp,*) 1 2 3 1 0 60.9756 49.2 2 0 161.29 62 3 0 5 300 ; parameters cl(comp), cu(comp), cprice(comp); cl(comp) = compparams(comp,'1'); cu(comp) = compparams(comp,'2'); cprice(comp) = compparams(comp,'3'); table cqual(comp,qual) 1 2 3 4 1 0.82 3 99.2 90.5 2 0.62 0 87.9 83.5 3 0.75 0 114 98.7 ; # pool related parameters table poolparams(pool,*) 1 1 12.5 2 17.5 ; parameters psize(pool); psize(pool) = poolparams(pool,'1'); # product related parameters table prodparams(pro,*) 1 2 3 1 5 300 190 2 5 300 230 3 5 300 150 ; parameters prl(pro), pru(pro), pprice(pro); prl(pro) = prodparams(pro,'1'); pru(pro) = prodparams(pro,'2'); pprice(pro) = prodparams(pro,'3'); table pqlbd(pro, qual) 1 2 3 4 1 0.74 0 95 85 2 0.74 0 96 88 3 0.74 0 91 83.5 ; table pqubd(pro, qual) 1 2 3 4 1 0.79 3 114 98.7 2 0.79 0.9 114 98.7 3 0.79 3 114 98.7 ; # network related parameters parameter ubq(comp, pool); ubq(comp, pool) = 1; table uby(pool, pro) 1 2 3 1 12.5 12.5 12.5 2 17.5 17.5 17.5 ; table ubz(comp, pro) 1 2 3 1 0 7.5 0 2 161.29 0 161.29 3 7.5 0 0 ; $include pool.gms