This is an old revision of the document!


LP_Factor

Desciption: Lorentz Polarisation macro

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));
}

Personal Tools