dealloc_sparse Subroutine

private subroutine dealloc_sparse(this)

Deallocate memory used for the sparse storage of the 6-index integrals

Type Bound

sparse_lMat_t

Arguments

Type IntentOptional Attributes Name
class(sparse_lMat_t), intent(inout) :: this

Source Code

    subroutine dealloc_sparse(this)
        class(sparse_lMat_t), intent(inout) :: this
        character(*), parameter :: t_r = "dealloc_sparse"

        ! Requires deallocation of the values and the hash table for the indices
        call this%nonzero_vals%shared_dealloc()
        call this%htable%dealloc()
    end subroutine dealloc_sparse