Commit 69d9db68 authored by Matthias Redies's avatar Matthias Redies

fix uninitialized variable

parent 46cf79c2
...@@ -132,7 +132,7 @@ CONTAINS ...@@ -132,7 +132,7 @@ CONTAINS
DO jsp = 1,MERGE(1,input%jspins,noco%l_noco) DO jsp = 1,MERGE(1,input%jspins,noco%l_noco)
k_loop:DO nk_i = 1,size(mpi%k_list) k_loop:DO nk_i = 1,size(mpi%k_list)
nk=mpi%k_list(i) nk=mpi%k_list(nk_i)
! Set up lapw list ! Set up lapw list
CALL lapw%init(input,noco, kpts,atoms,sym,nk,cell,l_zref, mpi) CALL lapw%init(input,noco, kpts,atoms,sym,nk,cell,l_zref, mpi)
call timestart("Setup of H&S matrices") call timestart("Setup of H&S matrices")
......
  • @wortmann did you mean do do this? This fixes the bugs in a sequental compilation and some mpi tests.

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