scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Compilation problem in GWW 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@8252 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2011-11-18 17:17:08 +00:00
parent a423663e90
commit 6999bf46cc
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
GWW/head/bcast_ph_input.f90
View File

@ -21,8 +21,8 @@ subroutine bcast_ph_input ( )
use mp, only: mp_bcast
USE control_ph, ONLY : start_irr, last_irr, start_q, last_q, nmix_ph, &
niter_ph, lnoloc, alpha_mix, tr2_ph, lrpa, recover, &
ldisp, lnscf, elph, reduce_io, zue, epsil, trans, &
lgamma, nogg
ldisp, lnscf, reduce_io, zue, epsil, trans, lgamma, &
nogg
USE gamma_gamma, ONLY : asr
USE disp, ONLY : nq1, nq2, nq3
USE freq_ph, ONLY : fpol, nfs, fiu
@ -38,6 +38,7 @@ subroutine bcast_ph_input ( )
!#ifdef __GWW
USE wannier_gw, ONLY : l_head, omega_gauss, n_gauss, grid_type
!#endif __GWW
USE el_phon, ONLY : elph
implicit none
!