dbcsr_mp_new_transposed Subroutine

public subroutine dbcsr_mp_new_transposed(mp_t, mp)

Transposes a multiprocessor environment

Arguments

TypeIntentOptionalAttributesName
type(dbcsr_mp_obj), intent(out) :: mp_t

transposed multiprocessor environment

type(dbcsr_mp_obj), intent(in) :: mp

original multiprocessor environment


Contents


Source Code

   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