From 61d66dbcd13654ac8ff61817b2ce59e5730a2779 Mon Sep 17 00:00:00 2001 From: Daniel Wortmann Date: Tue, 27 Nov 2018 09:42:25 +0100 Subject: [PATCH] Bugfix for commit d53aa089 --- main/vgen.F90 | 6 ------ 1 file changed, 6 deletions(-) diff --git a/main/vgen.F90 b/main/vgen.F90 index b4682f6d..d7b7f60c 100644 --- a/main/vgen.F90 +++ b/main/vgen.F90 @@ -81,12 +81,6 @@ CONTAINS CALL vCoul%copy_both_spin(vTot) vCoul%mt(:,:,:,input%jspins)=vCoul%mt(:,:,:,1) - DO ispin = 1, input%jspins - DO i = 1, stars%ng3 - vcoul%pw(i,ispin) = vcoul%pw(i,ispin) / stars%nstr(i) - vcoul%pw_w(i,ispin) = vcoul%pw_w(i,ispin) / stars%nstr(i) !this normalization is needed for gw - END DO - END DO IF (noco%l_noco) THEN CALL denRot%init(stars,atoms,sphhar,vacuum,input%jspins,noco%l_noco,0) -- GitLab