Fold the first n elements of a real(dp) field into a hash.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(array_hash_t), | intent(inout) | :: | hasher | |||
| real(kind=dp), | intent(in), | allocatable | :: | values(:) | ||
| integer(kind=default_int), | intent(in) | :: | n |
subroutine soa_hash_real_dp_field(hasher, values, n) !! Fold the first `n` elements of a `real(dp)` field into a hash. type(array_hash_t), intent(inout) :: hasher real(dp), allocatable, intent(in) :: values(:) integer(default_int), intent(in) :: n if (.not. allocated(values)) return if (n <= 0) return call hasher%update(values(1:n)) end subroutine soa_hash_real_dp_field