Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_mp_obj), | intent(in) | :: | mp_env | |||
integer, | intent(in) | :: | prow | |||
integer, | intent(in) | :: | pcol |
PURE FUNCTION dbcsr_mp_get_process(mp_env, prow, pcol) RESULT(process) TYPE(dbcsr_mp_obj), INTENT(IN) :: mp_env INTEGER, INTENT(IN) :: prow, pcol INTEGER :: process process = mp_env%mp%pgrid(prow, pcol) END FUNCTION dbcsr_mp_get_process