Finalizes a multiplication cycle for a set of C-blocks.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_mm_csr_type), | intent(inout) | :: | this |
SUBROUTINE dbcsr_mm_csr_finalize(this) !! Finalizes a multiplication cycle for a set of C-blocks. TYPE(dbcsr_mm_csr_type), INTENT(INOUT) :: this INTEGER :: i CALL dbcsr_mm_sched_finalize(this%sched) ! Clear hash tables DO i = 1, SIZE(this%c_hashes) CALL hash_table_release(this%c_hashes(i)) END DO DEALLOCATE (this%c_hashes) DEALLOCATE (this%stacks_descr) DEALLOCATE (this%stack_map) DEALLOCATE (this%m_size_maps) DEALLOCATE (this%n_size_maps) DEALLOCATE (this%k_size_maps) DEALLOCATE (this%stacks_fillcount) DEALLOCATE (this%stacks_data) END SUBROUTINE dbcsr_mm_csr_finalize