PTEROSOR/QuantumPackage
10
0
Fork 0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-06-26 15:12:19 +02:00
Code Releases Activity

Minor changes

Browse Source
This commit is contained in:
Anthony Scemama 2023-07-12 18:56:13 +02:00
parent fba2fefb19
commit 4ad7765127
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/ccsd/ccsd_space_orb_sub_chol.irp.f
View File

@ -457,8 +457,7 @@ subroutine compute_r2_space_chol(nO,nV,t1,t2,tau,H_oo,H_vv,H_vo,r2,max_r2)
integer :: u,v,i,j,beta,gam,a,b
double precision :: max_r2_local
! Residual
!r2 = 0d0
call set_multiple_levels_omp(.False.)
!$omp parallel &
!$omp shared(nO,nV,r2,cc_space_v_oovv) &