Removed test-output

source/voronoi/genpotstart12.f

@@ -210,8 +210,6 @@ c
             IRMTOUT = IRWS(ISITE) - MESHN(ID)
             IRNSOUT = IRNS(ISITE)  ! 22.1.12 Changed from IRNS(ID) to IRNS(IAT)
 
-            write(*,*) 'KSHAPE=', KSHAPE
-
             IF (KSHAPE.EQ.0) THEN
                BOUT = RMAXOUT / (EXP(AOUT*REAL(IRWSOUT-1))-1.0D0)
                DO IR=2,IRWSOUT
@@ -227,7 +225,6 @@ c
                RMAXOUT = ROUT(IRWSOUT)
             ELSE
                BOUT = RMTOUT /  (EXP(AOUT*REAL(IRMTOUT-1))-1.0D0)
-               write(4444,*) 'BOUT1', BOUT
                DO IR=2,IRMTOUT
                   EA = EXP(AOUT*REAL(IR-1))
                   ROUT(IR) = BOUT* (EA-1.0D0)

source/voronoi/maindriver12.f

@@ -333,7 +333,6 @@ c
      &     TLEFT,TRIGHT,LINTERFACE,RCUTZ,RCUTXY,RMTCORE,
      &     LMTREF,RMTREF,SIZEFAC,NFACELIM)
 
-      write(4444,*) 'KSHAPE', KSHAPE
 
 
       CALL LATTIX12(LINTERFACE,ALATC,BRAVAIS,RECBV,RR,NR,VOLUC)   

source/voronoi/ritesone.f

@@ -54,7 +54,6 @@ c -------------------------------------------------------------------
       INEW  = 1
 c
 c
-          write(4444,*) 'BOUT2', B
           LMPOT = (LPOT+1)* (LPOT+1)
 
           RMT1 = RMT