dbcsr_t_get_block Interface

public interface dbcsr_t_get_block

Module Procedures

private subroutine dbcsr_t_get_2d_block_r_dp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(2) :: ind

block index

integer, intent(in), DIMENSION(2) :: sizes

block size

real(kind=real_8), intent(out), DIMENSION(sizes(1), sizes(2)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_2d_block_r_dp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(2) :: ind

block index

real(kind=real_8), intent(out), DIMENSION(:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_3d_block_r_dp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(3) :: ind

block index

integer, intent(in), DIMENSION(3) :: sizes

block size

real(kind=real_8), intent(out), DIMENSION(sizes(1), sizes(2), sizes(3)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_3d_block_r_dp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(3) :: ind

block index

real(kind=real_8), intent(out), DIMENSION(:,:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_4d_block_r_dp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(4) :: ind

block index

integer, intent(in), DIMENSION(4) :: sizes

block size

real(kind=real_8), intent(out), DIMENSION(sizes(1), sizes(2), sizes(3), sizes(4)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_4d_block_r_dp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(4) :: ind

block index

real(kind=real_8), intent(out), DIMENSION(:,:,:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_2d_block_r_sp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(2) :: ind

block index

integer, intent(in), DIMENSION(2) :: sizes

block size

real(kind=real_4), intent(out), DIMENSION(sizes(1), sizes(2)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_2d_block_r_sp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(2) :: ind

block index

real(kind=real_4), intent(out), DIMENSION(:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_3d_block_r_sp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(3) :: ind

block index

integer, intent(in), DIMENSION(3) :: sizes

block size

real(kind=real_4), intent(out), DIMENSION(sizes(1), sizes(2), sizes(3)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_3d_block_r_sp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(3) :: ind

block index

real(kind=real_4), intent(out), DIMENSION(:,:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_4d_block_r_sp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(4) :: ind

block index

integer, intent(in), DIMENSION(4) :: sizes

block size

real(kind=real_4), intent(out), DIMENSION(sizes(1), sizes(2), sizes(3), sizes(4)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_4d_block_r_sp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(4) :: ind

block index

real(kind=real_4), intent(out), DIMENSION(:,:,:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_2d_block_c_dp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(2) :: ind

block index

integer, intent(in), DIMENSION(2) :: sizes

block size

complex(kind=real_8), intent(out), DIMENSION(sizes(1), sizes(2)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_2d_block_c_dp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(2) :: ind

block index

complex(kind=real_8), intent(out), DIMENSION(:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_3d_block_c_dp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(3) :: ind

block index

integer, intent(in), DIMENSION(3) :: sizes

block size

complex(kind=real_8), intent(out), DIMENSION(sizes(1), sizes(2), sizes(3)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_3d_block_c_dp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(3) :: ind

block index

complex(kind=real_8), intent(out), DIMENSION(:,:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_4d_block_c_dp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(4) :: ind

block index

integer, intent(in), DIMENSION(4) :: sizes

block size

complex(kind=real_8), intent(out), DIMENSION(sizes(1), sizes(2), sizes(3), sizes(4)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_4d_block_c_dp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(4) :: ind

block index

complex(kind=real_8), intent(out), DIMENSION(:,:,:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_2d_block_c_sp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(2) :: ind

block index

integer, intent(in), DIMENSION(2) :: sizes

block size

complex(kind=real_4), intent(out), DIMENSION(sizes(1), sizes(2)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_2d_block_c_sp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(2) :: ind

block index

complex(kind=real_4), intent(out), DIMENSION(:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_3d_block_c_sp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(3) :: ind

block index

integer, intent(in), DIMENSION(3) :: sizes

block size

complex(kind=real_4), intent(out), DIMENSION(sizes(1), sizes(2), sizes(3)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_3d_block_c_sp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(3) :: ind

block index

complex(kind=real_4), intent(out), DIMENSION(:,:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_4d_block_c_sp(tensor, ind, sizes, block, found)

Template for dbcsr_t_get_block.

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(4) :: ind

block index

integer, intent(in), DIMENSION(4) :: sizes

block size

complex(kind=real_4), intent(out), DIMENSION(sizes(1), sizes(2), sizes(3), sizes(4)) :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_allocate_and_get_4d_block_c_sp(tensor, ind, block, found)

allocate and get block

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(4) :: ind

block index

complex(kind=real_4), intent(out), DIMENSION(:,:,:,:), ALLOCATABLE :: block

block to get

logical, intent(out) :: found

whether block was found

private subroutine dbcsr_t_get_anyd_block(tensor, ind, block, found)

Generic implementation of dbcsr_t_get_block (arbitrary tensor rank and arbitrary datatype)

Arguments

Type IntentOptional Attributes Name
type(dbcsr_t_type), intent(inout) :: tensor
integer, intent(in), DIMENSION(ndims_tensor(tensor)) :: ind

block index

type(block_nd), intent(out) :: block

block to get

logical, intent(out) :: found

whether block was found