LCPQ/quantum_package
10
0
Fork 0
mirror of https://github.com/LCPQ/quantum_package synced 2024-06-02 11:25:26 +02:00
Code Issues Releases Wiki Activity

Fixed QP_MAXMEM

Browse Source
This commit is contained in:
Anthony Scemama 2018-12-19 14:50:34 +01:00
parent 17ec0f5f75
commit d60d65b08b
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/utils/memory.irp.f
View File

@ -5,12 +5,12 @@ BEGIN_PROVIDER [ integer, qp_max_mem ]
END_DOC
character*(128) :: env
qp_max_mem = huge(1)/10
qp_max_mem = 2000
call getenv('QP_MAXMEM',env)
if (trim(env) /= '') then
read(env,*) qp_max_mem
call write_int(6,qp_max_mem,'Target maximum memory')
endif
call write_int(6,qp_max_mem,'Target maximum memory (GB)')
END_PROVIDER