mirror of
https://github.com/QuantumPackage/qp2.git
synced 2025-01-11 20:48:10 +01:00
parameters are not variables (openmp data-sharing)
This commit is contained in:
parent
c4154c10ea
commit
4ded39470b
@ -33,7 +33,7 @@
|
||||
!$OMP n_elements,ao_two_e_integral_alpha_tmp,ao_two_e_integral_beta_tmp, &
|
||||
!$OMP c0,key1)&
|
||||
!$OMP SHARED(ao_num,SCF_density_matrix_ao_alpha_complex, &
|
||||
!$OMP SCF_density_matrix_ao_beta_complex,i_sign, &
|
||||
!$OMP SCF_density_matrix_ao_beta_complex, &
|
||||
!$OMP ao_integrals_map, ao_two_e_integral_alpha_complex, ao_two_e_integral_beta_complex)
|
||||
|
||||
call get_cache_map_n_elements_max(ao_integrals_map,n_elements_max)
|
||||
@ -116,7 +116,7 @@
|
||||
!$OMP n_elements,ao_two_e_integral_alpha_tmp,ao_two_e_integral_beta_tmp, &
|
||||
!$OMP c0,key1)&
|
||||
!$OMP SHARED(ao_num,SCF_density_matrix_ao_alpha_complex, &
|
||||
!$OMP SCF_density_matrix_ao_beta_complex,i_sign, &
|
||||
!$OMP SCF_density_matrix_ao_beta_complex, &
|
||||
!$OMP ao_integrals_map_2, ao_two_e_integral_alpha_complex, ao_two_e_integral_beta_complex)
|
||||
|
||||
call get_cache_map_n_elements_max(ao_integrals_map_2,n_elements_max)
|
||||
|
Loading…
Reference in New Issue
Block a user