Differences

This shows you the differences between two versions of the page.

--- lp_factor [2009/08/06 11:14] – clare
+++ lp_factor [2022/11/03 15:08] (current) – external edit 127.0.0.1
@@ Line 1: / Line 1: @@
+====== LP_Factor ======
+Desciption: Lorentz Polarisation macro
+<code topas>
+macro LP_Factor(v) { LP_Factor(,v) }
+macro LP_Factor(c, v)
+{
+   #m_argu c
+   If_Prm_Eqn_Rpt(c, v, min .0001 max 90)
+	scale_pks = (1 + Cos(CeV(c,v) Deg)^2 Cos(2 Th)^2) / (Sin(Th)^2 Cos(Th));
+}
+</code>