stardis-solver

commit cbb7c5c0d88a985f2bb54d19615c129de215bf2d
parent 5b763672a5cac5fe204f7410b4c9b3063e07ca87
Author: Vincent Forest <vincent.forest@meso-star.com>
Date:   Wed, 27 Feb 2019 11:40:15 +0100

Provide "debug" parameters to the probe realisation

Diffstat:
M
src/sdis_realisation.h
 | 
6
++++--
M
src/sdis_realisation_Xd.h
 | 
4
+++-
M
src/sdis_solve_Xd.h
 | 
4
++--

3 files changed, 9 insertions(+), 5 deletions(-)
diff --git a/src/sdis_realisation.h b/src/sdis_realisation.h
@@ -37,7 +37,8 @@ enum flux_flag {
  ******************************************************************************/
 extern LOCAL_SYM res_T
 probe_realisation_2d
-  (struct sdis_scene* scn,
+  (const size_t irealisation, /* For debug */
+   struct sdis_scene* scn,
    struct ssp_rng* rng,
    struct sdis_medium* medium,
    const double position[2],
@@ -51,7 +52,8 @@ probe_realisation_2d
 
 extern LOCAL_SYM res_T
 probe_realisation_3d
-  (struct sdis_scene* scn,
+  (const size_t irealisation, /* For debug */
+   struct sdis_scene* scn,
    struct ssp_rng* rng,
    struct sdis_medium* medium,
    const double position[3],
diff --git a/src/sdis_realisation_Xd.h b/src/sdis_realisation_Xd.h
@@ -88,7 +88,8 @@ error:
  ******************************************************************************/
 res_T
 XD(probe_realisation)
-  (struct sdis_scene* scn,
+  (const size_t irealisation, /* For debug */
+   struct sdis_scene* scn,
    struct ssp_rng* rng,
    struct sdis_medium* medium,
    const double position[],
@@ -110,6 +111,7 @@ XD(probe_realisation)
      const struct sdis_rwalk_vertex* vtx);
   res_T res = RES_OK;
   ASSERT(medium && position && fp_to_meter > 0 && weight && time >= 0);
+  (void)irealisation;
 
   switch(medium->type) {
     case SDIS_FLUID:
diff --git a/src/sdis_solve_Xd.h b/src/sdis_solve_Xd.h
@@ -264,8 +264,8 @@ XD(solve_probe)
       pgreen_path = &green_path;
     }
 
-    res_local = XD(probe_realisation)(scn, rng, medium, position, time,
-      fp_to_meter, Tarad, Tref, pgreen_path, pheat_path, &w);
+    res_local = XD(probe_realisation)((size_t)irealisation, scn, rng, medium,
+      position, time, fp_to_meter, Tarad, Tref, pgreen_path, pheat_path, &w);
     if(res_local != RES_OK) {
       if(res_local != RES_BAD_OP) { ATOMIC_SET(&res, res_local); continue; }
     } else {