Loading...
Searching...
No Matches
dc_hash::get Interface Reference

Public Member Functions

subroutine dchashget0 (hashv, key, value, found)

Detailed Description

Definition at line 170 of file dc_hash.f90.

Member Function/Subroutine Documentation

◆ dchashget0()

subroutine dc_hash::get::dchashget0 ( type(hash), intent(inout) hashv,
character(*), intent(in) key,
character(*), intent(out) value,
logical, intent(out), optional found )

Definition at line 325 of file dc_hash.f90.

326 !
327 ! *hashv* のキー *key* に関連する値を *value* に返します.
328 ! *key* に関連する値が存在しない場合は *value* に
329 ! 空文字を返します.
330 !
331 ! *found* を与えると, *key* に関連する値が見つからなかった
332 ! 場合に .false. を返します.
333 !
334 use dc_types, only: string
335 implicit none
336 type(HASH), intent(inout) :: hashv
337 character(*), intent(in) :: key
338 character(*), intent(out) :: value
339 logical, intent(out), optional :: found
340 character(STRING) :: search_key, search_value
341 logical :: end
342 continue
343 call dchashrewind(hashv)
344 do
345 call dchashnext(hashv, search_key, search_value, end)
346 if (end) then
347 value = ''
348 if (present(found)) found = .false.
349 exit
350 end if
351
352 if (trim(search_key) == trim(key)) then
353 value = search_value
354 if (present(found)) found = .true.
355 exit
356 end if
357 enddo
358
Provides kind type parameter values.
Definition dc_types.f90:49
integer, parameter, public string
Character length for string
Definition dc_types.f90:118

The documentation for this interface was generated from the following file: