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
stpttf dtpttf ctpttf ztpttf
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).
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.