| 667 |
|
diff_illum = diff_irrad * WHTEFFICACY; |
| 668 |
|
dir_illum = dir_irrad * WHTEFFICACY; |
| 669 |
|
} |
| 670 |
– |
|
| 671 |
– |
if (bright(skycolor) <= 1e-4) { /* 0 sky component? */ |
| 672 |
– |
memset(parr, 0, sizeof(float)*3*nskypatch); |
| 673 |
– |
return; |
| 674 |
– |
} |
| 670 |
|
/* Compute ground radiance (include solar contribution if any) */ |
| 671 |
|
parr[0] = diff_illum; |
| 672 |
|
if (altitude > 0) |
| 674 |
|
parr[2] = parr[1] = parr[0] *= (1./PI/WHTEFFICACY); |
| 675 |
|
multcolor(parr, grefl); |
| 676 |
|
|
| 677 |
+ |
if (bright(skycolor) <= 1e-4) { /* 0 sky component? */ |
| 678 |
+ |
memset(parr+3, 0, sizeof(float)*3*(nskypatch-1)); |
| 679 |
+ |
return; |
| 680 |
+ |
} |
| 681 |
|
/* Calculate Perez sky model parameters */ |
| 682 |
|
CalcPerezParam(sun_zenith, sky_clearness, sky_brightness, index); |
| 683 |
|
|