add_get_logic Subroutine

private subroutine add_get_logic(cfg, var_name, logical_data, comment)

Get or add a logical value of a given name

Arguments

Type IntentOptional Attributes Name
type(CFG_t), intent(inout) :: cfg
character(len=*), intent(in) :: var_name
logical, intent(inout) :: logical_data
character(len=*), intent(in) :: comment

Calls

proc~~add_get_logic~~CallsGraph proc~add_get_logic add_get_logic proc~add_logic add_logic proc~add_get_logic->proc~add_logic proc~get_logic get_logic proc~add_get_logic->proc~get_logic proc~prepare_store_var prepare_store_var proc~add_logic->proc~prepare_store_var proc~read_variable read_variable proc~add_logic->proc~read_variable proc~prepare_get_var prepare_get_var proc~get_logic->proc~prepare_get_var proc~get_var_index get_var_index proc~prepare_get_var->proc~get_var_index proc~handle_error handle_error proc~prepare_get_var->proc~handle_error proc~ensure_free_storage ensure_free_storage proc~prepare_store_var->proc~ensure_free_storage proc~prepare_store_var->proc~get_var_index proc~prepare_store_var->proc~handle_error proc~get_fields_string~2 get_fields_string proc~read_variable->proc~get_fields_string~2 proc~read_variable->proc~handle_error proc~resize_storage resize_storage proc~read_variable->proc~resize_storage proc~binary_search_variable binary_search_variable proc~get_var_index->proc~binary_search_variable

Called by

proc~~add_get_logic~~CalledByGraph proc~add_get_logic add_get_logic interface~cfg_add_get CFG_add_get interface~cfg_add_get->proc~add_get_logic

Source Code

  subroutine add_get_logic(cfg, var_name, logical_data, comment)
    type(CFG_t), intent(inout)   :: cfg
    character(len=*), intent(in) :: var_name, comment
    logical, intent(inout)       :: logical_data

    call add_logic(cfg, var_name, logical_data, comment)
    call get_logic(cfg, var_name, logical_data)
  end subroutine add_get_logic