From f99b56f802e321a78200061542c308ce6d806a2f Mon Sep 17 00:00:00 2001
From: Frank Freimuth <f.freimuth@fz-juelich.de>
Date: Fri, 13 Sep 2019 18:48:44 +0200
Subject: [PATCH] Update wannier.F90

---
 wannier/wannier.F90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/wannier/wannier.F90 b/wannier/wannier.F90
index 2c2730e0..1760ad72 100644
--- a/wannier/wannier.F90
+++ b/wannier/wannier.F90
@@ -360,7 +360,8 @@ CONTAINS
 
     IF(wann%l_updown)THEN            
        CALL wann_updown(&
-            mpi,input,kpts,sym,atoms,stars,vacuum,sphhar,oneD,noco,cell,vTot,&
+            DIMENSION,mpi,input,kpts,sym,atoms,stars,vacuum,sphhar, &
+            oneD,noco,cell,vTot,&
             enpara,eig_idList(1),l_real,&
             mpi%mpi_comm,atoms%l_dulo,noco%l_noco,noco%l_ss,&
             atoms%lmaxd,atoms%ntype,DIMENSION%neigd,atoms%nat,sym%nop,&
-- 
GitLab