wfmesh Subroutine
-
- radial-grid, KKRhost
- 36 statements
- Source File
public subroutine wfmesh(e, ek, cvlight, nsra, z, r, s, rs, irm, irmd, lmaxd)
Creation of the radial mesh for the old-solver
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex(kind=dp), | intent(in) | :: | e | |||
| complex(kind=dp), | intent(inout) | :: | ek | |||
| real(kind=dp), | intent(in) | :: | cvlight |
Speed of light divided by the fine structure constant |
||
| integer, | intent(in) | :: | nsra | |||
| real(kind=dp), | intent(in) | :: | z |
Nuclear charge |
||
| real(kind=dp), | intent(in), | dimension(irmd) | :: | r |
Set of real space vectors (in a.u.) |
|
| real(kind=dp), | intent(inout), | dimension(0:lmaxd) | :: | s | ||
| real(kind=dp), | intent(inout), | dimension(irmd, 0:lmaxd) | :: | rs | ||
| integer, | intent(in) | :: | irm |
Current radial point |
||
| integer, | intent(in) | :: | irmd |
Maximum number of radial points |
||
| integer, | intent(in) | :: | lmaxd |
Maximum l component in wave function expansion |