diff --git a/GIPAW/init_gipaw_1.f90 b/GIPAW/init_gipaw_1.f90 index 9603399bf..83599b784 100644 --- a/GIPAW/init_gipaw_1.f90 +++ b/GIPAW/init_gipaw_1.f90 @@ -128,7 +128,7 @@ subroutine init_gipaw_1 nrc = COUNT ( rgrid(nt)%r(1:msh(nt)) <= rc ) nrs = COUNT ( rgrid(nt)%r(1:msh(nt)) <= rs ) ! - write(stdout,*) "ZZZ: ", rc, rs, nrc, nrs +! write(stdout,*) "ZZZ: ", rc, rs, nrc, nrs ! IF ( nrc < 1 .OR. nrc > msh(nt) ) & CALL errore ( "init_gipaw_1", "impossible value for nrc", 1 )