Return homogeneity status.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(hash_table), | intent(in) | :: | self | The hash table. |
Homogeneity status.
elemental function is_homogeneous(self)
!---------------------------------------------------------------------------------------------------------------------------------
!< Return homogeneity status.
!---------------------------------------------------------------------------------------------------------------------------------
class(hash_table), intent(in) :: self !< The hash table.
logical :: is_homogeneous !< Homogeneity status.
!---------------------------------------------------------------------------------------------------------------------------------
!---------------------------------------------------------------------------------------------------------------------------------
is_homogeneous = self%is_homogeneous_
!---------------------------------------------------------------------------------------------------------------------------------
endfunction is_homogeneous