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 |
|
|