Developer Reference for Intel® oneAPI Math Kernel Library for Fortran
?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. Specifies the order of the matrix A. The value of n must be at least zero.
- 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).
info
INTEGER .
=0: successful exit,
< 0: if info = - i , the i -th parameter had an illegal value.
If info = -1011 , memory allocation error occurred.
Return Values
No return value, info is an Output Parameter.