Removed unused lines

Westpp/do_eigenpot2.f90

@@ -59,7 +59,7 @@ SUBROUTINE do_eigenpot2 ( )
      IF (gamma_only) THEN
         CALL pdep_db_read(westpp_n_pdep_eigen_to_use)
      ELSE
-        l_print_pdep_read = .FALSE.
+        !l_print_pdep_read = .FALSE.
         IF (iq==1) THEN 
            l_print_pdep_read = .TRUE.
         ELSE 

Wfreq/calc_exx2.f90

@@ -146,7 +146,7 @@ SUBROUTINE calc_exx2( sigma_exx, nb1, nb2 )
      !
      DO ib = nb1, nb2
         !
-        sigma_exx(ib,iks) = 0._DP
+        !sigma_exx(ib,iks) = 0._DP
         !
         IF (gamma_only) THEN
            CALL single_invfft_gamma(dffts,npw,npwx,evc(1,ib),psic,'Wave')