block size in cholesky

2024-11-19 12:32:30 +01:00 · 2024-05-31 20:20:04 +02:00 · 2024-05-31 20:20:04 +02:00 · 0dca6cfde4
commit 0dca6cfde4
parent b773a361b2
1 changed files with 1 additions and 1 deletions
--- a/src/ao_two_e_ints/cholesky.irp.f
+++ b/src/ao_two_e_ints/cholesky.irp.f
@ -186,7 +186,7 @@ END_PROVIDER

         if (mem > qp_max_mem) then
           s = s*2.d0
-           block_size = block_size / 2
+           block_size = max(block_size / 2, 1)
         else
           exit
         endif