RECUR Subroutine
subroutine RECUR(LMAX, X, THETA, FAC, S)
@# KKRtags: VORONOI special-functions
THIS ROUTINE IS USED TO PERFORM THE FI-INTEGRATION OF REAL SPHE-
RICAL HARMONICS .THE THETA-INTEGRATION IS PERFORMED ANALYTICALLY
USING RECURRENCE RELATIONS.
.. PARAMETER STATEMENTS ..
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer | :: | LMAX | ||||
| real(kind=8) | :: | X | ||||
| real(kind=8) | :: | THETA | ||||
| real(kind=8) | :: | FAC | ||||
| real(kind=8) | :: | S(-LMAXD1:LMAXD1,0:LMAXD1) |