Return to ztpcon.f CVS log | Up to [local] / rpl / lapack / lapack |
version 1.7, 2010/12/21 13:53:57 | version 1.8, 2011/07/22 07:38:21 |
---|---|
Line 166 | Line 166 |
$ WORK, SCALE, RWORK, INFO ) | $ WORK, SCALE, RWORK, INFO ) |
ELSE | ELSE |
* | * |
* Multiply by inv(A'). | * Multiply by inv(A**H). |
* | * |
CALL ZLATPS( UPLO, 'Conjugate transpose', DIAG, NORMIN, | CALL ZLATPS( UPLO, 'Conjugate transpose', DIAG, NORMIN, |
$ N, AP, WORK, SCALE, RWORK, INFO ) | $ N, AP, WORK, SCALE, RWORK, INFO ) |