htrdr

commit d5a0b5dd94ab262f2af18291f11b0c60b9eefc6d
parent ed6cefe7e8b7a97565aba1c8278ea8430b73093b
Author: Vincent Forest <vincent.forest@meso-star.com>
Date:   Fri, 29 May 2020 17:01:31 +0200

Fix comments

Diffstat:
M
src/htrdr_draw_radiance.c
 | 
6
+++---
M
src/htrdr_ran_lw.h
 | 
2
+-
M
src/htrdr_solve.h
 | 
2
++

3 files changed, 6 insertions(+), 4 deletions(-)
diff --git a/src/htrdr_draw_radiance.c b/src/htrdr_draw_radiance.c
@@ -633,15 +633,15 @@ draw_pixel_lw
     iband = htsky_find_spectral_band(htrdr->sky, wlen);
     iquad = htsky_spectral_band_sample_quadrature(htrdr->sky, r2, iband);
 
-    /* Compute the integrated luminance in W/m^2/sr */
+    /* Compute the integrated luminance in W/m^2/sr/m */
     weight = htrdr_compute_radiance_lw(htrdr, ithread, rng, ray_org, ray_dir,
       wlen, iband, iquad);
 
     /* Importance sampling: correct weight with pdf */
-    weight /= band_pdf;
+    weight /= band_pdf; /* In W/m^2/sr */
 
     /* From integrated radiance to average radiance in W/m^2/sr/m */
-    if(htrdr->wlen_range_m[0] != htrdr->wlen_range_m[1]) { 
+    if(htrdr->wlen_range_m[0] != htrdr->wlen_range_m[1]) {
       /* Is not monochromatic */
       weight /= (htrdr->wlen_range_m[1] - htrdr->wlen_range_m[0]) ;
     }
diff --git a/src/htrdr_ran_lw.h b/src/htrdr_ran_lw.h
@@ -29,7 +29,7 @@ htrdr_ran_lw_create
    const double range[2], /* Must be included in [1000, 100000] nanometers */
    /* # bands used to discretisze the LW domain. HTRDR_RAN_LW_CONTINUE <=> no
     * discretisation */
-   const size_t nbands, /* Hint on #bands used to discretised th CDF */
+   const size_t nbands, /* Hint on #bands used to discretised the CDF */
    const double ref_temperature, /* Reference temperature */
    struct htrdr_ran_lw** ran_lw);
 
diff --git a/src/htrdr_solve.h b/src/htrdr_solve.h
@@ -56,6 +56,7 @@ struct htrdr_camera;
 struct s3d_hit;
 struct ssp_rng;
 
+/* Return the shortwave radiance in W/m^2/sr/m */
 extern LOCAL_SYM double
 htrdr_compute_radiance_sw
   (struct htrdr* htrdr,
@@ -67,6 +68,7 @@ htrdr_compute_radiance_sw
    const size_t iband, /* Index of the spectral band */
    const size_t iquad); /* Index of the quadrature point into the band */
 
+/* Return the longwave radiance in W/m^2/sr/m */
 extern LOCAL_SYM double
 htrdr_compute_radiance_lw
   (struct htrdr* htrdr,