| 946 |
|
fprintf(fp, "%f %f %d\n", dp->dim[i].org, dp->dim[i].siz, dp->dim[i].ne); |
| 947 |
|
} |
| 948 |
|
for (i = 0; i < nvals; i++) { |
| 949 |
< |
fprintf(fp, "%f\n", dp->arr.d[i]); |
| 949 |
> |
fprintf(fp, "%.15e\n", dp->arr.d[i]); |
| 950 |
|
} |
| 951 |
|
fclose(fp); |
| 952 |
|
} |
| 1382 |
|
/* transmittance between view point and ground point */ |
| 1383 |
|
double trans[NSSAMP] = {0}; |
| 1384 |
|
get_transmittance(tau, radius, mu, distance, intersect, trans); |
| 1385 |
– |
if (trans[0] == 0) {printf("trans 0\n");} |
| 1385 |
|
|
| 1386 |
|
/* inscattering */ |
| 1387 |
|
float inscatter[NSSAMP] = {0}; |