calc_orbitalmoment Subroutine

public subroutine calc_orbitalmoment(lmax, lmmaxd, loperator)

Uses

Calculation of the orbital moment

Arguments

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

Maximum l component in wave function expansion

integer, intent(in) :: lmmaxd

(KREL+KORBIT+1)(LMAX+1)*2

complex(kind=dp), intent(out), dimension (lmmaxd, lmmaxd, 3) :: loperator