AMNGAUNT Subroutine
-
- electrostatics, potential, special-functions, KKRimp
- 67 statements
- Source File
public subroutine AMNGAUNT(LMAX, CLEB, ICLEB, IEND, W, YR, N, LASSLD, NCLEB, LM3D)
For details see vinters2010 This sub calculates the gaunt coefs in the ordering neaded for calculating the electrostatic AMAT^(nn')_(LL') 17.09.2001
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer | :: | LMAX | ||||
| real(kind=8) | :: | CLEB(NCLEB,2) | ||||
| integer | :: | ICLEB(NCLEB,4) | ||||
| integer | :: | IEND | ||||
| real(kind=8) | :: | W(N) | ||||
| real(kind=8) | :: | YR(N,0:LASSLD,0:LASSLD) | ||||
| integer | :: | N | ||||
| integer | :: | LASSLD | ||||
| integer | :: | NCLEB | ||||
| integer | :: | LM3D |