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 mp, only: proc0
    use mp, only: mp_initialized
    integer, intent(in) :: verbosity_level
    logical :: should_print
    if (mp_initialized) then 
      should_print = (proc0 .and. verbosity() .ge. verbosity_level) .or. verbosity() .gt. 3
    else
      should_print = (verbosity() .ge. verbosity_level)
    end if
  end function should_print