LCPQ/qp2
9
1
Fork 0
mirror of https://github.com/QuantumPackage/qp2.git synced 2025-04-25 17:54:44 +02:00
Code Releases Activity

Merge branch 'dev-stable' of github.com:QuantumPackage/qp2 into dev-stable

Browse Source
This commit is contained in:
Anthony Scemama 2025-02-26 15:26:32 +01:00
commit 7773fcaab6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ao_two_e_ints/cholesky.irp.f
View File

@ -178,7 +178,7 @@ END_PROVIDER
rank_max = np rank_max = np
! Avoid too large arrays when there are many electrons ! Avoid too large arrays when there are many electrons
if (elec_num > 10) then if (elec_num > 10) then
rank_max = min(np,20*elec_num*elec_num) rank_max = min(np,25*elec_num*elec_num)
endif endif
call mmap_create_d('', (/ ndim8, rank_max /), .False., .True., map) call mmap_create_d('', (/ ndim8, rank_max /), .False., .True., map)