Searched refs:mat_munu_local (Results 1 – 2 of 2) sorted by relevance
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | mp2_ri_grad.F | 189 TYPE(dbcsr_p_type), DIMENSION(:), POINTER :: G_P_ia, G_P_ia_beta, mat_munu_local, & local 299 ALLOCATE (mat_munu_local(my_group_L_size)) 304 ALLOCATE (mat_munu_local(L_counter)%matrix) 307 CALL dbcsr_create(mat_munu_local(L_counter)%matrix, template=mat_munu%matrix, & 309 CALL dbcsr_copy(mat_munu_local(L_counter)%matrix, mat_munu%matrix) 310 CALL dbcsr_set(mat_munu_local(L_counter)%matrix, 0.0_dp) 333 … first_c=my_group_L_start, last_c=my_group_L_end, mat_ab=mat_munu_local, & 351 CALL update_lagrangian(mat_munu_local(L_counter), matrix_P_inu, Lag_mu_i_1, & 356 CALL update_lagrangian(mat_munu_local(L_counter), matrix_P_inu, Lag_mu_i_1, & 375 CALL dbcsr_deallocate_matrix_set(mat_munu_local)
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | mp2_ri_grad.F | 188 TYPE(dbcsr_p_type), DIMENSION(:), POINTER :: G_P_ia, G_P_ia_beta, mat_munu_local, & local 298 ALLOCATE (mat_munu_local(my_group_L_size)) 303 ALLOCATE (mat_munu_local(L_counter)%matrix) 306 CALL dbcsr_create(mat_munu_local(L_counter)%matrix, template=mat_munu%matrix, & 308 CALL dbcsr_copy(mat_munu_local(L_counter)%matrix, mat_munu%matrix) 309 CALL dbcsr_set(mat_munu_local(L_counter)%matrix, 0.0_dp) 332 … first_c=my_group_L_start, last_c=my_group_L_end, mat_ab=mat_munu_local, & 350 CALL update_lagrangian(mat_munu_local(L_counter), matrix_P_inu, Lag_mu_i_1, & 355 CALL update_lagrangian(mat_munu_local(L_counter), matrix_P_inu, Lag_mu_i_1, & 374 CALL dbcsr_deallocate_matrix_set(mat_munu_local)
|