Developer Reference

  • 2020.2
  • 07/15/2020
  • Public Content
Contents

mkl_?tppack

Copies a triangular/symmetric matrix or submatrix from standard full format to standard packed format.

Syntax

call mkl_stppack
(
uplo
,
trans
,
n
,
ap
,
i
,
j
,
rows
,
cols
,
a
,
lda
,
info
)
call mkl_dtppack
(
uplo
,
trans
,
n
,
ap
,
i
,
j
,
rows
,
cols
,
a
,
lda
,
info
)
call mkl_ctppack
(
uplo
,
trans
,
n
,
ap
,
i
,
j
,
rows
,
cols
,
a
,
lda
,
info
)
call mkl_ztppack
(
uplo
,
trans
,
n
,
ap
,
i
,
j
,
rows
,
cols
,
a
,
lda
,
info
)
call mkl_tppack
(
ap
,
i
,
j
,
rows
,
cols
,
a
[
,
uplo
] [
,
trans
] [
,
info
]
)
Include Files
  • mkl.fi, lapack.f90
Description
The routine copies a triangular or symmetric matrix or its submatrix from standard full format to packed format
AP
i
:
i
+
rows
-1,
j
:
j
+
cols
-1
:= op(
A
)
Standard packed formats include:
  • TP: triangular packed storage
  • SP: symmetric indefinite packed storage
  • HP: Hermitian indefinite packed storage
  • PP: symmetric or Hermitian positive definite packed storage
Full formats include:
  • GE: general
  • TR: triangular
  • SY: symmetric indefinite
  • HE: Hermitian indefinite
  • PO: symmetric or Hermitian positive definite
Any elements of the copied submatrix rectangular outside of the triangular part of the matrix
AP
are skipped.
Input Parameters
The data types are given for the Fortran interface.
uplo
CHARACTER*1.
Specifies whether the matrix
AP
is upper or lower triangular.
If
uplo
= 'U',
AP
is upper triangular.
If
uplo
= 'L':
AP
is lower triangular.
trans
CHARACTER*1.
Specifies whether or not the copied block of
A
is transposed or not.
If
trans
= 'N', no transpose:
op(
A
) =
A
.
If
trans
= 'T',transpose:
op(
A
) =
A
T
.
If
trans
= 'C',conjugate transpose:
op(
A
) =
A
H
. For real data this is the same as
trans
= 'T'.
n