log_str2level Function

  1. utilities.f95
  2. utilities
  3. log_str2level

public function log_str2level(str)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: str

Return Value integer


Called by

proc~~log_str2level~~CalledByGraph proc~log_str2level log_str2level proc~log_create log_create proc~log_create->proc~log_str2level proc~output_initialise_user_input output_initialise_user_input proc~output_initialise_user_input->proc~log_create proc~management_initialise management_initialise proc~management_initialise->proc~log_create proc~initialise initialise proc~initialise->proc~output_initialise_user_input proc~initialise->proc~management_initialise program~swim swim program~swim->proc~initialise

Contents

Source Code

log_str2level

Source Code

  integer function log_str2level(str)
    ! Convert a str log level to a level number
    character(len=*), intent(in) :: str
    select case (str)
        case ('d', 'debug')
            log_str2level = log_debug_level
        case ('i', 'info')
            log_str2level = log_info_level
        case ('w', 'warn', 'warning')
            log_str2level = log_warning_level
        case ('e', 'error')
            log_str2level = log_error_level
        case default
            log_str2level = log_debug_level
    end select
  end function log_str2level