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.