Shift to using double type (used internally in -lib and better for use with USERVARS)

Author: willend

mcstas-comps/monitors/Monitor_nD.comp

@@ -405,7 +405,7 @@ TRACE
   double  t1 = 0;
   int     pp;
   int     intersect   = 0;
-  int     pixID = -1; // Used to carry pixel ID from trace function to comp scope
+  double  pixID = -1; // Used to carry pixel ID from trace function to comp scope
   char    Flag_Restore = 0;
 
   #ifdef OPENACC

mcstas-comps/monitors/Monitor_nD_noacc.comp

@@ -408,7 +408,7 @@ TRACE
   double  t1 = 0;
   int     pp;
   int     intersect   = 0;
-  int     pixID = -1; // Used to carry pixel ID from trace function to comp scope
+  double  pixID = -1; // Used to carry pixel ID from trace function to comp scope
   char    Flag_Restore = 0;
 
   #define thread_offdata offdata

mcstas-comps/share/monitor_nd-lib.c

@@ -1065,7 +1065,7 @@ void Monitor_nD_Init(MonitornD_Defines_type *DEFS,
 /* return values: 0=neutron was absorbed, -1=neutron was outside bounds, 1=neutron was measured*/
 /* ========================================================================= */
 
-int Monitor_nD_Trace(MonitornD_Defines_type *DEFS, MonitornD_Variables_type *Vars, int *pixID, _class_particle* _particle)
+int Monitor_nD_Trace(MonitornD_Defines_type *DEFS, MonitornD_Variables_type *Vars, double *pixID, _class_particle* _particle)
 {
 
   double  XY=0, pp=0;

mcstas-comps/share/monitor_nd-lib.h

@@ -191,7 +191,7 @@
 
 void Monitor_nD_Init(MonitornD_Defines_type *, MonitornD_Variables_type *, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, int);
 #pragma acc routine
-int Monitor_nD_Trace(MonitornD_Defines_type *, MonitornD_Variables_type *, int *pixID, _class_particle* _particle);
+int Monitor_nD_Trace(MonitornD_Defines_type *, MonitornD_Variables_type *, double *pixID, _class_particle* _particle);
 MCDETECTOR Monitor_nD_Save(MonitornD_Defines_type *, MonitornD_Variables_type *);
 void Monitor_nD_Finally(MonitornD_Defines_type *, MonitornD_Variables_type *);
 void Monitor_nD_McDisplay(MonitornD_Defines_type *, MonitornD_Variables_type *);

mcstas-comps/share/monitor_nd_noacc-lib.c

@@ -989,7 +989,7 @@ void Monitor_nd_noaccInit(Monitornd_noaccDefines_type *DEFS,
 /* return values: 0=neutron was absorbed, -1=neutron was outside bounds, 1=neutron was measured*/
 /* ========================================================================= */
 
-int Monitor_nd_noaccTrace(Monitornd_noaccDefines_type *DEFS, Monitornd_noaccVariables_type *Vars, int *pixID, _class_particle* _particle)
+int Monitor_nd_noaccTrace(Monitornd_noaccDefines_type *DEFS, Monitornd_noaccVariables_type *Vars, double *pixID, _class_particle* _particle)
 {
 
   double  XY=0, pp=0;

mcstas-comps/share/monitor_nd_noacc-lib.h

@@ -197,7 +197,7 @@
 /* ========================================================================= */
 
 void Monitor_nd_noaccInit(Monitornd_noaccDefines_type *, Monitornd_noaccVariables_type *, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, MCNUM, int);
-int Monitor_nd_noaccTrace(Monitornd_noaccDefines_type *, Monitornd_noaccVariables_type *, int *pixID, _class_particle* _particle);
+int Monitor_nd_noaccTrace(Monitornd_noaccDefines_type *, Monitornd_noaccVariables_type *, double *pixID, _class_particle* _particle);
 MCDETECTOR Monitor_nd_noaccSave(Monitornd_noaccDefines_type *, Monitornd_noaccVariables_type *);
 void Monitor_nd_noaccFinally(Monitornd_noaccDefines_type *, Monitornd_noaccVariables_type *);
 void Monitor_nd_noaccMcDisplay(Monitornd_noaccDefines_type *, Monitornd_noaccVariables_type *);