| 78 |
|
hlist[1] = j; |
| 79 |
|
hlist[2] = i; |
| 80 |
|
multisamp(spt, 2, urand(ilhash(hlist,3)+n)); |
| 81 |
< |
if (!n) { /* avoid border samples for n==0 */ |
| 81 |
> |
/* avoid coincident samples */ |
| 82 |
> |
if (!n && (0 < i) & (i < hp->ns-1) && |
| 83 |
> |
(0 < j) & (j < hp->ns-1)) { |
| 84 |
|
if ((spt[0] < 0.1) | (spt[0] >= 0.9)) |
| 85 |
|
spt[0] = 0.1 + 0.8*frandom(); |
| 86 |
|
if ((spt[1] < 0.1) | (spt[1] >= 0.9)) |
| 180 |
|
float *earr = getambdiffs(hp); |
| 181 |
|
double e2rem = 0; |
| 182 |
|
AMBSAMP *ap; |
| 181 |
– |
RAY ar; |
| 183 |
|
float *ep; |
| 184 |
|
int i, j, n, nss; |
| 185 |
|
|
| 609 |
|
ambcorral(AMBHEMI *hp, FVECT uv[2], const double r0, const double r1) |
| 610 |
|
{ |
| 611 |
|
const double max_d = 1.0/(minarad*ambacc + 0.001); |
| 612 |
< |
const double ang_res = 0.5*PI/(hp->ns-1); |
| 613 |
< |
const double ang_step = ang_res/((int)(16/PI*ang_res) + (1+FTINY)); |
| 612 |
> |
const double ang_res = 0.5*PI/hp->ns; |
| 613 |
> |
const double ang_step = ang_res/((int)(16/PI*ang_res) + 1.01); |
| 614 |
|
double avg_d = 0; |
| 615 |
|
uint32 flgs = 0; |
| 616 |
|
FVECT vec; |
| 641 |
|
if ((r0*r0*u*u + r1*r1*v*v) * ap->d*ap->d <= u*u + v*v) |
| 642 |
|
continue; /* occluder outside ellipse */ |
| 643 |
|
ang = atan2a(v, u); /* else set direction flags */ |
| 644 |
< |
for (a1 = ang-.5*ang_res; a1 <= ang+.5*ang_res; a1 += ang_step) |
| 644 |
> |
for (a1 = ang-ang_res; a1 <= ang+ang_res; a1 += ang_step) |
| 645 |
|
flgs |= 1L<<(int)(16/PI*(a1 + 2.*PI*(a1 < 0))); |
| 646 |
|
} |
| 647 |
|
/* add low-angle incident (< 20deg) */ |
| 694 |
|
return(0); |
| 695 |
|
|
| 696 |
|
if ((ra == NULL) & (pg == NULL) & (dg == NULL) || |
| 697 |
< |
(hp->sampOK < 0) | (hp->ns < 4)) { |
| 697 |
> |
(hp->sampOK < 0) | (hp->ns < 6)) { |
| 698 |
|
free(hp); /* Hessian not requested/possible */ |
| 699 |
|
return(-1); /* value-only return value */ |
| 700 |
|
} |
