From 480748c5b8c57cb48347573a35832790df84fa5e Mon Sep 17 00:00:00 2001
From: Matthias Redies <m.redies@fz-juelich.de>
Date: Fri, 15 Nov 2019 11:23:23 +0100
Subject: [PATCH] remove debugging output

---
 main/mix.F90 | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/main/mix.F90 b/main/mix.F90
index 91b3a81e..5e152c2b 100644
--- a/main/mix.F90
+++ b/main/mix.F90
@@ -72,7 +72,6 @@ contains
           inDen%mmpMat=outDen%mmpMat
        ENDIF
     ENDIF
-    print *,"A:",mpi%irank,maxval(abs(inden%mmpmat))
 
     CALL timestart("Reading of distances")
     CALL mixvector_init(mpi%mpi_comm,l_densitymatrix,oneD,input,vacuum,noco,sym,stars,cell,sphhar,atoms)
@@ -96,7 +95,6 @@ contains
        CALL timestop("Preconditioner")
     END IF
     if (atoms%n_u>0.and.mpi%irank.ne.0.and.input%ldaulinmix) inden%mmpMat=0.0
-    print *,"A2:",mpi%irank,maxval(abs(inden%mmpmat))
     CALL timestart("Mixing")
     !mixing of the densities
     SELECT CASE(input%imix)
@@ -132,8 +130,6 @@ contains
     END SELECT
     CALL timestop("Mixing")
 
-    print *,"B:",mpi%irank,maxval(abs(inden%mmpmat))
-
     CALL timestart("Postprocessing")
     !extracte mixed density
     inDen%pw=0.0;inDen%mt=0.0
@@ -187,7 +183,6 @@ contains
     IF (l_writehistory.AND.input%imix.NE.0) CALL mixing_history_close(mpi)
 
     CALL timestop("Postprocessing")
-  print *,"C:",mpi%irank,maxval(abs(inden%mmpmat))
 
     CALL timestop("Charge Density Mixing")
   END SUBROUTINE mix_charge
-- 
GitLab