tem_logging_isActive_for Function

private function tem_logging_isActive_for(me, level) result(isActive)

Check if the given logger is active for the given level.

Arguments

Type IntentOptional Attributes Name
type(tem_logging_type), intent(in) :: me
integer, intent(in) :: level

Return Value logical


Called by

proc~~tem_logging_isactive_for~~CalledByGraph proc~tem_logging_isactive_for tem_logging_isActive_for interface~tem_logging_isactive tem_logging_isActive interface~tem_logging_isactive->proc~tem_logging_isactive_for proc~build_levelelements build_levelElements proc~build_levelelements->interface~tem_logging_isactive proc~communicate_elements communicate_elements proc~communicate_elements->interface~tem_logging_isactive proc~redefine_halos redefine_halos proc~communicate_elements->proc~redefine_halos proc~redefine_halos->interface~tem_logging_isactive proc~tem_init_elemlevels tem_init_elemLevels proc~tem_init_elemlevels->interface~tem_logging_isactive proc~tem_reportstatus tem_reportStatus proc~tem_reportstatus->interface~tem_logging_isactive proc~tem_create_leveldesc tem_create_levelDesc proc~tem_create_leveldesc->proc~tem_init_elemlevels proc~tem_find_allelements tem_find_allElements proc~tem_create_leveldesc->proc~tem_find_allelements proc~tem_find_allelements->proc~build_levelelements proc~tem_find_allelements->proc~communicate_elements proc~tem_dimbydim_construction tem_dimByDim_construction proc~tem_dimbydim_construction->proc~tem_create_leveldesc

Source Code

  function tem_logging_isActive_for(me, level) result(isActive)
    ! ---------------------------------------------------------------------------
    !>
    type(tem_logging_type), intent(in) :: me
    !>
    integer, intent(in) :: level
    !>
    logical :: isActive
    ! ---------------------------------------------------------------------------

    isActive = (me%participating .and. (me%log_level >= level))

  end function tem_logging_isActive_for