json_file_get_real32_vec Subroutine

private subroutine json_file_get_real32_vec(me, path, vec, found, default)

Alternate version of json_file_get_real_vec where vec is real32.

Type Bound

json_file

Arguments

Type IntentOptional Attributes Name
class(json_file), intent(inout) :: me
character(kind=CK, len=*), intent(in) :: path

the path to the variable
real(kind=real32), intent(out), dimension(:), allocatable :: vec

the value vector
logical(kind=LK), intent(out), optional :: found

if it was really found
real(kind=real32), intent(in), optional, dimension(:) :: default

Calls

proc~~json_file_get_real32_vec~~CallsGraph proc~json_file_get_real32_vec json_file%json_file_get_real32_vec none~get json_file%get proc~json_file_get_real32_vec->none~get none~get->proc~json_file_get_real32_vec proc~json_file_get_alloc_string_vec json_file%json_file_get_alloc_string_vec none~get->proc~json_file_get_alloc_string_vec proc~json_file_get_integer json_file%json_file_get_integer none~get->proc~json_file_get_integer proc~json_file_get_integer_vec json_file%json_file_get_integer_vec none~get->proc~json_file_get_integer_vec proc~json_file_get_logical json_file%json_file_get_logical none~get->proc~json_file_get_logical proc~json_file_get_logical_vec json_file%json_file_get_logical_vec none~get->proc~json_file_get_logical_vec proc~json_file_get_object json_file%json_file_get_object none~get->proc~json_file_get_object proc~json_file_get_real json_file%json_file_get_real none~get->proc~json_file_get_real proc~json_file_get_real32 json_file%json_file_get_real32 none~get->proc~json_file_get_real32 proc~json_file_get_real_vec json_file%json_file_get_real_vec none~get->proc~json_file_get_real_vec proc~json_file_get_root json_file%json_file_get_root none~get->proc~json_file_get_root proc~json_file_get_string json_file%json_file_get_string none~get->proc~json_file_get_string proc~json_file_get_string_vec json_file%json_file_get_string_vec none~get->proc~json_file_get_string_vec proc~wrap_json_file_get_alloc_string_vec json_file%wrap_json_file_get_alloc_string_vec none~get->proc~wrap_json_file_get_alloc_string_vec proc~wrap_json_file_get_integer json_file%wrap_json_file_get_integer none~get->proc~wrap_json_file_get_integer proc~wrap_json_file_get_integer_vec json_file%wrap_json_file_get_integer_vec none~get->proc~wrap_json_file_get_integer_vec proc~wrap_json_file_get_logical json_file%wrap_json_file_get_logical none~get->proc~wrap_json_file_get_logical proc~wrap_json_file_get_logical_vec json_file%wrap_json_file_get_logical_vec none~get->proc~wrap_json_file_get_logical_vec proc~wrap_json_file_get_object json_file%wrap_json_file_get_object none~get->proc~wrap_json_file_get_object proc~wrap_json_file_get_real json_file%wrap_json_file_get_real none~get->proc~wrap_json_file_get_real proc~wrap_json_file_get_real32 json_file%wrap_json_file_get_real32 none~get->proc~wrap_json_file_get_real32 proc~wrap_json_file_get_real32_vec json_file%wrap_json_file_get_real32_vec none~get->proc~wrap_json_file_get_real32_vec proc~wrap_json_file_get_real_vec json_file%wrap_json_file_get_real_vec none~get->proc~wrap_json_file_get_real_vec proc~wrap_json_file_get_string json_file%wrap_json_file_get_string none~get->proc~wrap_json_file_get_string proc~wrap_json_file_get_string_vec json_file%wrap_json_file_get_string_vec none~get->proc~wrap_json_file_get_string_vec proc~json_file_get_alloc_string_vec->none~get proc~flag_not_found flag_not_found proc~json_file_get_alloc_string_vec->proc~flag_not_found proc~json_file_clear_exceptions json_file%json_file_clear_exceptions proc~json_file_get_alloc_string_vec->proc~json_file_clear_exceptions proc~json_file_failed json_file%json_file_failed proc~json_file_get_alloc_string_vec->proc~json_file_failed proc~throw_exception json_file%throw_exception proc~json_file_get_alloc_string_vec->proc~throw_exception proc~json_file_get_integer->none~get proc~json_file_get_integer->proc~flag_not_found proc~json_file_get_integer->proc~json_file_clear_exceptions proc~json_file_get_integer->proc~json_file_failed proc~json_file_get_integer->proc~throw_exception proc~json_file_get_integer_vec->none~get proc~json_file_get_integer_vec->proc~flag_not_found proc~json_file_get_integer_vec->proc~json_file_clear_exceptions proc~json_file_get_integer_vec->proc~json_file_failed proc~json_file_get_integer_vec->proc~throw_exception proc~json_file_get_logical->none~get proc~json_file_get_logical->proc~flag_not_found proc~json_file_get_logical->proc~json_file_clear_exceptions proc~json_file_get_logical->proc~json_file_failed proc~json_file_get_logical->proc~throw_exception proc~json_file_get_logical_vec->none~get proc~json_file_get_logical_vec->proc~flag_not_found proc~json_file_get_logical_vec->proc~json_file_clear_exceptions proc~json_file_get_logical_vec->proc~json_file_failed proc~json_file_get_logical_vec->proc~throw_exception proc~hash_table_get json_hash_table%hash_table_get proc~json_file_get_object->proc~hash_table_get proc~json_file_get_real->none~get proc~json_file_get_real->proc~flag_not_found proc~json_file_get_real->proc~json_file_clear_exceptions proc~json_file_get_real->proc~json_file_failed proc~json_file_get_real->proc~throw_exception proc~json_file_get_real32->none~get proc~json_file_get_real_vec->none~get proc~json_file_get_real_vec->proc~flag_not_found proc~json_file_get_real_vec->proc~json_file_clear_exceptions proc~json_file_get_real_vec->proc~json_file_failed proc~json_file_get_real_vec->proc~throw_exception proc~json_file_get_string->none~get proc~json_file_get_string->proc~flag_not_found proc~json_file_get_string->proc~json_file_clear_exceptions proc~json_file_get_string->proc~json_file_failed proc~json_file_get_string->proc~throw_exception proc~json_file_get_string_vec->none~get proc~json_file_get_string_vec->proc~flag_not_found proc~json_file_get_string_vec->proc~json_file_clear_exceptions proc~json_file_get_string_vec->proc~json_file_failed proc~json_file_get_string_vec->proc~throw_exception proc~wrap_json_file_get_alloc_string_vec->none~get interface~to_unicode to_unicode proc~wrap_json_file_get_alloc_string_vec->interface~to_unicode proc~wrap_json_file_get_integer->none~get proc~wrap_json_file_get_integer->interface~to_unicode proc~wrap_json_file_get_integer_vec->none~get proc~wrap_json_file_get_integer_vec->interface~to_unicode proc~wrap_json_file_get_logical->none~get proc~wrap_json_file_get_logical->interface~to_unicode proc~wrap_json_file_get_logical_vec->none~get proc~wrap_json_file_get_logical_vec->interface~to_unicode proc~wrap_json_file_get_object->none~get proc~wrap_json_file_get_object->interface~to_unicode proc~wrap_json_file_get_real->none~get proc~wrap_json_file_get_real->interface~to_unicode proc~wrap_json_file_get_real32->none~get proc~wrap_json_file_get_real32->interface~to_unicode proc~wrap_json_file_get_real32_vec->none~get proc~wrap_json_file_get_real32_vec->interface~to_unicode proc~wrap_json_file_get_real_vec->none~get proc~wrap_json_file_get_real_vec->interface~to_unicode proc~wrap_json_file_get_string->none~get proc~wrap_json_file_get_string->interface~to_unicode proc~wrap_json_file_get_string_vec->none~get proc~wrap_json_file_get_string_vec->interface~to_unicode proc~to_uni to_uni interface~to_unicode->proc~to_uni proc~to_uni_vec to_uni_vec interface~to_unicode->proc~to_uni_vec proc~hash_table_hash json_hash_table%hash_table_hash proc~hash_table_get->proc~hash_table_hash proc~keys_equal json_hash_table%keys_equal proc~hash_table_get->proc~keys_equal proc~preprocess_key json_hash_table%preprocess_key proc~hash_table_get->proc~preprocess_key proc~json_clear_exceptions json_core%json_clear_exceptions proc~json_file_clear_exceptions->proc~json_clear_exceptions proc~json_failed json_core%json_failed proc~json_file_failed->proc~json_failed none~throw_exception~2 json_core%throw_exception proc~throw_exception->none~throw_exception~2 proc~json_throw_exception json_core%json_throw_exception none~throw_exception~2->proc~json_throw_exception proc~wrap_json_throw_exception json_core%wrap_json_throw_exception none~throw_exception~2->proc~wrap_json_throw_exception proc~lowercase_string lowercase_string proc~preprocess_key->proc~lowercase_string proc~wrap_json_throw_exception->interface~to_unicode proc~wrap_json_throw_exception->none~throw_exception~2

Called by

proc~~json_file_get_real32_vec~~CalledByGraph proc~json_file_get_real32_vec json_file%json_file_get_real32_vec none~get json_file%get proc~json_file_get_real32_vec->none~get none~get->proc~json_file_get_real32_vec proc~json_file_get_alloc_string_vec json_file%json_file_get_alloc_string_vec none~get->proc~json_file_get_alloc_string_vec proc~json_file_get_integer json_file%json_file_get_integer none~get->proc~json_file_get_integer proc~json_file_get_integer_vec json_file%json_file_get_integer_vec none~get->proc~json_file_get_integer_vec proc~json_file_get_logical json_file%json_file_get_logical none~get->proc~json_file_get_logical proc~json_file_get_logical_vec json_file%json_file_get_logical_vec none~get->proc~json_file_get_logical_vec proc~json_file_get_real json_file%json_file_get_real none~get->proc~json_file_get_real proc~json_file_get_real32 json_file%json_file_get_real32 none~get->proc~json_file_get_real32 proc~json_file_get_real_vec json_file%json_file_get_real_vec none~get->proc~json_file_get_real_vec proc~json_file_get_string json_file%json_file_get_string none~get->proc~json_file_get_string proc~json_file_get_string_vec json_file%json_file_get_string_vec none~get->proc~json_file_get_string_vec proc~wrap_json_file_get_alloc_string_vec json_file%wrap_json_file_get_alloc_string_vec none~get->proc~wrap_json_file_get_alloc_string_vec proc~wrap_json_file_get_integer json_file%wrap_json_file_get_integer none~get->proc~wrap_json_file_get_integer proc~wrap_json_file_get_integer_vec json_file%wrap_json_file_get_integer_vec none~get->proc~wrap_json_file_get_integer_vec proc~wrap_json_file_get_logical json_file%wrap_json_file_get_logical none~get->proc~wrap_json_file_get_logical proc~wrap_json_file_get_logical_vec json_file%wrap_json_file_get_logical_vec none~get->proc~wrap_json_file_get_logical_vec proc~wrap_json_file_get_object json_file%wrap_json_file_get_object none~get->proc~wrap_json_file_get_object proc~wrap_json_file_get_real json_file%wrap_json_file_get_real none~get->proc~wrap_json_file_get_real proc~wrap_json_file_get_real32 json_file%wrap_json_file_get_real32 none~get->proc~wrap_json_file_get_real32 proc~wrap_json_file_get_real32_vec json_file%wrap_json_file_get_real32_vec none~get->proc~wrap_json_file_get_real32_vec proc~wrap_json_file_get_real_vec json_file%wrap_json_file_get_real_vec none~get->proc~wrap_json_file_get_real_vec proc~wrap_json_file_get_string json_file%wrap_json_file_get_string none~get->proc~wrap_json_file_get_string proc~wrap_json_file_get_string_vec json_file%wrap_json_file_get_string_vec none~get->proc~wrap_json_file_get_string_vec proc~initialize_hash json_file%initialize_hash proc~initialize_hash->none~get proc~json_file_get_alloc_string_vec->none~get proc~json_file_get_integer->none~get proc~json_file_get_integer_vec->none~get proc~json_file_get_logical->none~get proc~json_file_get_logical_vec->none~get proc~json_file_get_real->none~get proc~json_file_get_real32->none~get proc~json_file_get_real_vec->none~get proc~json_file_get_string->none~get proc~json_file_get_string_vec->none~get proc~wrap_json_file_get_alloc_string_vec->none~get proc~wrap_json_file_get_integer->none~get proc~wrap_json_file_get_integer_vec->none~get proc~wrap_json_file_get_logical->none~get proc~wrap_json_file_get_logical_vec->none~get proc~wrap_json_file_get_object->none~get proc~wrap_json_file_get_real->none~get proc~wrap_json_file_get_real32->none~get proc~wrap_json_file_get_real32_vec->none~get proc~wrap_json_file_get_real_vec->none~get proc~wrap_json_file_get_string->none~get proc~wrap_json_file_get_string_vec->none~get

Source Code

    subroutine json_file_get_real32_vec(me, path, vec, found, default)

    implicit none

    class(json_file),intent(inout)                    :: me
    character(kind=CK,len=*),intent(in)               :: path  !! the path to the variable
    real(real32),dimension(:),allocatable,intent(out) :: vec   !! the value vector
    logical(LK),intent(out),optional                  :: found !! if it was really found
    real(real32),dimension(:),intent(in),optional     :: default

    real(RK),dimension(:),allocatable :: tmp
    real(RK),dimension(:),allocatable :: tmp_default

    if (present(default)) then
        tmp_default = real(default,RK)
        call me%get(path, tmp, found, tmp_default)
    else
        call me%get(path, tmp, found)
    end if

    if (allocated(tmp)) vec = real(tmp,real32)

    end subroutine json_file_get_real32_vec