| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public | :: | sign_length | = | 0 | ||
| integer(kind=int_rdm), | public, | allocatable | :: | elements(:,:) | |||
| type(ll_node), | public, | pointer | :: | hash_table(:) | |||
| integer, | public | :: | max_nelements | = | 0 | ||
| integer, | public | :: | nelements | = | 0 | ||
| integer, | public | :: | nhashes | = | 0 |
type rdm_list_t ! The number of integers available to store signs, for each ! RDM entry in the elements array. integer :: sign_length = 0 ! Array which holds the RDM elements. integer(int_rdm), allocatable :: elements(:, :) ! Hash table to the rdm array. type(ll_node), pointer :: hash_table(:) ! The allocated size of the elements array. integer :: max_nelements = 0 ! The number of RDM elements currently entered into the elements array. integer :: nelements = 0 ! Maximum number of unique hashes available in hash_table (not the ! number of currently unused ones, but the total number, i.e. the ! length of the hash_table array). integer :: nhashes = 0 end type rdm_list_t