Commit 317feb2c authored by Gregor Michalicek's avatar Gregor Michalicek

Write out warning if cdn.hdf present but Fleur is not compiled for HDF5

parent 06fdbdaa
......@@ -175,6 +175,15 @@ MODULE m_cdn_io
CALL getIOMode(mode)
#ifndef CPP_HDF
filename = 'cdn.hdf'
IF(PRESENT(inFilename)) filename = TRIM(ADJUSTL(inFilename))//'.hdf'
INQUIRE(FILE=TRIM(ADJUSTL(filename)),EXIST=l_exist)
IF (l_exist) THEN
CALL juDFT_warn('Fleur not compiled for HDF5, but '//TRIM(ADJUSTL(filename))//' present',calledby='readDensity')
END IF
#endif
IF(mode.EQ.CDN_HDF5_MODE) THEN
#ifdef CPP_HDF
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment