Developer Reference for Intel® oneAPI Math Kernel Library for Fortran
p?herk
Performs a rank-k update of a distributed Hermitian matrix.
Syntax
call pcherk ( uplo , trans , n , k , alpha , a , ia , ja , desca , beta , c , ic , jc , descc )
call pzherk ( uplo , trans , n , k , alpha , a , ia , ja , desca , beta , c , ic , jc , descc )
Include Files
mkl_pblas.h
Description
The p?herk routines perform a distributed matrix-matrix operation defined as sub( C ):= alpha *sub( A )*conjg(sub( A )’)+ beta *sub( C ),
or sub( C ):= alpha *conjg(sub( A )’)*sub( A )+ beta *sub( C ),
where:
alpha and beta are scalars,
sub(C) is an n -by- n Hermitian distributed matrix, sub(C)=C(ic:ic+n-1, jc:jc+n-1) .
sub(A) is a distributed matrix, sub(A)=A(ia:ia+n-1, ja:ja+k-1) , if trans = 'N' or 'n' , and sub(A)=A(ia:ia+k-1, ja:ja+n-1) otherwise.
Input Parameters
uplo
(global) CHARACTER*1 . Specifies whether the upper or lower triangular part of the Hermitian distributed matrix sub(C) is used:
If uplo = 'U' or ‘u’ , then the upper triangular part of the sub(C) is used. If uplo = 'L' or ‘l’ , then the low triangular part of the sub(C) is used.
trans
(global) CHARACTER*1 . Specifies the operation:
if trans = 'N' or 'n' , then sub(C) := alpha*sub(A)*conjg(sub(A)') + beta*sub(C) ; if trans = 'C' or 'c' , then sub(C) := alpha*conjg(sub(A)')*sub(A) + beta*sub(C) .
n
(global) INTEGER . Specifies the order of the distributed matrix sub(C) , n ≥ 0.
k
(global) INTEGER . On entry with trans = 'N' or ‘n’ , k specifies the number of columns of the distributed matrix sub(A) , and on entry with trans = 'T' or ‘t’ or ‘C’ or ‘c’ , k specifies the number of rows of the distributed matrix sub(A) , k ≥ 0.
alpha
(global) REAL for pcherk
DOUBLE PRECISION for pzherk Specifies the scalar alpha .
a
(local) COMPLEX for pcherk
DOUBLE COMPLEX for pzherk Array, size (lld_a, kla) , where kla is LOCq(ja+k-1) when trans = 'N' or ‘n’ , and is LOCq(ja+n-1) otherwise. Before entry with trans = 'N' or ‘n’ , this array contains the local pieces of the distributed matrix sub(A) .
ia , ja
(global) INTEGER . The row and column indices in the distributed matrix A indicating the first row and the first column of the submatrix sub(A) , respectively.
desca
(global and local) INTEGER array of dimension 9. The array descriptor of the distributed matrix A .
beta
(global) REAL for pcherk
DOUBLE PRECISION for pzherk Specifies the scalar beta .
c
(local) COMPLEX for pcherk
DOUBLE COMPLEX for pzherk Array, size (lld_c, LOCq(jc+n-1)) . Before entry with uplo = 'U' or ‘u’ , this array contains n -by- n upper triangular part of the symmetric distributed matrix sub(C) and its strictly lower triangular part is not referenced. Before entry with uplo = 'L' or ‘l’ , this array contains n -by- n lower triangular part of the symmetric distributed matrix sub(C) and its strictly upper triangular part is not referenced.
ic , jc
(global) INTEGER . The row and column indices in the distributed matrix C indicating the first row and the first column of the submatrix sub(C) , respectively.
descc
(global and local) INTEGER array of dimension 9. The array descriptor of the distributed matrix C .
Output Parameters
- c
-
With uplo = 'U' or ‘u’ , the upper triangular part of sub(C) is overwritten by the upper triangular part of the updated distributed matrix. With uplo = 'L' or ‘l’ , the lower triangular part of sub(C) is overwritten by the upper triangular part of the updated distributed matrix.