[Wien] Compilation of SRC_lapw1 and SRC_sumpara

[Laurence Marks]

The second set (ifdef Precise) are certainly commented out lines. The first
probably as well - it is being ignored & the code runs. In any case these
are just warnings.

---------------------------
Professor Laurence Marks
Department of Materials Science and Engineering
Northwestern University
www.numis.northwestern.edu 1-847-491-3996
"Research is to see what everybody else has seen, and to think what nobody
else has thought"
Albert Szent-Gyorgi
 On Dec 19, 2012 10:29 PM, "Zhu, Jianxin" <jxzhu at lanl.gov> wrote:

> Dear Peter and Wien2k users,
>
> When I compile SRC_lapw1, the following warning appears for inilpw.f (line
> 229).
>
>
> inilpw.f(229): warning #5117: Bad # preprocessor line
> #         if(myid.eq.0 .and. Hinv_open) close(unit=200, status='DELETE')
> --^
>
> Is this a comment line or really a preprocessor line?
> It looks to me that this  line was commented out but I am not sure.
>
>
>
> When I compile SRC_sumpara, the following warnings comes out
>
>
> scfsum.f(271): warning #5117: Bad # preprocessor line
> ##ifdef Precise
> -^
> scfsum.f(275): warning #5117: Bad # preprocessor line
> ##else
> -^
> scfsum.f(77): warning #5117: Bad # preprocessor line
> # 78   FORMAT(':FSU',i3.3,':',1x,i3,'.ATOM',4f15.3)
> -------^
> scfsum.f(78): warning #5117: Bad # preprocessor line
> #  80  FORMAT(':FVA',i3.3,':',1x,i3,'.ATOM',4f15.3)
> --^
> scfsum.f(79): warning #5117: Bad # preprocessor line
> #  81  FORMAT(4x,i3.3,2x,i3,5x,4f15.3)
> --^
> scfsum.f(80): warning #5117: Bad # preprocessor line
> ##endif
> -^
>
>
>
> They are located in the block  starting from line 271 through 279 in file
> scfsum.f.
>
>
> ##ifdef Precise
>  78   FORMAT(':FSU',i3.3,':',1x,i3,'.ATOM',4f17.9)
>   80  FORMAT(':FVA',i3.3,':',1x,i3,'.ATOM',4f17.9)
>   81  FORMAT(4x,i3.3,2x,i3,5x,4f17.9)
> ##else
> # 78   FORMAT(':FSU',i3.3,':',1x,i3,'.ATOM',4f15.3)
> #  80  FORMAT(':FVA',i3.3,':',1x,i3,'.ATOM',4f15.3)
> #  81  FORMAT(4x,i3.3,2x,i3,5x,4f15.3)
> ##endif
>
>
>
> Are they really preprocessor lines? I suspect they are also comment lines.
>
> Please confirm whether my understanding is correct.
>
> Thanks,
>
> Jianxin
>
> _______________________________________________
> Wien mailing list
> Wien at zeus.theochem.tuwien.ac.at
> http://zeus.theochem.tuwien.ac.at/mailman/listinfo/wien
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://zeus.theochem.tuwien.ac.at/pipermail/wien/attachments/20121219/47d3ca74/attachment.htm>