scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

changes needed in environment module for hdf5 to work 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@13559 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
pietrodelugas 2017-06-09 15:54:03 +00:00
parent c46e23355d
commit 36b0afaf5d
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Modules/environment.f90
View File

@ -21,6 +21,9 @@ MODULE environment
USE mp_pools, ONLY: npool
USE mp_bands, ONLY: ntask_groups, nproc_bgrp, nbgrp
USE global_version, ONLY: version_number, svn_revision
#if defined(__HDF5)
USE qeh5_base_module, ONLY: initialize_hdf5, finalize_hdf5
#endif
IMPLICIT NONE
@ -119,6 +122,9 @@ CONTAINS
CALL parallel_info ( )
#else
CALL serial_info()
#endif
#if defined(__HDF5) & !defined(__OLDXML)
CALL initialize_hdf5()
#endif
END SUBROUTINE environment_start
@ -127,7 +133,9 @@ CONTAINS
SUBROUTINE environment_end( code )
CHARACTER(LEN=*), INTENT(IN) :: code
#if defined(_HDF5)
CALL finalize_hdf5()
#endif
IF ( meta_ionode ) WRITE( stdout, * )
CALL stop_clock( TRIM(code) )