dealloc Subroutine

private subroutine dealloc(this)

Deallocate all arrays associated with this hash table object

Type Bound

shared_rhash_t

Arguments

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

Contents

Source Code

dealloc

Source Code

    subroutine dealloc(this)
        class(shared_rhash_t), intent(inout) :: this

        call this%indices%shared_dealloc()
        call this%hval_offsets%shared_dealloc()
        if (allocated(this%mult)) deallocate(this%mult)
    end subroutine dealloc