elpa_pxgemm_helpers_template.F90 File Reference

#include "../general/error_checking.inc"
#include "../../src/general/precision_kinds.F90"

Go to the source code of this file.

Functions/Subroutines
subroutine	set_zeros_in_unused_block_part_MATH_DATATYPE_PRECISION (aux_mat_full, nblk, nblk_rows_cut, nblk_cols_cut, i_block_loc_fine, j_block_loc_fine, shift_i, shift_j)

Function/Subroutine Documentation

set_zeros_in_unused_block_part_MATH_DATATYPE_PRECISION()

subroutine set_zeros_in_unused_block_part_MATH_DATATYPE_PRECISION	(	dimension(:,:), contiguous	aux_mat_full,
		integer(kind=ik)	nblk,
		integer(kind=ik)	nblk_rows_cut,
		integer(kind=ik)	nblk_cols_cut,
		integer(kind=ik)	i_block_loc_fine,
		integer(kind=ik)	j_block_loc_fine,
		integer(kind=ik), value	shift_i,
		integer(kind=ik), value	shift_j )