Commit 18181c5e authored by Robin Hilgers's avatar Robin Hilgers

Changed Flipcdn

parent fa5c683f
......@@ -162,7 +162,9 @@ END DO
IF (input%l_removeMagnetisationFromInterstitial) THEN
!!This Segment takes care that no interstitial magnetization is written in the the density. Meaning: Off diagonal elements of density matrix set to 0 and diagonal elements of density matrix are equal to each other.
den(:,:,:,2)=den(:,:,:,1)
den(:,:,:,3)=0.0
den(:,:,:,4)=0.0
END IF
! write the spin-polarized 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