| 315 |
|
static void |
| 316 |
|
rayirrad(RAY *r) |
| 317 |
|
{ |
| 318 |
< |
/* pretend we hit surface */ |
| 319 |
< |
r->rxt = r->rot = 1e-5; |
| 320 |
< |
VSUM(r->rop, r->rorg, r->rdir, r->rot); |
| 321 |
< |
r->ron[0] = -r->rdir[0]; |
| 322 |
< |
r->ron[1] = -r->rdir[1]; |
| 323 |
< |
r->ron[2] = -r->rdir[2]; |
| 318 |
> |
/* orientation -> normal */ |
| 319 |
> |
VCOPY(r->ron, r->rdir); |
| 320 |
> |
/* pretend normal incidence */ |
| 321 |
> |
r->rdir[0] = -r->ron[0]; |
| 322 |
> |
r->rdir[1] = -r->ron[1]; |
| 323 |
> |
r->rdir[2] = -r->ron[2]; |
| 324 |
|
r->rod = 1.0; |
| 325 |
+ |
/* counterfeit other params */ |
| 326 |
+ |
r->rxt = r->rot = 1e-4; |
| 327 |
+ |
/* move comfortably above sample pos. */ |
| 328 |
+ |
VSUM(r->rop, r->rorg, r->ron, r->rot); |
| 329 |
+ |
/* leap-frog for pretend origin */ |
| 330 |
+ |
VSUM(r->rorg, r->rop, r->ron, r->rot); |
| 331 |
|
/* compute result */ |
| 332 |
|
r->revf = raytrace; |
| 333 |
|
m_normal(&Lamb, r); |
