22#include "../../base/base_uses.f90"
27 CHARACTER(len=*),
PARAMETER,
PRIVATE :: moduleN =
'dbt_tas_types'
54 INTEGER,
DIMENSION(2) :: pdims = [-1, -1]
55 INTEGER :: igroup = -1
56 INTEGER :: ngroup = -1
57 INTEGER :: split_rowcol = -1
58 INTEGER :: pgrid_split_size = -1
59 INTEGER :: group_size = -1
61 INTEGER,
ALLOCATABLE :: ngroup_opt
62 LOGICAL,
DIMENSION(2) :: strict_split = [.false., .false.]
63 INTEGER,
POINTER :: refcount => null()
71 INTEGER(KIND=int_8),
ALLOCATABLE,
DIMENSION(:) :: local_rowcols
84 LOGICAL :: batched_out = .false.
85 LOGICAL :: batched_trans = .false.
86 REAL(
dp) :: batched_beta = 1.0_dp
107 INTEGER(KIND=int_8) :: nblkrows = -1
108 INTEGER(KIND=int_8) :: nblkcols = -1
109 INTEGER(KIND=int_8) :: nblkrowscols_split = -1
110 INTEGER(KIND=int_8) :: nfullrows = -1
111 INTEGER(KIND=int_8) :: nfullcols = -1
112 LOGICAL :: valid = .false.
113 INTEGER :: do_batched = 0
115 LOGICAL :: has_opt_pgrid = .false.
Global data (distribution and block sizes) for tall-and-skinny matrices For very sparse matrices with...
DBT tall-and-skinny base types. Mostly wrappers around existing DBM routines.
Defines the basic variable types.
integer, parameter, public int_8
integer, parameter, public dp
Interface to the message passing library MPI.