Commit 7d92b7bb authored by Matthias Redies's avatar Matthias Redies

forgot to change one 1 to js

parent 9064365c
......@@ -56,7 +56,7 @@ CONTAINS
IF (ALLOCATED(grad%gr)) THEN
! Gradients for libxc
DO js=1,jspins
grad%gr(:,kt+i,js)=(/rhdr(i,js),rhdt(i,1),rhdf(i,js)/)
grad%gr(:,kt+i,js)=(/rhdr(i,js),rhdt(i,js),rhdf(i,js)/)
ENDDO
!contracted gradients for libxc
IF (ALLOCATED(grad%sigma)) THEN
......
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