takes the spherical bessel etc functions stored in an array up to LMAX array entries from LMAX+1 to 2*LMAX are assumed to be empty these values are filled with the potential-free solution of the SRA-equations
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
double complex | :: | HL(0:2*(LMAX+1)-1) | ||||
double complex | :: | JL(0:2*(LMAX+1)-1) | ||||
double complex | :: | ZVAL | ||||
double precision | :: | TAU | ||||
double complex | :: | ERYD | ||||
integer | :: | LMAX |