htrdr

commit c04840df8b15f4f3c5399b88d10b04aeb034a410
parent b3bedf06f7100a3c98d4f088803991efd53fdb77
Author: Vincent Forest <vincent.forest@meso-star.com>
Date:   Tue, 21 Apr 2020 16:29:42 +0200

Print a log message on the spectral integration domain

Diffstat:
M
src/htrdr_cie_xyz.c
 | 
3
+++
M
src/htrdr_ran_lw.c
 | 
3
+++
M
src/htrdr_ran_lw.h
 | 
2
+-

3 files changed, 7 insertions(+), 1 deletion(-)
diff --git a/src/htrdr_cie_xyz.c b/src/htrdr_cie_xyz.c
@@ -298,6 +298,9 @@ htrdr_cie_xyz_create
   res = setup_cie_xyz(cie, FUNC_NAME, range, nbands);
   if(res != RES_OK) goto error;
 
+  htrdr_log(htrdr, "Short wave interval defined on [%g, %g] nanometers.\n",
+    range[0], range[1]);
+
 exit:
   *out_cie = cie;
   return res;
diff --git a/src/htrdr_ran_lw.c b/src/htrdr_ran_lw.c
@@ -352,6 +352,9 @@ htrdr_ran_lw_create
     if(res != RES_OK) goto error;
   }
 
+  htrdr_log(htrdr, "Long wave interval defined on [%g, %g] nanometers.\n",
+    range[0], range[1]);
+
 exit:
   *out_ran_lw = ran_lw;
   return res;
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,
+   const size_t nbands, /* Hint on #bands used to discretised th CDF */
    const double ref_temperature, /* Reference temperature */
    struct htrdr_ran_lw** ran_lw);