<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<p>My previous email was rather misshaped by the mail client. I hope
you can read this one more clearly. Please apologize.<br>
</p>
In $WIENROOT/SRC_kgen there is a file wn_readbakgen.f which may be
compiled in order to substitute the corresponding executable in the
XCrySDen distribution ($XCRYSDEN_TOPDIR/bin/wn_readbakgen).<br>
<br>
However the file supplied in SRC_kgen leads to compile errors:<br>
<br>
lines 110,111<br>
<br>
<tt> read(line,'(43x,i7,err=111)') nkpt</tt><br>
<i><font color="#990000">error:
invalid character in format list</font></i><br>
<tt> goto 112
</tt><br>
<font color="#990000"><i>error:
label is not defined</i></font><br>
<tt> 111 read(line,'(44x,i6)') nkpt ! old format</tt><br>
<br>
With the following slight modifications, compilation and execution
works:<br>
<br>
<tt> read(line,'(43x,i7)',err=111) nkpt <font
color="#990000">!</font></tt><font color="#990000"><i> modified
line 110</i></font><i><tt><br>
</tt></i><tt> goto 112</tt><tt><br>
</tt><tt> 111 read(line,'(44x,i6)') nkpt ! old format</tt><tt><br>
</tt><tt> 112 continue </tt><font
color="#990000">! <i>added line</i></font><br>
<br>
Best regards,<br>
<br>
Ulrich<br>
<br>
<pre class="moz-signature">--
-----------------------------------------------------------------
Dr. Ulrich Wedig Tel. 0711/6891535
Max-Planck-Institut fuer Festkoerperforschung FAX 0711/6891502
Heisenbergstr. 1
70569 Stuttgart <a class="moz-txt-link-abbreviated" href="mailto:U.Wedig@fkf.mpg.de" moz-do-not-send="true">U.Wedig@fkf.mpg.de</a>
-----------------------------------------------------------------
</pre>
</body>
</html>