dbcsr_buffer Derived Type

type, private :: dbcsr_buffer


Components

Type Visibility Attributes Name Initial
type(dbcsr_data_obj), public :: DATA
type(dbcsr_data_obj), public :: data_before_resize
type(dbcsr_data_obj), public :: trs_stackbuf
integer, public :: vprow
integer, public :: vpcol
integer, public :: myproc = -1
type(mp_comm_type), public :: grp = mp_comm_null
type(mp_comm_type), public :: subgrp = mp_comm_null
type(mp_win_type), public :: data_win
type(mp_win_type), public :: meta_win
integer, public, DIMENSION(:), POINTER, CONTIGUOUS :: meta => Null()
integer, public, DIMENSION(:), POINTER, CONTIGUOUS :: meta_before_resize => Null()
integer, public, DIMENSION(:), POINTER, CONTIGUOUS :: meta_red3D => Null()
type(mp_request_type), public, DIMENSION(2) :: get_requests = mp_request_null
integer, public :: meta_size
integer, public :: num_layers_3D = 1
integer, public :: coord3D = 1
type(dbcsr_type), public :: matrix
logical, public :: is_valid = .FALSE.
logical, public :: is_comm = .FALSE.
logical, public :: has_rma_win = .FALSE.

Source Code

   TYPE dbcsr_buffer
      TYPE(dbcsr_data_obj)                        :: DATA, &
                                                     data_before_resize, &
                                                     trs_stackbuf
      INTEGER                                     :: vprow, vpcol
      INTEGER                                     :: myproc = -1
      TYPE(mp_comm_type)                          :: grp = mp_comm_null, & ! Global communicator
                                                     subgrp = mp_comm_null ! Communicator for A and B
      TYPE(mp_win_type)                           :: data_win, meta_win
      INTEGER, DIMENSION(:), POINTER, CONTIGUOUS  :: meta => Null(), &
                                                     meta_before_resize => Null(), &
                                                     meta_red3D => Null()
      TYPE(mp_request_type), DIMENSION(2)         :: get_requests = mp_request_null
      INTEGER                                     :: meta_size
      INTEGER                                     :: num_layers_3D = 1
      INTEGER                                     :: coord3D = 1
      TYPE(dbcsr_type)                            :: matrix
      LOGICAL                                     :: is_valid = .FALSE., &
                                                     is_comm = .FALSE., &
                                                     has_rma_win = .FALSE.
   END TYPE dbcsr_buffer