| 269 |
|
printf("# Ground ambient level: %.1f\n", groundbr); |
| 270 |
|
if (!overcast && sundir[2] > 0.0 && (!u_solar || solarbr > 0.0)) { |
| 271 |
|
if (u_solar == -1) |
| 272 |
< |
solarbr /= 6e-5*sundir[2]; |
| 272 |
> |
solarbr /= 5.98e-5*sundir[2]; |
| 273 |
|
else if (u_solar == 0) { |
| 274 |
|
solarbr = 1.5e9/SUNEFFICACY * |
| 275 |
|
(1.147 - .147/(sundir[2]>.16?sundir[2]:.16)); |
| 289 |
|
if (dosun) { |
| 290 |
|
printf("\nvoid light solar\n"); |
| 291 |
|
printf("0\n0\n"); |
| 292 |
< |
printf("3 %.2e %.2e %.2e\n", solarbr, solarbr, solarbr); |
| 292 |
> |
printf("3 %.3e %.3e %.3e\n", solarbr, solarbr, solarbr); |
| 293 |
|
printf("\nsolar source sun\n"); |
| 294 |
|
printf("0\n0\n"); |
| 295 |
|
printf("4 %f %f %f 0.5\n", sundir[0], sundir[1], sundir[2]); |
| 299 |
|
printf("2 skybr skybright.cal\n"); |
| 300 |
|
printf("0\n"); |
| 301 |
|
if (overcast) |
| 302 |
< |
printf("3 %d %.2e %.2e\n", skytype, zenithbr, groundbr); |
| 302 |
> |
printf("3 %d %.3e %.3e\n", skytype, zenithbr, groundbr); |
| 303 |
|
else |
| 304 |
< |
printf("7 %d %.2e %.2e %.2e %f %f %f\n", |
| 304 |
> |
printf("7 %d %.3e %.3e %.3e %f %f %f\n", |
| 305 |
|
skytype, zenithbr, groundbr, F2, |
| 306 |
|
sundir[0], sundir[1], sundir[2]); |
| 307 |
|
} |
