Visible to Intel only — GUID: GUID-737CEE9F-4F1E-4872-931D-62BC10CF8B96
Visible to Intel only — GUID: GUID-737CEE9F-4F1E-4872-931D-62BC10CF8B96
?tpttf
Copies a triangular matrix from the standard packed format (TP) to the rectangular full packed format (TF).
Syntax
call stpttf( transr, uplo, n, ap, arf, info )
call dtpttf( transr, uplo, n, ap, arf, info )
call ctpttf( transr, uplo, n, ap, arf, info )
call ztpttf( transr, uplo, n, ap, arf, info )
Include Files
- mkl.fi
Description
The routine copies a triangular matrix A from the standard packed format to the Rectangular Full Packed (RFP) format. For the description of the RFP format, see Matrix Storage Schemes.
Input Parameters
- transr
-
CHARACTER*1.
= 'N': arf must be in the Normal format,
= 'T': arf must be in the Transpose format (for stpttf and dtpttf),
= 'C': arf must be in the Conjugate-transpose format (for ctpttf and ztpttf).
- uplo
-
CHARACTER*1.
Specifies whether A is upper or lower triangular:
= 'U': A is upper triangular,
= 'L': A is lower triangular.
- n
-
INTEGER. The order of the matrix A. n≥ 0.
- ap
-
REAL for stpttf,
DOUBLE PRECISION for dtpttf,
COMPLEX for ctpttf,
DOUBLE COMPLEX for ztpttf.
Array, size at least max (1, n*(n+1)/2).
On entry, the upper or lower triangular matrix A, packed columnwise in a linear array.
The j-th column of A is stored in the array ap as follows:
if uplo = 'U', ap(i + (j-1)*j/2) = A(i,j) for 1 ≤ i ≤ j,
if uplo = 'L', ap(i + (j-1)*(2n-j)/2) = A(i,j) for j ≤ i ≤ n.
Output Parameters
- arf
-
REAL for stpttf,
DOUBLE PRECISION for dtpttf,
COMPLEX for ctfttp,
DOUBLE COMPLEX for ztpttf.
Array, size at least max (1, n*(n+1)/2).
On exit, the upper or lower triangular matrix A stored in the RFP format. - info
-
INTEGER.
=0: successful exit,
< 0: if info = -i, the i-th parameter had an illegal value.
If info = -1011, memory allocation error occurred.