Home
last modified time | relevance | path

Searched refs:P_mu_nu (Results 1 – 4 of 4) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dmp2_cphf.F164 TYPE(dbcsr_p_type) :: P_mu_nu local
271 ALLOCATE (P_mu_nu%matrix)
272 CALL dbcsr_copy(P_mu_nu%matrix, rho_ao(1)%matrix, name="P_mu_nu")
273 CALL dbcsr_set(P_mu_nu%matrix, 0.0_dp)
648 CALL dbcsr_release(P_mu_nu%matrix)
649 DEALLOCATE (P_mu_nu%matrix)
948 TYPE(dbcsr_p_type) :: P_mu_nu local
1209 CALL dbcsr_set(P_mu_nu%matrix, 0.0_dp)
1213 CALL calculate_rho_elec(matrix_p=P_mu_nu%matrix, &
1234 CALL dbcsr_copy(rho_work_ao(1)%matrix, P_mu_nu%matrix)
[all …]
H A Drpa_rse.F424 NULLIFY (P_mu_nu)
425 CALL dbcsr_allocate_matrix_set(P_mu_nu, ns)
427 CALL dbcsr_init_p(P_mu_nu(is)%matrix)
429 CALL dbcsr_copy(P_mu_nu(is)%matrix, rho_work_ao(1)%matrix)
430 CALL dbcsr_set(P_mu_nu(is)%matrix, 0.0_dp)
437 rho_ao_2d(1:ns, 1:1) => P_mu_nu(1:ns)
465 rho_ao_2d(1:ns, 1:1) => P_mu_nu(1:ns)
489 DO is = 1, SIZE(P_mu_nu)
490 CALL dbcsr_release(P_mu_nu(is)%matrix)
491 DEALLOCATE (P_mu_nu(is)%matrix)
[all …]
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dmp2_cphf.F164 TYPE(dbcsr_p_type) :: P_mu_nu local
271 ALLOCATE (P_mu_nu%matrix)
272 CALL dbcsr_copy(P_mu_nu%matrix, rho_ao(1)%matrix, name="P_mu_nu")
273 CALL dbcsr_set(P_mu_nu%matrix, 0.0_dp)
648 CALL dbcsr_release(P_mu_nu%matrix)
649 DEALLOCATE (P_mu_nu%matrix)
948 TYPE(dbcsr_p_type) :: P_mu_nu local
1209 CALL dbcsr_set(P_mu_nu%matrix, 0.0_dp)
1213 CALL calculate_rho_elec(matrix_p=P_mu_nu%matrix, &
1234 CALL dbcsr_copy(rho_work_ao(1)%matrix, P_mu_nu%matrix)
[all …]
H A Drpa_rse.F424 NULLIFY (P_mu_nu)
425 CALL dbcsr_allocate_matrix_set(P_mu_nu, ns)
427 CALL dbcsr_init_p(P_mu_nu(is)%matrix)
429 CALL dbcsr_copy(P_mu_nu(is)%matrix, rho_work_ao(1)%matrix)
430 CALL dbcsr_set(P_mu_nu(is)%matrix, 0.0_dp)
437 rho_ao_2d(1:ns, 1:1) => P_mu_nu(1:ns)
465 rho_ao_2d(1:ns, 1:1) => P_mu_nu(1:ns)
489 DO is = 1, SIZE(P_mu_nu)
490 CALL dbcsr_release(P_mu_nu(is)%matrix)
491 DEALLOCATE (P_mu_nu(is)%matrix)
[all …]