Commit 00ecb357 authored by Henning Janssen's avatar Henning Janssen

Found another inconsistent l_real switch

parent 302ec059
......@@ -202,7 +202,7 @@ CONTAINS
noco%l_noco,.true.,l_real,noco%l_soc,.false.,mpi%n_size)
#ifdef CPP_CHASE
CALL init_chase(mpi,input,atoms,kpts,noco,sym%invs.AND..NOT.noco%l_noco)
CALL init_chase(mpi,input,atoms,kpts,noco,l_real)
#endif
! Open/allocate eigenvector storage (end)
......
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