Go to the source code of this file.
Functions/Subroutines | |
subroutine | calc_gwdos (NWF, NTK, nsgm, Na1, Na2, Na3, nkb1, nkb2, nkb3, idlt, dmna, dmnr, FermiEnergy, a1, a2, a3, b1, b2, b3, sgmw, SK0, KS_R, XC_R, SX_R, SC_R, shift_value, gwdos, gw_sigma_dos) |
subroutine calc_gwdos | ( | integer | NWF, | |
integer | NTK, | |||
integer | nsgm, | |||
integer | Na1, | |||
integer | Na2, | |||
integer | Na3, | |||
integer | nkb1, | |||
integer | nkb2, | |||
integer | nkb3, | |||
real(8) | idlt, | |||
real(8) | dmna, | |||
real(8) | dmnr, | |||
real(8) | FermiEnergy, | |||
real(8),dimension(3) | a1, | |||
real(8),dimension(3) | a2, | |||
real(8),dimension(3) | a3, | |||
real(8),dimension(3) | b1, | |||
real(8),dimension(3) | b2, | |||
real(8),dimension(3) | b3, | |||
real(8),dimension(nsgm) | sgmw, | |||
real(8),dimension(3,ntk) | SK0, | |||
complex(8),dimension(nwf,nwf,-na1:na1,-na2:na2,-na3:na3) | KS_R, | |||
complex(8),dimension(nwf,nwf,-na1:na1,-na2:na2,-na3:na3) | XC_R, | |||
complex(8),dimension(nwf,nwf,-na1:na1,-na2:na2,-na3:na3) | SX_R, | |||
complex(4),dimension(nwf,nwf,-na1:na1,-na2:na2,-na3:na3,nsgm) | SC_R, | |||
real(8),intent(out) | shift_value, | |||
real(8),dimension(nsgm),intent(out) | gwdos, | |||
complex(8),dimension(nsgm),intent(out) | gw_sigma_dos | |||
) |
Definition at line 1 of file calc_gwdos.f90.
References calc_dos_GW(), det_shift(), make_eks(), make_emk(), and search_Rmin().
Referenced by GW().