Commit 5eef93e7 authored by Matthias Redies's avatar Matthias Redies

small bugfix

parent bc9b9653
......@@ -158,9 +158,9 @@ CONTAINS
call ex_to_vx(fi, nk, jsp, nsymop, psym, hybdat, lapw, z_k, ex, hybdat%v_x(nk, jsp))
call hybdat%v_x(nk, jsp)%u2l()
hybdat%l_addhf = .True.
endif
call hybdat%v_x(nk,jsp)%bcast(0, k_pack%submpi%comm)
hybdat%l_addhf = .True.
CALL timestop("total time hsfock")
END SUBROUTINE hsfock
END MODULE m_hsfock
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