dbcsr_t_pgrid_create Subroutine

public subroutine dbcsr_t_pgrid_create(mp_comm, dims, pgrid, tensor_dims)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: mp_comm
integer, intent(inout), DIMENSION(:) :: dims
type(dbcsr_t_pgrid_type), intent(out) :: pgrid
integer, intent(in), optional, DIMENSION(:) :: tensor_dims

Source Code

   SUBROUTINE dbcsr_t_pgrid_create(mp_comm, dims, pgrid, tensor_dims)
      INTEGER, INTENT(IN) :: mp_comm
      INTEGER, DIMENSION(:), INTENT(INOUT) :: dims
      TYPE(dbcsr_t_pgrid_type), INTENT(OUT) :: pgrid
      INTEGER, DIMENSION(:), INTENT(IN), OPTIONAL :: tensor_dims

      TYPE(mp_comm_type)                                :: my_mp_comm

      CALL my_mp_comm%set_handle(mp_comm)

      CALL dbcsr_t_pgrid_create_prv(my_mp_comm, dims, pgrid, tensor_dims)

   END SUBROUTINE dbcsr_t_pgrid_create