version 1.19, 2018/05/29 07:18:39
|
version 1.21, 2023/08/07 08:39:41
|
Line 67
|
Line 67
|
*> R * B**H + L * E**H = scale * -F |
*> R * B**H + L * E**H = scale * -F |
*> |
*> |
*> This case is used to compute an estimate of Dif[(A, D), (B, E)] = |
*> This case is used to compute an estimate of Dif[(A, D), (B, E)] = |
*> = sigma_min(Z) using reverse communicaton with ZLACON. |
*> = sigma_min(Z) using reverse communication with ZLACON. |
*> |
*> |
*> ZTGSY2 also (IJOB >= 1) contributes to the computation in ZTGSYL |
*> ZTGSY2 also (IJOB >= 1) contributes to the computation in ZTGSYL |
*> of an upper bound on the separation between to matrix pairs. Then |
*> of an upper bound on the separation between to matrix pairs. Then |
Line 81
|
Line 81
|
*> \param[in] TRANS |
*> \param[in] TRANS |
*> \verbatim |
*> \verbatim |
*> TRANS is CHARACTER*1 |
*> TRANS is CHARACTER*1 |
*> = 'N', solve the generalized Sylvester equation (1). |
*> = 'N': solve the generalized Sylvester equation (1). |
*> = 'T': solve the 'transposed' system (3). |
*> = 'T': solve the 'transposed' system (3). |
*> \endverbatim |
*> \endverbatim |
*> |
*> |
Line 244
|
Line 244
|
*> \author Univ. of Colorado Denver |
*> \author Univ. of Colorado Denver |
*> \author NAG Ltd. |
*> \author NAG Ltd. |
* |
* |
*> \date December 2016 |
|
* |
|
*> \ingroup complex16SYauxiliary |
*> \ingroup complex16SYauxiliary |
* |
* |
*> \par Contributors: |
*> \par Contributors: |
Line 259
|
Line 257
|
$ LDD, E, LDE, F, LDF, SCALE, RDSUM, RDSCAL, |
$ LDD, E, LDE, F, LDF, SCALE, RDSUM, RDSCAL, |
$ INFO ) |
$ INFO ) |
* |
* |
* -- LAPACK auxiliary routine (version 3.7.0) -- |
* -- LAPACK auxiliary 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 TRANS |
CHARACTER TRANS |