Return to zla_gbrcond_x.f CVS log | Up to [local] / rpl / lapack / lapack |
version 1.4, 2010/12/21 13:53:48 | version 1.5, 2011/07/22 07:38:16 |
---|---|
Line 202 | Line 202 |
END DO | END DO |
ELSE | ELSE |
* | * |
* Multiply by inv(X'). | * Multiply by inv(X**H). |
* | * |
DO I = 1, N | DO I = 1, N |
WORK( I ) = WORK( I ) / X( I ) | WORK( I ) = WORK( I ) / X( I ) |