From 00cde82ddc7bf169ddf0aa08bf1e503b5c5e4999 Mon Sep 17 00:00:00 2001
From: Daniel Wortmann <d.wortmann@fz-juelich.de>
Date: Wed, 22 May 2019 15:46:22 +0200
Subject: [PATCH] Update cdnval.F90 to fix bug in
 0b29595a324225ef5a4144c012da8936a0067f42

---
 cdn/cdnval.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cdn/cdnval.F90 b/cdn/cdnval.F90
index 5fcfd3ca..9df57a47 100644
--- a/cdn/cdnval.F90
+++ b/cdn/cdnval.F90
@@ -248,7 +248,7 @@ SUBROUTINE cdnval(eig_id, mpi,kpts,jspin,noco,input,banddos,cell,atoms,enpara,st
                CALL abcrot2(atoms,banddos,noccbd,eigVecCoeffs,ispin) ! rotate ab-coeffs
                IF (PRESENT(orbcomp)) CALL orb_comp(ispin,ikpt,noccbd,atoms,noccbd,usdus,eigVecCoeffs,orbcomp)
             END IF
-
+         ENDIF
          CALL calcDenCoeffs(atoms,sphhar,sym,we,noccbd,eigVecCoeffs,ispin,denCoeffs)
 
          IF (noco%l_soc) CALL orbmom(atoms,noccbd,we,ispin,eigVecCoeffs,orb)
-- 
GitLab