[Wien] join_vectorfiles bug fix

[Eamon McDermott]

Dear WIEN2k users,

I have found a bug in join_vectorfiles.f (in SRC_trig) that was causing me
issues reading .struct files when using the ifort compiler. The
'unitstruct' file handle was not being set. I have attached a patch to set
it:

@@ -43,6 +43,7 @@
   unitenergy = 3
   unittargetvector = 4
   unittargetenergy = 5
+  unitstruct = 6

   !parameters
   LMAX = 13

The patch also included the fixes to util.f in SRC_trig from Kateryna
Foyevtsova sent to the mailing list on 19/09/2011, so can be applied to the
current SRC_trig.tar available on the website.

Cheers,

--
Eamon McDermott
M.Sc Student
Physics and Engineering Physics
University of Saskatchewan
eamon.mcdermott at usask.ca
Office: +1-306-966-6380
Scheduling: http://doodle.com/eamon.mcdermott
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://zeus.theochem.tuwien.ac.at/pipermail/wien/attachments/20120228/ae550cac/attachment.htm>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: SRC_trig.patch
Type: application/octet-stream
Size: 1315 bytes
Desc: not available
URL: <http://zeus.theochem.tuwien.ac.at/pipermail/wien/attachments/20120228/ae550cac/attachment.dll>