perf_configure Subroutine

public subroutine perf_configure(enabled)

明示フラグで計測状態を設定する。

Arguments

Type IntentOptional Attributes Name
logical, intent(in) :: enabled

Calls

proc~~perf_configure~~CallsGraph proc~perf_configure perf_configure proc~perf_reset perf_reset proc~perf_configure->proc~perf_reset

Called by

proc~~perf_configure~~CalledByGraph proc~perf_configure perf_configure proc~perf_configure_from_env perf_configure_from_env proc~perf_configure_from_env->proc~perf_configure program~main main program~main->proc~perf_configure_from_env

Source Code

  subroutine perf_configure(enabled)
    logical, intent(in) :: enabled

    call perf_reset()
    perf_state%enabled = enabled
    perf_state%omp_max_threads = 1_i32
!$  perf_state%omp_max_threads = int(max(1, omp_get_max_threads()), i32)
  end subroutine perf_configure