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