Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | scr |
SUBROUTINE describe_mp_perf_env(scr)
INTEGER, INTENT(in) :: scr
TYPE(mp_perf_env_type), POINTER :: perf_env
perf_env => get_mp_perf_env()
CALL mp_perf_env_describe(perf_env, scr)
END SUBROUTINE describe_mp_perf_env