extend_coeffvector2cluster Subroutine

private subroutine extend_coeffvector2cluster(inc, lattice, impcls, kpoint, rveig_in, rveig_big)

Uses

Arguments

Type IntentOptional Attributes Name
type(inc_TYPE), intent(in) :: inc
type(lattice_TYPE), intent(in) :: lattice
type(impcls_TYPE), intent(in) :: impcls
double precision, intent(in) :: kpoint(3)
double complex, intent(in) :: rveig_in(inc%lmmaxso,inc%natypd)
double complex, intent(out) :: rveig_big(impcls%clmso)