<div dir="ltr">Hello Jianxin, <div><br></div><div>The qmix8.F error was still present when I compiled version 13 on AIX 7.1. I also changed these manually.</div><div><br></div><div>With version 14 of xlf90, I did not see the loop error that you mentioned, however, I did see it with version 11 of xlf90 on AIX 6.1. I did not use -qalign or -qstrict. Maybe try without these? Also I recommend using the most aggressive optimization, O5. Testing the benchmark in serial it seems to have a significant benefit.</div>
<div><br></div><div style>The &#39;&amp;&#39; issue is still present in W2k13 for the SRC_hf files (several). I added these manually.</div><div style><br></div><div style>There are several other issues getting W2k to run in the AIX environment. A standard linux bc command and sleep command, for example. These can be installed with rpms. There is an issue with ESSL/Lapack naming of libraries that affects the mixer, so you should link lapack first (for the mixer only).</div>
<div style><br></div><div style>Oliver</div>
</div><div class="gmail_extra"><br><br><div class="gmail_quote">On Wed, Jul 31, 2013 at 9:52 PM, Gavin Abo <span dir="ltr">&lt;<a href="mailto:gsabo@crimson.ua.edu" target="_blank">gsabo@crimson.ua.edu</a>&gt;</span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
  
    
  
  <div text="#000000" bgcolor="#FFFFFF">
    <div>Try changing<br>
      <br>
      (/1:nr/)<br>
      <br>
      to<br>
      <br>
      
      
      
      
      
      
      
      
      
       (/ (i,i=1,nr) /)<br>
      <br>
      I believe the later is a more standard equivalent syntax.<div><div class="h5"><br>
      <br>
      On 7/31/2013 9:15 PM, Zhu, Jianxin wrote:<br>
    </div></div></div><div><div class="h5">
    <blockquote type="cite">
      
      <div>Hi Peter and Wien2k Users, </div>
      <div><br>
      </div>
      <div>When I install wien2k on a IBM Power 7 unit with xlf90_r
        etc., I see the following compilation errors ---</div>
      <div><br>
      </div>
      <div>1. In the more recent version like 12.1, a qmix8.F and SRC_hf
        folder are added to the package </div>
      <div><br>
      </div>
      <div>For qmix8.F, the error comes at lines like </div>
      <div><br>
      </div>
      <div>
        <div>               write(21,2121),XUSE,&#39; due to touching
          spheres&#39;</div>
        <div><br>
        </div>
        <div>So I manually changed it to </div>
        <div>                write(21,2121) XUSE,&#39; due to touching
          spheres&#39;</div>
      </div>
      <div><br>
      </div>
      <div>2. In the subdirectory of SRC_hf, the symptom of the error
        is </div>
      <div><br>
      </div>
      <div>xlf90_r -O3 -qalign -qstrict -q64 -qarch=auto -c
        calc_rhovalvxsl_tmp_.F</div>
      <div>&quot;calc_rhovalvxsl_tmp_.F&quot;, line 25.48: 1515-019 (S) Syntax is
        incorrect.</div>
      <div> </div>
      <div>corresponding to the source line </div>
      <div><br>
      </div>
      <div>
        <div>        r(1:nr) = r0(iat)*exp(dx(iat)*(dble((/1:nr/))-1d0))</div>
      </div>
      <div><br>
      </div>
      <div>I know that this way of coding is quite simpler but is not
        necessarily application to all compilers. </div>
      <div>For IBM XLF, can you suggest some option to recognize the
        above coding style?</div>
      <div>Otherwise, I will have to change it manually to a do-loop.</div>
      <div><br>
      </div>
      <div>Also, for the continuation of one line, for some executable
        statements, I need to provide a second &quot;&amp;&quot; sign like </div>
      <div><br>
      </div>
      <div>
        <div>        if ((nonself .eqv. .false.) .and. (diaghf .eqv.
          .false.)) &amp;</div>
        <div>           write(21,&#39;(&quot;:CCESUM    : &quot;,1x,f22.9,3X,&quot;(Ry)&quot;)&#39;)
          ccesum</div>
      </div>
      <div><br>
      </div>
      <div>---&gt;</div>
      <div><br>
      </div>
      <div>
        <div>        if ((nonself .eqv. .false.) .and. (diaghf .eqv.
          .false.)) &amp;</div>
        <div>       &amp;    write(21,&#39;(&quot;:CCESUM    :
          &quot;,1x,f22.9,3X,&quot;(Ry)&quot;)&#39;) ccesum</div>
      </div>
      <div><br>
      </div>
      <div>There are a lot of places ,where I have to do this. </div>
      <div>Is there a simple option for me to avoid manually changing
        the code?</div>
      <div><br>
      </div>
      <div>Thanks for sharing your experience. </div>
      <div><br>
      </div>
      <div>Cheers,</div>
      <div><br>
      </div>
      <div>Jianxin</div>
    </blockquote>
    <br>
  </div></div></div>

<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>
<br></blockquote></div><br></div>