dbcsr_t_test_formats Subroutine

public subroutine dbcsr_t_test_formats(ndims, mp_comm, unit_nr, verbose, blk_size_1, blk_size_2, blk_size_3, blk_size_4, blk_ind_1, blk_ind_2, blk_ind_3, blk_ind_4)

Test equivalence of all tensor formats, using a random distribution.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ndims

tensor rank

integer, intent(in) :: mp_comm
integer, intent(in) :: unit_nr

output unit, needs to be a valid unit number on all mpi ranks

logical, intent(in) :: verbose

if .TRUE., print all tensor blocks

integer, intent(in), optional, DIMENSION(:) :: blk_size_1

block sizes along respective dimension

integer, intent(in), optional, DIMENSION(:) :: blk_size_2

block sizes along respective dimension

integer, intent(in), optional, DIMENSION(:) :: blk_size_3

block sizes along respective dimension

integer, intent(in), optional, DIMENSION(:) :: blk_size_4

block sizes along respective dimension

integer, intent(in), optional, DIMENSION(:) :: blk_ind_1

index along respective dimension of non-zero blocks

integer, intent(in), optional, DIMENSION(:) :: blk_ind_2

index along respective dimension of non-zero blocks

integer, intent(in), optional, DIMENSION(:) :: blk_ind_3

index along respective dimension of non-zero blocks

integer, intent(in), optional, DIMENSION(:) :: blk_ind_4

index along respective dimension of non-zero blocks


Contents