CALCTMAT Subroutine
- Phivos Mavropoulos, Hubert Ebert, Voicu Popescu
-
- KKRimp, single-site
- 80 statements
- Source File
public subroutine CALCTMAT(eryd, vpot, cell, zatom, lmaxatom, tmatll, config, ispin, nspin)
Uses
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex(kind=dpc), | intent(in) | :: | eryd | |||
| real(kind=dp), | intent(in) | :: | vpot(1:cell%nrmaxd,(2*lmaxatom+1)**2) | |||
| type(cell_type), | intent(in) | :: | cell | |||
| real(kind=dp), | intent(in) | :: | zatom | |||
| integer, | intent(in) | :: | lmaxatom | |||
| complex(kind=dpc) | :: | tmatll((lmaxatom+1)**2,(lmaxatom+1)**2) | ||||
| type(config_type), | intent(in) | :: | config | |||
| integer, | intent(in) | :: | ispin | |||
| integer, | intent(in) | :: | nspin |