Developer Reference for Intel® oneAPI Math Kernel Library for Fortran
?tpttr
Copies a triangular matrix from the standard packed format (TP) to the standard full format (TR) .
Syntax
call stpttr ( uplo , n , ap , a , lda , info )
call dtpttr ( uplo , n , ap , a , lda , info )
call ctpttr ( uplo , n , ap , a , lda , info )
call ztpttr ( uplo , n , ap , a , lda , info )
Include Files
mkl.fi
Description
stpttr dtpttr ctpttr ztpttr
The routine copies a triangular matrix A from the standard packed format to the standard full format.
Input Parameters
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 matrices ap and a . n≥ 0 .
- ap
-
REAL for stpttr , DOUBLE PRECISION for dtpttr , COMPLEX for ctpttr , DOUBLE COMPLEX for ztpttr . Array, size at least max (1, n *( n +1)/2). (see Matrix Storage Schemes ). 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 .
lda
INTEGER . The leading dimension of the array a.lda ≥ max (1, n ).
Output Parameters
- a
-
REAL for stpttr , DOUBLE PRECISION for dtpttr , COMPLEX for ctpttr , DOUBLE COMPLEX for ztpttr .
Array, size ( lda, *) .
On exit, the triangular matrix A . If uplo = ‘U’, the leading n -by- n upper triangular part of the array a contains the upper triangular part of the matrix A , and the strictly lower triangular part of a is not referenced. If uplo = ‘L’, the leading n -by- n lower triangular part of the array a contains the lower triangular part of the matrix A , and the strictly upper triangular part of a is not referenced.
info
INTEGER .
If info = 0 , the execution is successful.
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.