spin_expectationvalue Subroutine

public subroutine spin_expectationvalue(inc, nstates, rhod, rveig_atom, Spin_tot, Spin_atom)

Uses

Arguments

Type IntentOptional Attributes Name
type(inc_TYPE), intent(in) :: inc
integer, intent(in) :: nstates
double complex, intent(in) :: rhod(inc%lmmaxso,inc%lmmaxso,inc%natypd,4)
double complex, intent(in) :: rveig_atom(inc%lmmaxso,inc%natypd,nstates)
double complex, intent(out) :: Spin_tot(3,nstates)
double complex, intent(out), optional :: Spin_atom(3,inc%natypd,nstates)