X - UWSpace - University of Waterloo

i* Add a cut for upper level iteration */
status = CPXnewrows (env, Ip, 1, &LpSub[L]->PiB, hcut-sense, NULL, NUUI;
forij=SPb,n[2l+LSPb-m[2]+HISPbbn[ll;
jQMeL [ j +HISPb-n [2 ] -SPbbn [ 2 I -LSPbbm [2 1 -HISPb-n [ 11 1 1 ;
for(j=O; jOMeL [ j +HISPb,n f 11 1 ) ;
f0r(j=SPb,n[2I+LSPb~ni[2I;
j[2]- HISPb,rn[lli+i~er,count-2+totlev2Cl,
j ,i,psub[lI - > I l 2 1 11 ;
if(nb,subs > 2 && subtype[31 == 1)
E
fcri j=SPb,n[21+LSPb-n[2]+LS?bbnfll ;
j[2]-IiTS?bbm[l]-l+
iter-co~nt-2+totlevX), j ,LpSub[31->PiD[j-S?b-z[2]-LSPb-m[2]-
LSPb,n[llj) ;
for(j=3; jOMeL [ j +HISPb-n [ 3 I 1 1 ;
status = CPXchgcaeE (env, lp, l int) ( SPb-ml 2 1 -LOWSPb-m [2 1 -HISPbbn[ 11 -
i+(i:er_coun~-2)+tot1ev2C),
i int 1 (LpSub [2 1 ->n+LS2b,m[Z] tHLSPb-n [nb-subsl -LS?b-n [2 1 1 ,
Theta-coef 1 ;
~Cjval[2] = objval [lev2,blockl + 5;
abf val [levZblock] = objval [ c~subl - 3 ;