[Wien] compiling lstart with Lahey, Fortran REWIND.

Peter Blaha pblaha at zeus.theochem.tuwien.ac.at
Sun Oct 17 09:16:37 CEST 2004


> In SRC_lstart/lstart.f, around line 71, are the lines
>        OPEN(IUNIT,FILE=NAME,STATUS=STATUS,FORM=FORM,ERR=8002)
>        REWIND iunit
> 
> Is the REWIND command required?  When a file is opened is it not allready at 
> the start?

Hi,
I can't say how this rewind statement came into the code. I don't see any 
reason for this, so one can definitely remove it.
Regards

                                      P.Blaha
--------------------------------------------------------------------------
Peter BLAHA, Inst.f. Materials Chemistry, TU Vienna, A-1060 Vienna
Phone: +43-1-58801-15671             FAX: +43-1-58801-15698
Email: blaha at theochem.tuwien.ac.at    WWW: http://info.tuwien.ac.at/theochem/
--------------------------------------------------------------------------




More information about the Wien mailing list