Skip to content

Commit

Permalink
Cubic RPA: more timing info
Browse files Browse the repository at this point in the history
  • Loading branch information
pseewald committed Aug 16, 2019
1 parent b1b7780 commit bd7f48b
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/rpa_im_time.F
Original file line number Diff line number Diff line change
Expand Up @@ -300,7 +300,7 @@ SUBROUTINE compute_mat_P_omega_t(mat_P_omega, fm_scaled_dm_occ_tau, &
ENDIF
ENDDO

CALL timeset(routineN//"_copy_M_t", handle5)
CALL timeset(routineN//"_copy_M_occ_t", handle5)

! copy matrix to optimal contraction layout - copy is done manually in order
! to better control memory allocations (we can release data of previous
Expand Down Expand Up @@ -340,7 +340,7 @@ SUBROUTINE compute_mat_P_omega_t(mat_P_omega, fm_scaled_dm_occ_tau, &
ENDIF
ENDDO

CALL timeset(routineN//"_copy_M_t", handle5)
CALL timeset(routineN//"_copy_M_virt_t", handle5)
CALL dbcsr_t_copy(t_3c_M_tmp, t_3c_M_virt, order=[1, 2, 3], move_data=.TRUE.)
CALL dbcsr_t_filter(t_3c_M_virt, eps_filter)
CALL dbcsr_t_clear(t_3c_M_tmp)
Expand Down

0 comments on commit bd7f48b

Please sign in to comment.