CKILT CKILT CKILT CKILT CKILT CKILT CKILT ********************************************** ************************** ****** SUBROUTINE CKILT (IR, ICKWRK, RCKWRK, ILT, RLT) Returns an integer flag to indicate whether reaction IR uses the Landau-Teller rate expression, and if so, returns the array of Landau-Teller supplemental parameters. INPUT IR - Integer scalar, reaction index. ICKWRK(*) - Integer workspace array; dimension at least LENICK. RCKWRK(*) - Real workspace array; dimension at least LENRCK. OUTPUT ILT - Integer scalar, 1, reaction IR uses the Landau-Teller rate expression. 0, no. RLT(*) - Real array, supplemental Landau-Teller parameters for reaction IR. Dimension RLT(*) at least NLAR, the number of supplemental parameters required to calculate a Landau-Teller reaction rate; in the current implementation, NLAR=2.