14.07.2013 Views

X - UWSpace - University of Waterloo

X - UWSpace - University of Waterloo

X - UWSpace - University of Waterloo

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

fp = fopen('/u/hjpark/phdthesis/c~isjin.out~,'a*~;<br />

fprintf(fp,' ERROR in unpacking data to define the subproblem !!!\na);<br />

/* Find the number <strong>of</strong> accumulated linking variables and constraints */<br />

HISPb-m = (long '1 malloc((nb,subs + l)*site<strong>of</strong>(long));<br />

HISPb-n = (long *) malloc((nb,subs + I)*size<strong>of</strong>(longl);<br />

info = pvm-upklong ( LpSub[cur-Slockl->mmbs, SPb-nt[cur,block], 1) ;<br />

info = pt-upkdouble ( LpSi;b[cur-blockj-~oeffç, SPb-nz[cur,block], Il;<br />

info = pvm-upklong ( LpSub[cur,blockl->crpnts, SPb,n[cur-blockl+l, 1);<br />

info = pvm-upkdouble ( LpSub[cur-blockl->lo-bnds, SPb-n[cur-block], 11;<br />

inf O = pvm-upkdouble ( LpSub Icur-block] ->up,bnds, SPb-n [cur-blockl , 1) ;<br />

info = pvm-upklong ( LpÇub[cur,Slockl->row-tme, SPb,m[--block],l);<br />

info = pvm-upkdouble (LpSub[~ur~blockl-~rhs,SPb~m[c~~~b1ockj,1~;<br />

info = pvm-upkdouble (LpSub[cur,blockl->ranges, SPb-m[cur,blockJ,1);<br />

if (info c 0)<br />

fp = £open( '/u/hjpark/phdtfiesis/c~isjin.outW , 'a* 1 ;<br />

fprintf(fp,' ERROR in unpacking data to define the subproblem !!!\cm);<br />

!* Take the program end the and measuxe ~otal program the */<br />

gettime<strong>of</strong>dayt&tvl, (stnct timezone*)O);<br />

edt = (double) (tv1.t~-sec) - 1300C00 t cvL.cv-usec;<br />

fp = fopen( *, u/ hjpark/phdthesis/ chrisjinnoutm, "a*) ;<br />

fprintf(fp, 'Total program rime : %8f\n9, (edt-idt)/1000000);<br />

fcloset fpl ;<br />

t t t t r t * ~ t ~ t 8 t ~ t t t t ~ t t ~ ~ ~ ~ * t t 8 e ~ ~ ~ r ~ e * r t ~ ~ ~ ~ ~ ~ e r t ~<br />

C.2 Processor 2 : Upper-Uppr Bound Subproblem<br />

FILES. VARIABLES<br />

* Cornute the prima1 info,.r=nation (LY and 3X) :O send */<br />

Fnt i, j, p;

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!