Warning: Trying to access array offset on value of type null in /home/site/wwwroot/lib/plugins/move/action/rename.php on line 42
Warning: Cannot modify header information - headers already sent by (output started at /home/site/wwwroot/lib/plugins/move/action/rename.php:42) in /home/site/wwwroot/inc/Action/Export.php on line 106
Warning: Cannot modify header information - headers already sent by (output started at /home/site/wwwroot/lib/plugins/move/action/rename.php:42) in /home/site/wwwroot/inc/Action/Export.php on line 106
Warning: Cannot modify header information - headers already sent by (output started at /home/site/wwwroot/lib/plugins/move/action/rename.php:42) in /home/site/wwwroot/inc/Action/Export.php on line 106
====== Variable divergence corrections with an LPSD ======
Correction routine for the analysis of variable divergence data (constant illuminated length) when collected with a linear position sensitive detector.
Contributors: Macro: Matthew Rowles, data: Henry Spratt
'macro for doing variable divergence (fixed illumination length) with the inbuilt lpsd convolution '
' Inputs required: illumination length (mm), and detector size (degrees) '
' Corrects for both peak shape and intensity. '
'use this macro if you just want to give the values: '
macro Variable_Divergence_lpsd(lenv, detv) { Variable_Divergence_lpsd(, lenv, , detv) }
'use this macro if you want to refine something: '
macro Variable_Divergence_lpsd(lenc, lenv, detc, detv) {
#m_argu lenc 'illuminated length in mm '
#m_argu detc 'size of detector in degrees '
If_Prm_Eqn_Rpt(lenc, lenv, min 0.0001 max 60)
If_Prm_Eqn_Rpt(detc, detv, min 0.0001 max 179.9999)
lpsd_th2_angular_range_degrees =CeV(detc, detv);
lpsd_equitorial_divergence_degrees =(-2 ArcTan((Rp-Sqrt(Rp^2+CeV(lenc,lenv)^2 Cos(Th)^2)) Sin(Th) / (CeV(lenc,lenv) Cos(Th)^2))) Rad;
lpsd_equitorial_sample_length_mm =Sin(Th);
lpsd_beam_spill_correct_intensity 1
}