Mcxtrace fluo add detector 0 (#2029)

* mcxtrace: first version of a fluorescence detector

* mcxtrace: fluorescence monitor in corresp. test

* mcxtrace: fluo samples: remove escape/pile-up now in fluo_detector

* mcxtrace: fluo detector: fix propagation Z0

* mcxtrace: fluo: dE is FWHM. Fix LUCIA test value

---------

Co-authored-by: Emmanuel FARHI <emmanuel.farhi.1@gmail.com>

Author: farhi

mcxtrace-comps/examples/Tests_samples/Test_Fluorescence/Test_Fluorescence.instr

@@ -59,40 +59,38 @@ AT(0,0,3) RELATIVE Origin
 
 COMPONENT sample=Fluorescence(material=material,
   xwidth=0.001,yheight=0.001,zdepth=0.0001, p_interact=0.99,
-  target_index=1, focus_xw=0.0005, focus_yh=0.0005, 
-  escape_ratio=0.01, pileup_ratio=0.01)
+  target_index=1, focus_xw=0.0005, focus_yh=0.0005)
 AT (0,0,0) RELATIVE sample_mount_point
 EXTEND %{
   if (!SCATTERED) ABSORB;
   Stype=type;
 %}
 
-COMPONENT emon = E_monitor(restore_xray=1,nE=2001,Emin=0, Emax=1.5*E0, 
-  filename="emon.dat",xwidth=0.007, yheight=0.007)
-AT(0,0,0.1) RELATIVE PREVIOUS
-
-COMPONENT psd = PSD_monitor(xwidth=0.0015, yheight=0.0015, nx=100, ny=100, filename="psd.dat")
-AT(0,0,0.1) RELATIVE PREVIOUS
-
-COMPONENT emon_fluo = COPY(emon)(filename="Fluorescence.dat")
+// ideal detectors
+COMPONENT emon_fluo = E_monitor(restore_xray=1,
+  xwidth=0.007, yheight=0.007,
+  nE=2001,Emin=0, Emax=1.5*E0,
+  filename="Fluorescence.dat")
 WHEN (Stype == FLUORESCENCE)
 AT(0,0,0.1) RELATIVE PREVIOUS
 
-COMPONENT emon_Compton = COPY(emon)(filename="Compton.dat")
+COMPONENT emon_Compton = COPY(emon_fluo)(filename="Compton.dat")
 WHEN (Stype == COMPTON)
-AT(0,0,0.1) RELATIVE PREVIOUS
+AT(0,0,0) RELATIVE PREVIOUS
 
-COMPONENT emon_Rayleigh = COPY(emon)(filename="Rayleigh.dat")
+COMPONENT emon_Rayleigh = COPY(emon_fluo)(filename="Rayleigh.dat")
 WHEN (Stype == RAYLEIGH)
-AT(0,0,0.1) RELATIVE PREVIOUS
+AT(0,0,0) RELATIVE PREVIOUS
+
+// SDD model
+COMPONENT emon = Fluo_detector(restore_xray=1,nE=2001,Emin=0, Emax=1.5*E0,
+  filename="emon.dat",xwidth=0.007, yheight=0.007)
+AT(0,0,0) RELATIVE PREVIOUS
+
+COMPONENT psd = PSD_monitor(xwidth=0.001, yheight=0.001, nx=100, ny=100, filename="psd.dat")
+AT(0,0,0) RELATIVE PREVIOUS
 
-COMPONENT emon_Escape = COPY(emon)(filename="Si_Escape.dat")
-WHEN (Stype == FLUORESCENCE_ESCAPE)
-AT(0,0,0.1) RELATIVE PREVIOUS
 
-COMPONENT emon_PileUp = COPY(emon)(filename="Si_PileUp.dat")
-WHEN (Stype == FLUORESCENCE_PILEUP)
-AT(0,0,0.1) RELATIVE PREVIOUS
 
 
 END

mcxtrace-comps/examples/Tests_samples/Test_SX/Test_SX.instr

@@ -21,7 +21,7 @@
 * - index=3: use Fluorescence+Single_crystal in a GROUP
 *
 * %Example: index=1 Detector: psd_Diff_I=2.29638e-13
-* %Example: index=2 Detector: psd_Diff_I=6.60276e-14
+* %Example: index=2 Detector: psd_Diff_I=3.70277e-14
 * %Example: index=3 Detector: psd_Diff_I=1.19386e-13
 *
 * %Parameters
@@ -81,6 +81,7 @@ EXTEND %{
   else Stype=type;
 %}
 
+// Fluorescence+SX in a GROUP
 COMPONENT FluoG = Fluorescence(
   radius = .5e-4, yheight = 1e-3, material=reflections, p_interact=0.5)
 WHEN (index == 3)