298 |
|
nstarget = 1; |
299 |
|
} |
300 |
|
scolorblack(scol); |
301 |
< |
dimlist[ndims++] = (int)(size_t)wp->mtp; |
301 |
> |
dimlist[ndims_inc] = (int)(size_t)wp->mtp; |
302 |
|
maxiter = MAXITER*nstarget; |
303 |
|
for (nstaken = ntrials = 0; (nstaken < nstarget) & |
304 |
|
(ntrials < maxiter); ntrials++) { |
347 |
|
scalescolor(scol, d); |
348 |
|
saddscolor(wp->rp->rcol, scol); |
349 |
|
} |
350 |
< |
ndims--; |
350 |
> |
dec_ndims; |
351 |
|
} |
352 |
|
/* compute transmission */ |
353 |
|
if ((wp->specfl & (SP_TRAN|SP_TPURE|SP_TBLT)) == SP_TRAN && |
364 |
|
} else |
365 |
|
nstarget = 1; |
366 |
|
} |
367 |
< |
dimlist[ndims++] = (int)(size_t)wp->mtp; |
367 |
> |
dimlist[ndims_inc] = (int)(size_t)wp->mtp; |
368 |
|
maxiter = MAXITER*nstarget; |
369 |
|
for (nstaken = ntrials = 0; (nstaken < nstarget) & |
370 |
|
(ntrials < maxiter); ntrials++) { |
401 |
|
saddscolor(wp->rp->rcol, sr.rcol); |
402 |
|
++nstaken; |
403 |
|
} |
404 |
< |
ndims--; |
404 |
> |
dec_ndims; |
405 |
|
} |
406 |
|
} |
407 |
|
|