<div dir="ltr">I think Vaclav Petricek has to look into this.<div><br></div><div>The "EQ" versus "EQV" is a standard thing where gfortran is being picky.</div><div><br></div><div>I tried to find information about the Fw.d format descriptor. It appears that in Fortran 77 is was OK (stated as such) to omit the "w.d" part but I cannot find any specific statement on this for Fortran 90 or 95. Because there is nothing specific it was probably up to programmers to decide what to do, and obviously gfortran decided that the w.d was required.</div><div><br></div><div>The biggest issue I can see is the Warning for line 1313. I am 99.9% certain that a line</div><div><div> implicit real*8 (a-h,o-z)</div></div><div><br></div><div>should be inserted in logical function eqrv (e.g. as line 1457). As currently structured that subroutine only compares the first ndim/2 values of sp and s6(1,k) and I suspect that it supposed to compare all of them.</div><div><br></div><div>N.B., I have never used this code so I am only making intelligent guesses.</div><div><br></div></div><div class="gmail_extra"><br><div class="gmail_quote">On Thu, Oct 9, 2014 at 8:30 AM, Priyanka Seth <span dir="ltr"><<a href="mailto:priyanka.seth@cpht.polytechnique.fr" target="_blank">priyanka.seth@cpht.polytechnique.fr</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Dear Wien2k users and developers,<br>
<br>
I have been trying to install the 14.1 version of the code on the<br>
machines that I use, but have struggled when using gfortran+gcc while<br>
installation on ifort+mkl combination works beautifully.<br>
<br>
More specifically, I am installing sequentially on Ubuntu 14.04 machines<br>
with standard lapack and blas, gfortran and gcc (I have tried both<br>
versions 4.8 and 4.9 unsuccessfully). I have chosen the siteconfig_lapw<br>
settings as follows:<br>
<br>
OPTIONS:<br>
current:FOPT:-ffree-form -O2 -ffree-line-length-none<br>
current:FPOPT:$(FOPT)<br>
current:FFTW_OPT:<br>
current:FFTW_LIBS:<br>
current:LDFLAGS:$(FOPT) -L/usr/lib/libblas -L/usr/lib/lapack<br>
current:DPARALLEL:'-DParallel'<br>
current:R_LIBS:-llapack -lblas<br>
current:RP_LIBS:-lmkl_scalapack -lmkl_blacs_lp64 -L/opt/local/fftw/lib/<br>
-lfftw_mpi -lfftw $(R_LIBS)<br>
current:MPIRUN:mpirun -np _NP_ -machinefile _HOSTS_ _EXEC_<br>
current:MKL_TARGET_ARCH:<br>
<br>
SYSTEM:<br>
linuxgfortran<br>
<br>
COMPILER:<br>
gfortran<br>
<br>
COMPILERC:<br>
gcc<br>
<br>
The very odd thing is that using exactly the same setup for WIEN2K<br>
version 13.1 allows compilation without any problems. For version 14.01<br>
however, I get the following problems:<br>
<br>
SRC_lapw0:<br>
pwxad5.f:22.9:<br>
<br>
IF(GGA_SWITCH .EQ. .true.) THEN<br>
1<br>
Error: Logicals at (1) must be compared with .eqv. instead of .eq.<br>
make[1]: *** [pwxad5.o] Error 1<br>
<br>
<br>
SRC_Tmaker:<br>
rm -f Tmaker.o<br>
clean<br>
gfortran -c -ffree-form -O2 -ffree-line-length-none Tmaker.f<br>
Tmaker.f:485.19:<br>
<br>
1007 FORMAT(20X,F,F,F)<br>
1<br>
Error: Nonnegative width required in format string at (1)<br>
Tmaker.f:493.19:<br>
<br>
1025 FORMAT(24X,F,F,F)<br>
1<br>
Error: Nonnegative width required in format string at (1)<br>
Tmaker.f:55.21:<br>
<br>
READ(10,1025) alpha,beta,gamma<br>
1<br>
Error: FORMAT label 1025 at (1) not defined<br>
Tmaker.f:55.21:<br>
<br>
READ(10,1025) alpha,beta,gamma<br>
1<br>
Error: FORMAT label 1025 at (1) not defined<br>
Tmaker.f:249.21:<br>
<br>
READ(10,1007) xp,yp,zp<br>
1<br>
Error: FORMAT label 1007 at (1) not defined<br>
Tmaker.f:1313.20:<br>
<br>
if(Eqrv(sp,s6(1,k),ndim,.0001)) then<br>
1<br>
Warning: Type mismatch in argument 'a' at (1); passed REAL(8) to REAL(4)<br>
Tmaker.f:249.21:<br>
<br>
READ(10,1007) xp,yp,zp<br>
1<br>
Error: FORMAT label 1007 at (1) not defined<br>
make: *** [Tmaker.o] Error 1<br>
<br>
<br>
<br>
Looking into the files with .EQ., it seems that not much has changed<br>
between 13.1 and 14.1. I know it is possible to simply replace EQ with<br>
EQV, but I am surprised that with the same system setup and compiler, it<br>
is a problem for one system and not another. Any ideas why?<br>
<br>
Many thanks for your help,<br>
Priyanka Seth<br>
_______________________________________________<br>
Wien mailing list<br>
<a href="mailto:Wien@zeus.theochem.tuwien.ac.at">Wien@zeus.theochem.tuwien.ac.at</a><br>
<a href="http://zeus.theochem.tuwien.ac.at/mailman/listinfo/wien" target="_blank">http://zeus.theochem.tuwien.ac.at/mailman/listinfo/wien</a><br>
SEARCH the MAILING-LIST at: <a href="http://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/index.html" target="_blank">http://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/index.html</a><br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><div dir="ltr">Professor Laurence Marks<br>Department of Materials Science and Engineering<br>Northwestern University<br><a href="http://www.numis.northwestern.edu" target="_blank">www.numis.northwestern.edu</a><div>Corrosion in 4D: <a href="http://MURI4D.numis.northwestern.edu" target="_blank">MURI4D.numis.northwestern.edu</a><br>Co-Editor, Acta Cryst A<br>"Research is to see what everybody else has seen, and to think what nobody else has thought"<br>Albert Szent-Gyorgi</div></div>
</div>