<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
</head>
<body>
<p>If the problem is coming from the standard used, perhaps using
the -std=f2003, for example, will resolve the problem, refer to:<br>
</p>
<p><a class="moz-txt-link-freetext" href="https://gcc.gnu.org/onlinedocs/gcc-10.1.0/gfortran/Fortran-Dialect-Options.html#Fortran-Dialect-Options">https://gcc.gnu.org/onlinedocs/gcc-10.1.0/gfortran/Fortran-Dialect-Options.html#Fortran-Dialect-Options</a><br>
</p>
<p>Another possibility is that the <font color="#ff0000">.eq.</font>
in the if statement is problematic. It's a little surprising that
it even compiles as usually the .eq. works fine for ifort but does
not work for gfortran. For both ifort and gfortran to work, we
have been having to change .eq. to .eqv.:</p>
<a class="moz-txt-link-freetext" href="https://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/msg18770.html">https://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/msg18770.html</a><br>
<a class="moz-txt-link-freetext" href="https://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/msg11545.html">https://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/msg11545.html</a><br>
<a class="moz-txt-link-freetext" href="https://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/msg18762.html">https://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/msg18762.html</a><br>
<p>The information at the following links might be of interest:</p>
<a class="moz-txt-link-freetext" href="https://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/msg18767.html">https://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/msg18767.html</a><br>
<a class="moz-txt-link-freetext" href="https://gcc.gnu.org/onlinedocs/gcc-3.4.6/g77/Equivalence-Versus-Equality.html#Equivalence-Versus-Equality">https://gcc.gnu.org/onlinedocs/gcc-3.4.6/g77/Equivalence-Versus-Equality.html#Equivalence-Versus-Equality</a><br>
<a class="moz-txt-link-freetext" href="https://gcc.gnu.org/onlinedocs/gcc-10.1.0/gfortran/Bitwise-logical-operators.html#Bitwise-logical-operators">https://gcc.gnu.org/onlinedocs/gcc-10.1.0/gfortran/Bitwise-logical-operators.html#Bitwise-logical-operators</a><br>
<div class="moz-cite-prefix"><br>
</div>
<div class="moz-cite-prefix">On 5/9/2020 3:34 AM, Tran, Fabien
wrote:<br>
</div>
<blockquote type="cite" cite="mid:1589016890756.11293@tuwien.ac.at">
<pre class="moz-quote-pre" wrap="">If the suggestion of P. Blaha does not help, remove "doit= .true." and rewrite it manually. Maybe there is some hidden character which perturbs the line.
________________________________________
From: Wien <a class="moz-txt-link-rfc2396E" href="mailto:wien-bounces@zeus.theochem.tuwien.ac.at"><wien-bounces@zeus.theochem.tuwien.ac.at></a> on behalf of Peter Blaha <a class="moz-txt-link-rfc2396E" href="mailto:pblaha@theochem.tuwien.ac.at"><pblaha@theochem.tuwien.ac.at></a>
Sent: Saturday, May 9, 2020 8:57 AM
To: <a class="moz-txt-link-abbreviated" href="mailto:wien@zeus.theochem.tuwien.ac.at">wien@zeus.theochem.tuwien.ac.at</a>
Subject: Re: [Wien] compilation error - reg
Which version of gfortran are you using ?
Maybe the newest gfortran is "buggy" or is using some newest fortran
standard which has eliminated the default types of fortran.
My gfortran-8 compiles this without problem.
The offending statement:
ados.f:79:48:
79 | if(kpp<font color="#ff0000">.eq.</font>kselect.and.kselect.gt.0) doit= .true.
| 1
Error: Cannot convert LOGICAL(4) to REAL(4) at (1)
looks innocent to me. kpp and kselect are by default integers.
Maybe you can switch-off the 2018 standard somewhere, or try to enclose
the 2 parts of the if with further brackets like:
if((kpp<font color="#ff0000">.eq.</font>kselect).and.(kselect.gt.0)) doit= .true.
Am 09.05.2020 um 04:50 schrieb Viswanathan Elumalai:
</pre>
<blockquote type="cite">
<pre class="moz-quote-pre" wrap="">Dear Sir/Mam
Greetings
I had error while compiling the wien2k 19.2 version. I could not solve
it from my end. I searched in wien mail list, I did not see any report
in this regards. I copied the error message here and attached the
corresponding compile file.
SRC_tetra/compile.msg:Error: Cannot convert LOGICAL(4) to REAL(4) at (1)
SRC_tetra/compile.msg:make: *** [Makefile:108: ados.o] Error 1
I am looking forward your reply.
with best regards
Dr. Viswanathan Elumalai,
Assistant Professor in Physics
_______________________________________________
Wien mailing list
<a class="moz-txt-link-abbreviated" href="mailto:Wien@zeus.theochem.tuwien.ac.at">Wien@zeus.theochem.tuwien.ac.at</a>
<a class="moz-txt-link-freetext" href="http://zeus.theochem.tuwien.ac.at/mailman/listinfo/wien">http://zeus.theochem.tuwien.ac.at/mailman/listinfo/wien</a>
SEARCH the MAILING-LIST at: <a class="moz-txt-link-freetext" href="http://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/index.html">http://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/index.html</a>
</pre>
</blockquote>
<pre class="moz-quote-pre" wrap="">
--
Peter Blaha
Inst.Materials Chemistry
TU Vienna
Getreidemarkt 9
A-1060 Vienna
Austria
+43-1-5880115671</pre>
</blockquote>
<blockquote type="cite" cite="mid:1589016890756.11293@tuwien.ac.at">
</blockquote>
</body>
</html>