Developer Reference for Intel® oneAPI Math Kernel Library for Fortran

ID 766686
Date 11/07/2023
Public

A newer version of this document is available. Customers should click here to go to the newest version.

Document Table of Contents

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.