From 97a966df04b09aee527a7ab0cb778090a6de42dc Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Sat, 2 Jan 2016 22:04:24 +0100 Subject: [PATCH] Threshold in MO transformation --- src/Integrals_Bielec/mo_bi_integrals.irp.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Integrals_Bielec/mo_bi_integrals.irp.f b/src/Integrals_Bielec/mo_bi_integrals.irp.f index 83f0ce05..0ff14168 100644 --- a/src/Integrals_Bielec/mo_bi_integrals.irp.f +++ b/src/Integrals_Bielec/mo_bi_integrals.irp.f @@ -70,7 +70,7 @@ subroutine add_integrals_to_map(mask_ijkl) integer :: i1,j1,k1,l1, ii1, kmax, thread_num integer :: i2,i3,i4 - double precision,parameter :: thr_coef = 0.d0 + double precision,parameter :: thr_coef = 1.d-10 PROVIDE ao_bielec_integrals_in_map