dbcsr_t_allocate_and_get_4d_block_r_dp Subroutine

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

allocate and get block

Arguments

TypeIntentOptionalAttributesName
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


Contents

None