Lines Matching refs:nmax
84 INTEGER :: nmax component
122 hash_table%obj%nmax) THEN
124 nmax=hash_table%obj%nmax*EXPAND_FACTOR)
146 SUBROUTINE fb_hash_table_create(hash_table, nmax) argument
148 INTEGER, INTENT(IN), OPTIONAL :: nmax local
160 hash_table%obj%nmax = 0
164 IF (PRESENT(nmax)) my_nmax = nmax
166 nmax=my_nmax)
227 SUBROUTINE fb_hash_table_init(hash_table, nmax) argument
229 INTEGER, INTENT(IN), OPTIONAL :: nmax local
239 my_nmax = hash_table%obj%nmax
240 IF (PRESENT(nmax)) my_nmax = nmax
256 hash_table%obj%nmax = my_nmax
259 DO ii = 1, hash_table%obj%nmax
284 RECURSIVE SUBROUTINE fb_hash_table_rehash(hash_table, nmax) argument
286 INTEGER, INTENT(IN), OPTIONAL :: nmax local
296 CALL fb_hash_table_create(hash_table, nmax)
299 IF (PRESENT(nmax)) THEN
300 my_nmax = MAX(nmax, hash_table%obj%nelements)
302 my_nmax = hash_table%obj%nmax
304 ALLOCATE (tmp_table(hash_table%obj%nmax))
308 nmax=my_nmax)
376 hash_table%obj%nmax) THEN
378 nmax=hash_table%obj%nmax/SHRINK_FACTOR)
414 SUBROUTINE fb_hash_table_status(hash_table, nelements, nmax, prime) argument
416 INTEGER, INTENT(OUT), OPTIONAL :: nelements, nmax, prime local
426 IF (PRESENT(nmax)) nmax = hash_table%obj%nmax
452 DO islot = guess, hash_table%obj%nmax
480 nmax_8 = INT(hash_table%obj%nmax, int_8)