<html>
  <head>
    <meta http-equiv="Content-Type" content="text/html;
      charset=windows-1252">
  </head>
  <body>
    <p><font face="Times New Roman">I made a mistake.  What I suggest
        trying is:<br>
      </font></p>
    <p><font face="Times New Roman">198   format(<font color="#ff0000">i3,i3,i4</font>,e14.6,'
        nmod, nsp, natorb,', &<br>
                     ' muB*Bext (Ry), spin ',a4)<br>
      </font></p>
    <p>1. Backup your calculation files first.</p>
    <p>2. Then, I put a patch that you may test at
      <a class="moz-txt-link-freetext" href="https://github.com/gsabo/WIEN2k-Patches/tree/master/19.1">https://github.com/gsabo/WIEN2k-Patches/tree/master/19.1</a> that can
      be applied with the following.<br>
    </p>
    <p>username@computername:~$ cd $WIENROOT/SRC_orb<br>
      username@computername:~/WIEN2k/SRC_orb$ wget
<a class="moz-txt-link-freetext" href="https://raw.githubusercontent.com/gsabo/WIEN2k-Patches/master/19.1/init.patch">https://raw.githubusercontent.com/gsabo/WIEN2k-Patches/master/19.1/init.patch</a><br>
      ...      <br>
      2019-11-14 01:47:40 (3.73 MB/s) - ‘init.patch’ saved [117/117]<br>
      <br>
      username@computername:~/WIEN2k/SRC_orb$ patch -b init.f init.patch
      <br>
      patching file init.f<br>
      username@computername:~/WIEN2k/SRC_orb$ cd ..<br>
      username@computername:~/WIEN2k$ siteconfig<br>
      ...<br>
        Selection: R<br>
      ...<br>
           Selection: S<br>
         Which program to recompile? orb<br>
      ...<br>
      Compile time errors (if any) were:<br>
      <br>
      <br>
      Check file   compile.msg   in the corresponding SRC_* directory
      for the <br>
      compilation log and more info on any compilation problem.<br>
      ...<br>
        Selection: Q<br>
    </p>
    <p><br>
    </p>
    <div class="moz-cite-prefix">On 11/13/2019 7:49 PM, Gavin Abo wrote:<br>
    </div>
    <blockquote type="cite"
      cite="mid:59e6c177-91c4-f420-708e-3399098df2c6@crimson.ua.edu">
      <meta http-equiv="Content-Type" content="text/html;
        charset=windows-1252">
      <p>It looks like what you have reported affects WIEN2k 17.1 -
        19.1.  Have you tried changing SRC_orb\init.f followed by
        recompiling to see if that fixes the problem or not?  In other
        words, you might just need to change i3 to i4 [1].<br>
      </p>
      <p>      write(12,<font color="#0000ff">198</font>)<font
          color="#ff0000">nmod,nup,natorb</font>,Bexten,spin(nup)<br>
      </p>
      <p><font color="#0000ff">198</font>   format(<font color="#ff0000">3i3</font>,e14.6,'
        nmod, nsp, natorb,', &<br>
                     ' muB*Bext (Ry), spin ',a4)<br>
      </p>
      <p><font color="#0000ff">198</font>   format(<font color="#ff0000">i3,i4,i3</font>,e14.6,'
        nmod, nsp, natorb,', &<br>
                     ' muB*Bext (Ry), spin ',a4)<br>
      </p>
      <p>[1]
        <a class="moz-txt-link-freetext"
href="https://software.intel.com/en-us/fortran-compiler-developer-guide-and-reference-format-specifications"
          moz-do-not-send="true">https://software.intel.com/en-us/fortran-compiler-developer-guide-and-reference-format-specifications</a><br>
      </p>
      <div class="moz-cite-prefix">On 11/13/2019 4:49 PM, Hernandez,
        Sarah Christine wrote:<br>
      </div>
      <blockquote type="cite"
        cite="mid:04e01de478674f59b596cc4ad58f39b5@lanl.gov">
        <meta http-equiv="Content-Type" content="text/html;
          charset=windows-1252">
        <meta name="Generator" content="Microsoft Word 15 (filtered
          medium)">
        <style><!--
/* Font Definitions */
@font-face
        {font-family:"Cambria Math";
        panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
        {font-family:Calibri;
        panose-1:2 15 5 2 2 2 4 3 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0in;
        margin-bottom:.0001pt;
        font-size:11.0pt;
        font-family:"Calibri",sans-serif;}
a:link, span.MsoHyperlink
        {mso-style-priority:99;
        color:#0563C1;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {mso-style-priority:99;
        color:#954F72;
        text-decoration:underline;}
span.EmailStyle17
        {mso-style-type:personal-compose;
        font-family:"Calibri",sans-serif;
        color:windowtext;}
.MsoChpDefault
        {mso-style-type:export-only;
        font-family:"Calibri",sans-serif;}
@page WordSection1
        {size:8.5in 11.0in;
        margin:1.0in 1.0in 1.0in 1.0in;}
div.WordSection1
        {page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
        <div class="WordSection1">
          <p class="MsoNormal">Hello!<o:p></o:p></p>
          <p class="MsoNormal"><o:p> </o:p></p>
          <p class="MsoNormal">I wanted to bring to your attention a bug
            in WIEN2k. I haven’t upgraded to the newest version and
            maybe this has been fixed, but I would like to bring it to
            your attention. I am currently using version 17.1. <o:p></o:p></p>
          <p class="MsoNormal"><o:p> </o:p></p>
          <p class="MsoNormal">I have been trying to run a 107 atom
            system with SOC and orbital polarization. When the “x orb
            –up” and “x orb –dn” commands are invoked  the *.vorbup and
            *.vorbdn files read at the top “2  1107  0.000000E+00 nmod,
            nsp, natorb, muB*Bext (Ry), spin up” and ”2 -1107 
            0.000000E+00 nmod, nsp, natorb, muB*Bext (Ry), spin down,”
            respectively. This can easily be fixed if there is a space
            between the 1 and 107, such that it reads “2 1 107 
            0.000000E+00 nmod, nsp, natorb, muB*Bext (Ry), spin up.” I
            have tried this small fix and I am able to finish the SCF
            cycle without getting an error in lapwso –up -orb, but it is
            bothersome to fix it every time before it reaches lapwso –up
            –orb.<o:p></o:p></p>
          <p class="MsoNormal"><o:p> </o:p></p>
          <p class="MsoNormal">Please let me know if this has been fixed
            in the most updated version 19.1, if you will consider
            fixing this in a future version, or if there is another fix
            instead of me manually putting in the space while it is
            running.<o:p></o:p></p>
          <p class="MsoNormal"><o:p> </o:p></p>
          <p class="MsoNormal">Thank you,<o:p></o:p></p>
          <p class="MsoNormal">Sarah Hernandez  <o:p></o:p></p>
          <p class="MsoNormal"><o:p> </o:p></p>
          <p class="MsoNormal"><o:p> </o:p></p>
          <p class="MsoNormal">Sarah C. Hernandez, Ph.D.<o:p></o:p></p>
          <p class="MsoNormal">Los Alamos National Laboratory<o:p></o:p></p>
          <p class="MsoNormal">MST-16: Nuclear Materials Science<o:p></o:p></p>
          <p class="MsoNormal">P.O. Box 1663 MS E574<o:p></o:p></p>
          <p class="MsoNormal">Los Alamos, NM  87545<o:p></o:p></p>
          <p class="MsoNormal">Office: 505-667-9520<o:p></o:p></p>
          <p class="MsoNormal">Cell: 505-500-2788</p>
        </div>
      </blockquote>
      <blockquote type="cite"
        cite="mid:04e01de478674f59b596cc4ad58f39b5@lanl.gov"> </blockquote>
    </blockquote>
  </body>
</html>