Transposes a multiprocessor environment
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_mp_obj), | intent(out) | :: | mp_t |
transposed multiprocessor environment |
||
type(dbcsr_mp_obj), | intent(in) | :: | mp |
original multiprocessor environment |
SUBROUTINE dbcsr_mp_new_transposed(mp_t, mp) !! Transposes a multiprocessor environment TYPE(dbcsr_mp_obj), INTENT(OUT) :: mp_t !! transposed multiprocessor environment TYPE(dbcsr_mp_obj), INTENT(IN) :: mp !! original multiprocessor environment CALL dbcsr_mp_new(mp_t, dbcsr_mp_group(mp), & TRANSPOSE(dbcsr_mp_pgrid(mp)), & dbcsr_mp_mynode(mp), dbcsr_mp_numnodes(mp), & dbcsr_mp_mypcol(mp), dbcsr_mp_myprow(mp)) END SUBROUTINE dbcsr_mp_new_transposed