mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-12-22 03:23:29 +01:00
This commit is contained in:
parent
5aaf9b31ba
commit
74daac0dfb
19
configure
vendored
19
configure
vendored
@ -303,6 +303,25 @@ fi
|
|||||||
|
|
||||||
ZEROMQ=$(find_lib -lzmq)
|
ZEROMQ=$(find_lib -lzmq)
|
||||||
if [[ ${ZEROMQ} = $(not_found) ]] ; then
|
if [[ ${ZEROMQ} = $(not_found) ]] ; then
|
||||||
|
|
||||||
|
MAKE=$(find_exe make)
|
||||||
|
if [[ ${MAKE} = $(not_found) ]] ; then
|
||||||
|
error "make is not installed."
|
||||||
|
fail
|
||||||
|
fi
|
||||||
|
|
||||||
|
M4=$(find_exe autoreconf)
|
||||||
|
if [[ ${M4} = $(not_found) ]] ; then
|
||||||
|
error "autoreconf is not installed."
|
||||||
|
fail
|
||||||
|
fi
|
||||||
|
|
||||||
|
M4=$(find_exe m4)
|
||||||
|
if [[ ${M4} = $(not_found) ]] ; then
|
||||||
|
error "m4 preprocesssor is not installed."
|
||||||
|
fail
|
||||||
|
fi
|
||||||
|
|
||||||
error "ZeroMQ (zeromq) is not installed."
|
error "ZeroMQ (zeromq) is not installed."
|
||||||
fail
|
fail
|
||||||
fi
|
fi
|
||||||
|
@ -1,51 +0,0 @@
|
|||||||
use trexio
|
|
||||||
|
|
||||||
BEGIN_PROVIDER [ logical, use_trexio ]
|
|
||||||
implicit none
|
|
||||||
BEGIN_DOC
|
|
||||||
! Returns the content of the QP_USE_TREXIO variable
|
|
||||||
END_DOC
|
|
||||||
character(32) :: buffer
|
|
||||||
|
|
||||||
call getenv('QP_USE_TREXIO', buffer)
|
|
||||||
if (trim(buffer) == '0') then
|
|
||||||
print *, 'Using EZFIO storage'
|
|
||||||
use_trexio = .False.
|
|
||||||
else
|
|
||||||
print *, 'Using TREXIO storage'
|
|
||||||
use_trexio = .True.
|
|
||||||
endif
|
|
||||||
|
|
||||||
END_PROVIDER
|
|
||||||
|
|
||||||
BEGIN_PROVIDER [ character*(1024), trexio_filename ]
|
|
||||||
implicit none
|
|
||||||
BEGIN_DOC
|
|
||||||
! Name of the TREXIO file.
|
|
||||||
END_DOC
|
|
||||||
trexio_filename = trim(ezfio_work_dir)//'/trexio.h5'
|
|
||||||
END_PROVIDER
|
|
||||||
|
|
||||||
BEGIN_PROVIDER [ integer(trexio_back_end_t), trexio_backend ]
|
|
||||||
implicit none
|
|
||||||
BEGIN_DOC
|
|
||||||
! Name of the TREXIO file.
|
|
||||||
END_DOC
|
|
||||||
trexio_backend = TREXIO_HDF5
|
|
||||||
END_PROVIDER
|
|
||||||
|
|
||||||
BEGIN_PROVIDER [ integer(trexio_t), trexio_file ]
|
|
||||||
implicit none
|
|
||||||
BEGIN_DOC
|
|
||||||
! Name of the TREXIO file.
|
|
||||||
END_DOC
|
|
||||||
integer (trexio_exit_code) :: rc
|
|
||||||
|
|
||||||
trexio_file = 0_trexio_t
|
|
||||||
if (use_trexio) then
|
|
||||||
trexio_file = trexio_open(trexio_filename, 'u', trexio_backend, rc)
|
|
||||||
call trexio_assert(rc, TREXIO_SUCCESS)
|
|
||||||
endif
|
|
||||||
|
|
||||||
END_PROVIDER
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user