Removed comments.

844c9536 · Marco Govoni · 63d77a0e · 844c9536
Commit 844c9536 authored Nov 28, 2017 by Marco Govoni
--- a/Hamiltonian_kernel/apply_alpha_pv_to_m_wfcs.f90
+++ b/Hamiltonian_kernel/apply_alpha_pv_to_m_wfcs.f90
@@ -63,8 +63,6 @@ SUBROUTINE apply_alpha_pv_to_m_wfcs(nbndval,m,f,g,alpha)
     !
  ENDIF
  !
-  ! alpha * sum_ibnd {| evc_ibnd > < evc_ibnd |} | f > = alpha * P_v | f >
-  !
  CALL ZGEMM('N','N',npwx*npol,m,nbndval,alpha,evc,npwx*npol,ps_c,nbndval,(1._DP,0._DP),g,npwx*npol)
  !
  IF( gamma_only ) THEN