dbcsr_buffer Derived Type

type, private :: dbcsr_buffer


Components

Type Visibility Attributes Name Initial
type(dbcsr_data_obj), public :: DATA = dbcsr_data_obj()
type(dbcsr_data_obj), public :: data_before_resize = dbcsr_data_obj()
type(dbcsr_data_obj), public :: trs_stackbuf = dbcsr_data_obj()
integer, public :: vprow = -1
integer, public :: vpcol = -1
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 = mp_win_type()
type(mp_win_type), public :: meta_win = mp_win_type()
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 = -1
integer, public :: num_layers_3D = 1
integer, public :: coord3D = 1
type(dbcsr_type), public :: matrix = dbcsr_type()
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 = dbcsr_data_obj(), &
                                                     data_before_resize = dbcsr_data_obj(), &
                                                     trs_stackbuf = dbcsr_data_obj()
      INTEGER                                     :: vprow = -1, vpcol = -1
      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 = mp_win_type(), meta_win = mp_win_type()
      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 = -1
      INTEGER                                     :: num_layers_3D = 1
      INTEGER                                     :: coord3D = 1
      TYPE(dbcsr_type)                            :: matrix = dbcsr_type()
      LOGICAL                                     :: is_valid = .FALSE., &
                                                     is_comm = .FALSE., &
                                                     has_rma_win = .FALSE.
   END TYPE dbcsr_buffer