Commit f049ac93 authored by Gregor Michalicek's avatar Gregor Michalicek

Small bugfix for previous commit

parent 900d82c0
......@@ -72,7 +72,7 @@ CONTAINS
WRITE(attributes(6),'(f15.8)') jParam
CALL writeXMLElementMatrixPoly('densityMatrixFor',&
(/'spin ','atomType','uIndex ','l ','U ','J '/),&
attributes,n_mmp_new(-l:l,-l:l,atoms%n_u,jsp))
attributes,n_mmp_new(-l:l,-l:l,i_u,jsp))
END DO
END DO
CALL closeXMLElement('ldaUDensityMatrix')
......
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