8.37. SKIENR

SKIENR    SKIENR    SKIENR    SKIENR    SKIENR    SKIENR    SKIENR    
          **********************************************
                    **************************
                              ******

SUBROUTINE SKIENR (IR, ISKWRK, SKWRK, IENRFL, IEION, PEDEP)
Returns an integer flag to indicate if reaction IR is ion-energy-
dependent, and if so, formulation-specific parameters.

INPUT
IR        - Integer scalar, reaction index;
ISKWRK(*) - Integer workspace array; dimension at least LENISK.
RSKWRK(*) - Real    workspace array; dimension at least LENRSK.

OUTPUT
IENRFL    - Integer scalar,
            0, reaction IR does not have an ion-energy dependence
            1, reaction IR does have an ion-energy dependence
IEION     - Integer scalar, species index of the ion on which
            reaction is dependent;
PEDEP(*)  - Real array, supplemental parameters for an
            ion-energy-dependent reaction rate formulation;
            dimension at least NEDPAR, the number of supplemental
            rate parameters required.