Commit c5d06a8a authored by Frank Freimuth's avatar Frank Freimuth

Update wann_updown.F

parent 32e3ead3
......@@ -274,8 +274,8 @@ c..wf-hamiltonian in real space (hopping in the same unit cell)
TYPE(t_mat) :: zMat(2),zzMat(2)
TYPE(t_lapw) :: lapw
IF(l_ss) CALL juDFT_error("spin-spiral not yet in this version"
+ ,calledby ="wann_updown")
! IF(l_ss) CALL juDFT_error("spin-spiral not yet in this version"
! + ,calledby ="wann_updown")
c-----initializations
time_interstitial=0.0
......
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