Calculate convolution of potential with shapefunction.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer | :: | IMT1 | ||||
integer | :: | IRC1 | ||||
integer | :: | IMAXSH | ||||
integer | :: | ILM(NGSHD,3) | ||||
integer | :: | IFUNM(:) | ||||
integer | :: | LMPOT | ||||
double precision | :: | GSH(*) | ||||
double precision | :: | THETAS(IRID,NFUND) | ||||
double precision | :: | Z | ||||
double precision | :: | RFPI | ||||
double precision | :: | R(IRMD) | ||||
double precision | :: | VONS(:,:) | ||||
integer | :: | LMSP(:) | ||||
integer | :: | IRID | ||||
integer | :: | NFUND | ||||
integer | :: | IRMD | ||||
integer | :: | NGSHD |