[Wien] W2kinit_tmp_.F memory limit

[Laurence Marks]

Currently [1] the routine MemCheck is only used when the -qtl flag is
present, to check if enough memory is present to store some temporary
files; it is called by l2main.F which would also need integer(8).
Writeinit.F is in SRC_Globals and linked from other directories, so you
don't need more changes.

[1] It had another use to test for memory leaks in an older impi, which is
now repaired.

--
Professor Laurence Marks
Department of Materials Science and Engineering, Northwestern University
www.numis.northwestern.edu
"Research is to see what everybody else has seen, and to think what nobody
else has thought" Albert Szent-Györgyi

On Wed, Feb 23, 2022, 7:27 AM Igor I Mazin <imazin2 at gmu.edu> wrote:

> My WIEN2k installation works fine - except for lapw2 -qtl.
> This module bombs with the following diagnostics:
>
>   x lapw2 -qtl -up
> forrtl: severe (64): input conversion error, unit -5, file Internal
> List-Directed Read
> Image              PC                Routine            Line        Source
> lapw2              00000000004D5A6B  Unknown               Unknown  Unknown
> lapw2              00000000004F8602  Unknown               Unknown  Unknown
> lapw2              00000000004F7388  Unknown               Unknown  Unknown
> lapw2              0000000000406170  memcheck_                 314
> W2kinit_tmp_.F
> lapw2              000000000045FCC7  l2main_                   235
> l2main_tmp_.F
> lapw2              000000000048D4C9  MAIN__                    767
> lapw2_tmp_.F
> lapw2              00000000004059E2  Unknown               Unknown  Unknown
> libc-2.17.so       00002B9646810555  __libc_start_main     Unknown
> Unknown
> lapw2              00000000004058E9  Unknown               Unknown  Unknown
>
> So, the offending module is W2kinit_tmp_.F, and the routine MemCheck.
> It appears that the problem is due to the fact that a regular integer
> cannot hold the relevant number, 3169012916.
> That is to say, the variables memtotal and memavail must be defined as
> integer(kind=8). I can redefine them in W2kinit_tmp_, and the error
> disappears, but of course, it needs to be corrected in all routines that
> use W2kinit_tmp_
>
> Something that needs to be fixed in the next release.
>
> P.S. What I do not understand is why it only bombs with the qtl switch.
> _______________________________________________
> Wien mailing list
> Wien at zeus.theochem.tuwien.ac.at
>
> https://urldefense.com/v3/__http://zeus.theochem.tuwien.ac.at/mailman/listinfo/wien__;!!Dq0X2DkFhyF93HkjWTBQKhk!F3jy9xyhUBkh5jHGKyUk6ZCd9AwH15IfdK9JtoIJZG7hh5Kin0Xn1vmixQOPAgowMB5YZw$
> SEARCH the MAILING-LIST at:
> https://urldefense.com/v3/__http://www.mail-archive.com/wien@zeus.theochem.tuwien.ac.at/index.html__;!!Dq0X2DkFhyF93HkjWTBQKhk!F3jy9xyhUBkh5jHGKyUk6ZCd9AwH15IfdK9JtoIJZG7hh5Kin0Xn1vmixQOPAgrs3iotcA$
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://zeus.theochem.tuwien.ac.at/pipermail/wien/attachments/20220223/aab8cb6f/attachment.htm>