| 129 |
|
if (m->otype != MAT_DIELECTRIC |
| 130 |
|
|| r->rod > 0.0 |
| 131 |
|
|| r->crtype & SHADOW |
| 132 |
+ |
|| directinvis |
| 133 |
|
|| m->oargs.farg[4] == 0.0 |
| 134 |
|
|| !disperse(m, r, p.rdir, trans)) |
| 135 |
|
#endif |
| 173 |
|
FVECT v1, v2, n1, n2; |
| 174 |
|
FVECT dv, v2Xdv; |
| 175 |
|
double v2Xdvv2Xdv; |
| 176 |
< |
int sn, success = 0; |
| 177 |
< |
double omega; |
| 176 |
> |
int success = 0; |
| 177 |
> |
SRCINDEX si; |
| 178 |
|
FVECT vtmp1, vtmp2; |
| 179 |
|
double dtmp1, dtmp2; |
| 180 |
|
int l1, l2; |
| 236 |
|
v2Xdvv2Xdv = DOT(v2Xdv, v2Xdv); |
| 237 |
|
|
| 238 |
|
/* check sources */ |
| 239 |
< |
for (sn = 0; sn < nsources; sn++) { |
| 239 |
> |
initsrcindex(&si); |
| 240 |
> |
while (srcray(&sray, r, &si)) { |
| 241 |
|
|
| 242 |
< |
if ((omega = srcray(&sray, r, sn)) == 0.0 || |
| 241 |
< |
DOT(sray.rdir, v2) < MINCOS) |
| 242 |
> |
if (DOT(sray.rdir, v2) < MINCOS) |
| 243 |
|
continue; /* bad source */ |
| 243 |
– |
|
| 244 |
|
/* adjust source ray */ |
| 245 |
|
|
| 246 |
|
dtmp1 = DOT(v2Xdv, sray.rdir) / v2Xdvv2Xdv; |
| 265 |
|
*/ |
| 266 |
|
|
| 267 |
|
fcross(vtmp1, v2Xdv, sray.rdir); |
| 268 |
< |
dtmp1 = sqrt(omega / v2Xdvv2Xdv / PI); |
| 268 |
> |
dtmp1 = sqrt(si.dom / v2Xdvv2Xdv / PI); |
| 269 |
|
|
| 270 |
|
/* compute first ray */ |
| 271 |
|
for (i = 0; i < 3; i++) |
