
<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">Dear QE developers,<div><span class="Apple-tab-span" style="white-space:pre">       </span>the commit number #8183 introduced some changes in the module control_ph [*]. These changes reflect in a compilation error of GWW/head [**]. I noticed this because when I align the GPU branch I usually rebuild all the package (make all). I am working with an updated copy of the trunk.  Is this normal?</div><div><div><br></div><div>Can someone more expert than me double-check this issue? (-:</div><div><br></div><div>Many thanks!</div><div><br></div><div>F.</div><div><br></div><div>[*]</div><div><div><font class="Apple-style-span" face="'Courier New'">Index: phcom.f90</font></div><div><font class="Apple-style-span" face="'Courier New'">===================================================================</font></div><div><font class="Apple-style-span" face="'Courier New'">--- phcom.f90<span class="Apple-tab-span" style="white-space:pre">      </span>(revision 8158)</font></div><div><font class="Apple-style-span" face="'Courier New'">+++ phcom.f90<span class="Apple-tab-span" style="white-space:pre">      </span>(revision 8183)</font></div><div><font class="Apple-style-span" face="'Courier New'">@@ -299,6 +299,7 @@</font></div><div><font class="Apple-style-span" face="'Courier New'">               time_now,          & ! CPU time up to now</font></div><div><font class="Apple-style-span" face="'Courier New'">               alpha_pv             ! the alpha value for shifting the bands</font></div><div><font class="Apple-style-span" face="'Courier New'">   CHARACTER(LEN=10)  :: where_rec='no_recover'! where the ph run recovered</font></div><div><font class="Apple-style-span" face="'Courier New'">+  CHARACTER(LEN=12) :: electron_phonon</font></div><div><font class="Apple-style-span" face="'Courier New'">   CHARACTER(LEN=256) :: flmixdpot, tmp_dir_ph, tmp_dir_phq</font></div><div><font class="Apple-style-span" face="'Courier New'">   CHARACTER(LEN=256)  :: dvscf_dir</font></div><div><font class="Apple-style-span" face="'Courier New'">   INTEGER :: rec_code,    &! code for recover</font></div><div><font class="Apple-style-span" face="'Courier New'">@@ -309,8 +310,6 @@</font></div><div><font class="Apple-style-span" face="'Courier New'">              epsil,       &! if .TRUE. computes dielec. const and eff. charges</font></div><div><font class="Apple-style-span" face="'Courier New'">              done_epsil=.FALSE.,  &! .TRUE. when diel. constant is available</font></div><div><font class="Apple-style-span" face="'Courier New'">              trans,       &! if .TRUE. computes phonons</font></div><div><font class="Apple-style-span" face="'Courier New'">-             elph,        &! if .TRUE. computes electron-ph interaction coeffs</font></div><div><font class="Apple-style-span" face="'Courier New'">-             elph_mat,    &! if .TRUE. eph coefficients for Wannier.</font></div><div><font class="Apple-style-span" face="'Courier New'">              zue,         &! if .TRUE. computes eff. charges as induced polarization</font></div><div><font class="Apple-style-span" face="'Courier New'">              done_zue=.FALSE., &! .TRUE. when the eff. charges are available</font></div><div><font class="Apple-style-span" face="'Courier New'">              zeu,         &! if .TRUE. computes eff. charges as induced forces</font></div><div><br></div><div><br></div><div>[**]</div><div><div><font class="Apple-style-span" face="'Courier New'">make[2]: Leaving directory `/home/fspiga/QE/espresso/GWW/pw4gww'</font></div><div><font class="Apple-style-span" face="'Courier New'">cd head ; make all</font></div><div><font class="Apple-style-span" face="'Courier New'">make[2]: Entering directory `/home/fspiga/QE/espresso/GWW/head'</font></div><div><font class="Apple-style-span" face="'Courier New'">test -n "" && ( cd ../.. ; make -w  || exit 1) || :</font></div><div><font class="Apple-style-span" face="'Courier New'">mpif90 -O2 -assume byterecl -g -traceback -par-report0 -vec-report0 -openmp -nomodule -fpp -D__INTEL -D__FFTW -D__MPI -D__PARA -D__OPENMP -I../../include -I../../iotk/src -I../../Modules -I../../PHonon/PH -I../../PW -I../pw4gww -I. -c head.f90</font></div><div><font class="Apple-style-span" face="'Courier New'">mpif90 -O2 -assume byterecl -g -traceback -par-report0 -vec-report0 -openmp -nomodule -fpp -D__INTEL -D__FFTW -D__MPI -D__PARA -D__OPENMP -I../../include -I../../iotk/src -I../../Modules -I../../PHonon/PH -I../../PW -I../pw4gww -I. -c bcast_ph_input.f90</font></div><div><font class="Apple-style-span" face="'Courier New'">bcast_ph_input.f90(24): error #6580: Name in only-list does not exist.   [ELPH]</font></div><div><font class="Apple-style-span" face="'Courier New'">                         ldisp, lnscf, elph, reduce_io, zue, epsil, trans, &</font></div><div><font class="Apple-style-span" face="'Courier New'">---------------------------------------^</font></div><div><font class="Apple-style-span" face="'Courier New'">bcast_ph_input.f90(51): error #6404: This name does not have a type, and must have an explicit type.   [ELPH]</font></div><div><font class="Apple-style-span" face="'Courier New'">  call mp_bcast (elph, ionode_id )</font></div><div><font class="Apple-style-span" face="'Courier New'">-----------------^</font></div><div><font class="Apple-style-span" face="'Courier New'">bcast_ph_input.f90(51): error #6285: There is no matching specific subroutine for this generic subroutine call.   [MP_BCAST]</font></div><div><font class="Apple-style-span" face="'Courier New'">  call mp_bcast (elph, ionode_id )</font></div><div><font class="Apple-style-span" face="'Courier New'">-------^</font></div><div><font class="Apple-style-span" face="'Courier New'">compilation aborted for bcast_ph_input.f90 (code 1)</font></div><div><font class="Apple-style-span" face="'Courier New'">make[2]: *** [bcast_ph_input.o] Error 1</font></div><div><font class="Apple-style-span" face="'Courier New'">make[2]: Leaving directory `/home/fspiga/QE/espresso/GWW/head'</font></div><div><font class="Apple-style-span" face="'Courier New'">make[1]: *** [heada] Error 2</font></div><div><font class="Apple-style-span" face="'Courier New'">make[1]: Leaving directory `/home/fspiga/QE/espresso/GWW'</font></div><div><font class="Apple-style-span" face="'Courier New'">make: *** [gww] Error 2</font></div></div><div><br></div><div><br></div><div>

-- <br>Mr. Filippo SPIGA, Computational Scientist, <filippo.spiga_at_ichec.ie><br>Irish Centre for High-End Computing (ICHEC) - <a href="http://www.ichec.ie">www.ichec.ie</a><br>The Tower - Trinity Technology & Enterprise Campus<br>Grand Canal Quay - Dublin 2 - Ireland<br><br>Tel: +353-1-5241608 ex. 40     ~  Mob: +353-85-816-8710<br>website: <a href="http://filippospiga.me">http://filippospiga.me</a>  ~  skype: filippo.spiga<br><br>ŤNobody will drive us out of Cantor's paradise.ť ~ David Hilbert<br><br><br>

</div>

<br></div></div></body></html>