Commit 8cbe3b01 authored by Daniel Wortmann's avatar Daniel Wortmann

Bugfix in calculation of orbital moments with SOC+LO

parent 1621aa59
......@@ -754,7 +754,7 @@ CONTAINS
IF (noco%l_soc) THEN
CALL orbmom(atoms,noccbd, we,acof(:,0:,:,ispin),bcof(:,0:,:,ispin),&
ccof(-atoms%llod:,:,:,:,ispin), orb(0:,-atoms%lmaxd:,:,ispin),orbl(:,-atoms%llod:,:,ispin),&
orblo(:,:,-atoms%llod,:,ispin) )
orblo(:,:,-atoms%llod:,:,ispin) )
ENDIF
! -soc
!---> non-spherical m.t. density
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment