should_print Function

public function should_print(verbosity_level)

Uses

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: verbosity_level

Return Value logical


Contents

Source Code

should_print

Source Code

  function should_print(verbosity_level)
    use runtime_tests, only: verbosity
    use mp, only: proc0, mp_initialized
    integer, intent(in) :: verbosity_level
    logical :: should_print
    if (mp_initialized) then
      should_print = (proc0 .and. verbosity() >= verbosity_level) .or. verbosity() > 3
    else
      should_print = (verbosity() >= verbosity_level)
    end if
  end function should_print