s3_set_log_level Subroutine

public subroutine s3_set_log_level(level)

Set the current log level.

@param[in] level Log level (S3_LOG_LEVEL_NONE to S3_LOG_LEVEL_TRACE)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	level

Source Code

    subroutine s3_set_log_level(level)
        integer, intent(in) :: level
        if (level >= S3_LOG_LEVEL_NONE .and. level <= S3_LOG_LEVEL_TRACE) then
            current_log_level = level
        end if
    end subroutine s3_set_log_level