rhoq_saveg Subroutine

public subroutine rhoq_saveg(nscoef, rhoq_kmask, kpt, k_end, kp, i, j, mu, imin, iatomimp, lmmaxd, g)

Write out G_ij as well as G_ji

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nscoef

number of layers in imp. cluster

real(kind=dp), intent(in) :: rhoq_kmask(5,k_end)

mask and mapping array of reduced k-point set

integer, intent(in) :: kpt

kpoint index

integer, intent(in) :: k_end

number of kpoints to be stored

real(kind=dp), intent(in) :: kp(3)

kpoint

integer, intent(in) :: i

atom index i

integer, intent(in) :: j

atom index j

integer, intent(in) :: mu

scanning position (mu0)

integer, intent(in) :: imin

minimal layer index

integer, intent(in) :: iatomimp(nscoef)

layer indices of imp. cluster

integer, intent(in) :: lmmaxd

lm-size of GF matrices

complex(kind=dp), intent(in) :: g(lmmaxd,lmmaxd)

structural GF (of pair i,j, and k-point)