Commit 3c46b9cb authored by Frank Freimuth's avatar Frank Freimuth

Update wann_wannierize.F

parent 1d1cd819
......@@ -199,6 +199,7 @@ c**********************************************************
! enddo
! endif
num_kpts=fullnkpts
nkpts=fullnkpts
allocate(ndimwin(num_kpts))
c*********************************************************
c find out the structure of k-point set
......
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