| # | Line 452 | Line 452 | dirwgmdf(SCOLOR scval, void *uwp, FVECT ldir, double o | |
|---|---|---|
| 452 | */ | |
| 453 | /* add source width if flat */ | |
| 454 | if (wp->specfl & SP_FLAT) | |
| 455 | < | au2 = av2 = omega * (0.25/PI); |
| 455 | > | au2 = av2 = (1. - dstrsrc) * omega * (0.25/PI); |
| 456 | else | |
| 457 | au2 = av2 = 0.0; | |
| 458 | au2 += wp->rs.u_alpha*wp->rs.u_alpha; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |