Return an instance of key_base
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(*), | intent(in) | :: | key | The key value. |
||
integer(kind=I4P), | intent(in), | optional | :: | buckets_number | Buckets number. |
Instance of key_base.
elemental function creator(key, buckets_number) result(key_)
!---------------------------------------------------------------------------------------------------------------------------------
!< Return an instance of [[key_base]]
!---------------------------------------------------------------------------------------------------------------------------------
class(*), intent(in) :: key !< The key value.
integer(I4P), intent(in), optional :: buckets_number !< Buckets number.
type(key_base) :: key_ !< Instance of [[key_base]].
!---------------------------------------------------------------------------------------------------------------------------------
!---------------------------------------------------------------------------------------------------------------------------------
call key_%set(key=key, buckets_number=buckets_number)
!---------------------------------------------------------------------------------------------------------------------------------
endfunction creator