clear_rdm_list_t Subroutine

public pure subroutine clear_rdm_list_t(rdm)

Uses

Arguments

Type IntentOptional Attributes Name
type(rdm_list_t), intent(inout) :: rdm

Contents

Source Code

clear_rdm_list_t

Source Code

    pure subroutine clear_rdm_list_t(rdm)

        use hash, only: clear_hash_table

        type(rdm_list_t), intent(inout) :: rdm

        rdm%nelements = 0
        rdm%elements = 0_int_rdm
        call clear_hash_table(rdm%hash_table)

    end subroutine clear_rdm_list_t