tpttf#
Functions
-
void stpttf(const char *transr, const char *uplo, const INT n, const f32 *restrict AP, f32 *restrict ARF, INT *info)#
STPTTF copies a triangular matrix A from standard packed format (TP) to rectangular full packed format (TF).
Parameters
intransr= ‘N’: ARF in Normal format is wanted; = ‘T’: ARF in Conjugate-transpose format is wanted.
inuplo= ‘U’: A is upper triangular; = ‘L’: A is lower triangular.
innThe order of the matrix A. n >= 0.
inAPDouble precision array, dimension ( 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.
outARFDouble precision array, dimension ( n*(n+1)/2 ), On exit, the upper or lower triangular matrix A stored in RFP format. For a further discussion see Notes below.
outinfo= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value
void stpttf(
const char* transr,
const char* uplo,
const INT n,
const f32* restrict AP,
f32* restrict ARF,
INT* info
);
Functions
-
void dtpttf(const char *transr, const char *uplo, const INT n, const f64 *restrict AP, f64 *restrict ARF, INT *info)#
DTPTTF copies a triangular matrix A from standard packed format (TP) to rectangular full packed format (TF).
Parameters
intransr= ‘N’: ARF in Normal format is wanted; = ‘T’: ARF in Conjugate-transpose format is wanted.
inuplo= ‘U’: A is upper triangular; = ‘L’: A is lower triangular.
innThe order of the matrix A. n >= 0.
inAPDouble precision array, dimension ( 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.
outARFDouble precision array, dimension ( n*(n+1)/2 ), On exit, the upper or lower triangular matrix A stored in RFP format. For a further discussion see Notes below.
outinfo= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value
void dtpttf(
const char* transr,
const char* uplo,
const INT n,
const f64* restrict AP,
f64* restrict ARF,
INT* info
);
Functions
-
void ctpttf(const char *transr, const char *uplo, const INT n, const c64 *restrict AP, c64 *restrict ARF, INT *info)#
CTPTTF copies a triangular matrix A from standard packed format (TP) to rectangular full packed format (TF).
Parameters
intransr= ‘N’: ARF in Normal format is wanted; = ‘C’: ARF in Conjugate-transpose format is wanted.
inuplo= ‘U’: A is upper triangular; = ‘L’: A is lower triangular.
innThe order of the matrix A. n >= 0.
inAPSingle complex array, dimension ( 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.
outARFSingle complex array, dimension ( n*(n+1)/2 ), On exit, the upper or lower triangular matrix A stored in RFP format. For a further discussion see Notes below.
outinfo= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value
void ctpttf(
const char* transr,
const char* uplo,
const INT n,
const c64* restrict AP,
c64* restrict ARF,
INT* info
);
Functions
-
void ztpttf(const char *transr, const char *uplo, const INT n, const c128 *restrict AP, c128 *restrict ARF, INT *info)#
ZTPTTF copies a triangular matrix A from standard packed format (TP) to rectangular full packed format (TF).
Parameters
intransr= ‘N’: ARF in Normal format is wanted; = ‘C’: ARF in Conjugate-transpose format is wanted.
inuplo= ‘U’: A is upper triangular; = ‘L’: A is lower triangular.
innThe order of the matrix A. n >= 0.
inAPDouble complex array, dimension ( 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.
outARFDouble complex array, dimension ( n*(n+1)/2 ), On exit, the upper or lower triangular matrix A stored in RFP format. For a further discussion see Notes below.
outinfo= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value
void ztpttf(
const char* transr,
const char* uplo,
const INT n,
const c128* restrict AP,
c128* restrict ARF,
INT* info
);