Commit fe479930 authored by Marco Govoni's avatar Marco Govoni
Browse files

Removed unused lines

parent f4c0cdb0
......@@ -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
......
......@@ -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')
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment