| 43 |
|
/* Perez sky parametrization : epsilon and delta calculations from the direct and diffuse irradiances */ |
| 44 |
|
double sky_brightness(); |
| 45 |
|
double sky_clearness(); |
| 46 |
+ |
void computesky(); |
| 47 |
|
|
| 48 |
|
/* calculation of the direct and diffuse components from the Perez parametrization */ |
| 49 |
|
double diffus_irradiance_from_sky_brightness(); |
| 274 |
|
} |
| 275 |
|
|
| 276 |
|
|
| 277 |
+ |
void |
| 278 |
|
computesky() /* compute sky parameters */ |
| 279 |
|
{ |
| 280 |
|
|
| 474 |
|
/* Compute the ground radiance */ |
| 475 |
|
zenithbr=calc_rel_lum_perez(0.0,radians(sunzenith),radians(sunzenith),skyclearness,skybrightness,coeff_perez); |
| 476 |
|
zenithbr*=diffnormalization; |
| 477 |
+ |
/* |
| 478 |
|
fprintf(stderr, "gendaylit : the actual zenith radiance(W/m^2/sr) or luminance(cd/m^2) is : %.0lf\n", zenithbr); |
| 479 |
< |
|
| 479 |
> |
*/ |
| 480 |
> |
|
| 481 |
|
if (skyclearness==1) |
| 482 |
|
normfactor = 0.777778; |
| 483 |
|
|
