mod_wfint Module

Determines the integrands CDER, DDER or ADER, BDER in the integral equations for the non-spherical wavefunctions from the non-spherical contributions of the potential vinsPLL.


Uses

    • mod_datatypes

Subroutines

public subroutine wfint0(cder, dder, qzlm, qzekdr, pzekdr, vnspll, nsra, irmind, irmd, lmmaxd, irmin, irmax)

Author
R. Zeller
License
Creative Commons License
Category
numerical-tools, single-site, KKRhost

D e t e r m i n e s

t h e

i n t e g r a n d s

C D E R ,

D D E R

o r

A D E R ,

B D E R

Read more…

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(out), dimension(lmmaxd, lmmaxd, irmind:irmd) :: cder
complex(kind=dp), intent(out), dimension(lmmaxd, lmmaxd, irmind:irmd) :: dder
complex(kind=dp), intent(in), dimension(lmmaxd, irmind:irmd, 2) :: qzlm
complex(kind=dp), intent(in), dimension(lmmaxd, irmind:irmd, 2) :: qzekdr
complex(kind=dp), intent(in), dimension(lmmaxd, irmind:irmd, 2) :: pzekdr
real(kind=dp), intent(in), dimension(lmmaxd, lmmaxd, irmind:irmd) :: vnspll
integer, intent(in) :: nsra
integer, intent(in) :: irmind

irmd - irnsd

integer, intent(in) :: irmd

Maximum number of radial points

integer, intent(in) :: lmmaxd

(KREL+KORBIT+1)(LMAX+1)*2

integer, intent(in) :: irmin

Max R for spherical treatment

integer, intent(in) :: irmax

public subroutine wfint(qns, cder, dder, qzekdr, pzekdr, vnspll, nsra, irmind, irmd, lmmaxd, irmin, irmax)

Author
R. Zeller
License
Creative Commons License
Category
numerical-tools, single-site, KKRhost

D e t e r m i n e s

t h e

i n t e g r a n d s

C D E R ,

D D E R

o r

A D E R ,

B D E R

Read more…

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(in), dimension(lmmaxd, lmmaxd, irmind:irmd, 2) :: qns
complex(kind=dp), intent(out), dimension(lmmaxd, lmmaxd, irmind:irmd) :: cder
complex(kind=dp), intent(out), dimension(lmmaxd, lmmaxd, irmind:irmd) :: dder
complex(kind=dp), intent(in), dimension(lmmaxd, irmind:irmd, 2) :: qzekdr
complex(kind=dp), intent(in), dimension(lmmaxd, irmind:irmd, 2) :: pzekdr
real(kind=dp), intent(in), dimension(lmmaxd, lmmaxd, irmind:irmd) :: vnspll
integer, intent(in) :: nsra
integer, intent(in) :: irmind

irmd - irnsd

integer, intent(in) :: irmd

Maximum number of radial points

integer, intent(in) :: lmmaxd

(KREL+KORBIT+1)(LMAX+1)*2

integer, intent(in) :: irmin

Max R for spherical treatment

integer, intent(in) :: irmax