?tfttp

Syntax

FORTRAN 77:

call stfttp( transr, uplo, n, arf, ap, info )

call dtfttp( transr, uplo, n, arf, ap, info )

call ctfttp( transr, uplo, n, arf, ap, info )

call ztfttp( transr, uplo, n, arf, ap, info )

C:

lapack_int LAPACKE_<?>tfttp( int matrix_order, char transr, char uplo, lapack_int n, const <datatype>* arf, <datatype>* ap );

Include Files

• FORTRAN 77: mkl_lapack.fi and mkl_lapack.h
• C: mkl_lapacke.h

Description

The routine copies a triangular matrix A from the Rectangular Full Packed (RFP) format to the standard packed format. For the description of the RFP format, see Matrix Storage Schemes.

Input Parameters

The data types are given for the Fortran interface. A <datatype> placeholder, if present, is used for the C interface data types in the C interface section above. See C Interface Conventions for the C interface principal conventions and type defintions.

transr

CHARACTER*1.

= 'N': arf is in the Normal format,

= 'T': arf is in the Transpose format (for stfttp and dtfttp),

= 'C': arf is in the Conjugate-transpose format (for ctfttp and ztfttp).

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.

arf

REAL for stfttp,

DOUBLE PRECISION for dtfttp,

COMPLEX for ctfttp,

DOUBLE COMPLEX for ztfttp.

Array, DIMENSION at least max (1, n*(n+1)/2).

On entry, the upper or lower triangular matrix A stored in the RFP format.

Output Parameters

ap

REAL for stfttp,

DOUBLE PRECISION for dtfttp,

COMPLEX for ctfttp,

DOUBLE COMPLEX for ztfttp.

Array, DIMENSION at least max (1, n*(n+1)/2).

On exit, 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.

info

INTEGER.

=0: successful exit,

< 0: if info = -i, the i-th parameter had an illegal value.