version 1.2, 2017/06/17 11:07:02
|
version 1.6, 2023/08/07 08:39:38
|
Line 18
|
Line 18
|
* Definition: |
* Definition: |
* =========== |
* =========== |
* |
* |
* SUBROUTINE ZSYCONVF_ROOK( UPLO, WAY, N, A, LDA, IPIV, E, INFO ) |
* SUBROUTINE ZSYCONVF_ROOK( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) |
* |
* |
* .. Scalar Arguments .. |
* .. Scalar Arguments .. |
* CHARACTER UPLO, WAY |
* CHARACTER UPLO, WAY |
Line 44
|
Line 44
|
*> If parameter WAY = 'R': |
*> If parameter WAY = 'R': |
*> ZSYCONVF_ROOK performs the conversion in reverse direction, i.e. |
*> ZSYCONVF_ROOK performs the conversion in reverse direction, i.e. |
*> converts the factorization output format used in ZSYTRF_RK |
*> converts the factorization output format used in ZSYTRF_RK |
*> (or ZSYTRF_BK) provided on entry in parametes A and E into |
*> (or ZSYTRF_BK) provided on entry in parameters A and E into |
*> the factorization output format used in ZSYTRF_ROOK that is stored |
*> the factorization output format used in ZSYTRF_ROOK that is stored |
*> on exit in parameter A. IPIV format for ZSYTRF_ROOK and |
*> on exit in parameter A. IPIV format for ZSYTRF_ROOK and |
*> ZSYTRF_RK (or ZSYTRF_BK) is the same and is not converted. |
*> ZSYTRF_RK (or ZSYTRF_BK) is the same and is not converted. |
Line 183
|
Line 183
|
*> \author Univ. of Colorado Denver |
*> \author Univ. of Colorado Denver |
*> \author NAG Ltd. |
*> \author NAG Ltd. |
* |
* |
*> \date December 2016 |
|
* |
|
*> \ingroup complex16SYcomputational |
*> \ingroup complex16SYcomputational |
* |
* |
*> \par Contributors: |
*> \par Contributors: |
Line 192
|
Line 190
|
*> |
*> |
*> \verbatim |
*> \verbatim |
*> |
*> |
*> December 2016, Igor Kozachenko, |
*> November 2017, Igor Kozachenko, |
*> Computer Science Division, |
*> Computer Science Division, |
*> University of California, Berkeley |
*> University of California, Berkeley |
*> |
*> |
Line 200
|
Line 198
|
* ===================================================================== |
* ===================================================================== |
SUBROUTINE ZSYCONVF_ROOK( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) |
SUBROUTINE ZSYCONVF_ROOK( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) |
* |
* |
* -- LAPACK computational routine (version 3.7.0) -- |
* -- LAPACK computational routine -- |
* -- LAPACK is a software package provided by Univ. of Tennessee, -- |
* -- LAPACK is a software package provided by Univ. of Tennessee, -- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* December 2016 |
|
* |
* |
* .. Scalar Arguments .. |
* .. Scalar Arguments .. |
CHARACTER UPLO, WAY |
CHARACTER UPLO, WAY |
Line 285
|
Line 282
|
* |
* |
* Convert PERMUTATIONS |
* Convert PERMUTATIONS |
* |
* |
* Apply permutaions to submatrices of upper part of A |
* Apply permutations to submatrices of upper part of A |
* in factorization order where i decreases from N to 1 |
* in factorization order where i decreases from N to 1 |
* |
* |
I = N |
I = N |
Line 336
|
Line 333
|
* |
* |
* Revert PERMUTATIONS |
* Revert PERMUTATIONS |
* |
* |
* Apply permutaions to submatrices of upper part of A |
* Apply permutations to submatrices of upper part of A |
* in reverse factorization order where i increases from 1 to N |
* in reverse factorization order where i increases from 1 to N |
* |
* |
I = 1 |
I = 1 |
Line 426
|
Line 423
|
* |
* |
* Convert PERMUTATIONS |
* Convert PERMUTATIONS |
* |
* |
* Apply permutaions to submatrices of lower part of A |
* Apply permutations to submatrices of lower part of A |
* in factorization order where i increases from 1 to N |
* in factorization order where i increases from 1 to N |
* |
* |
I = 1 |
I = 1 |
Line 477
|
Line 474
|
* |
* |
* Revert PERMUTATIONS |
* Revert PERMUTATIONS |
* |
* |
* Apply permutaions to submatrices of lower part of A |
* Apply permutations to submatrices of lower part of A |
* in reverse factorization order where i decreases from N to 1 |
* in reverse factorization order where i decreases from N to 1 |
* |
* |
I = N |
I = N |