Return to dtrtrs.f CVS log | Up to [local] / rpl / lapack / lapack |
version 1.7, 2010/12/21 13:53:41 | version 1.8, 2011/07/22 07:38:13 |
---|---|
Line 136 | Line 136 |
END IF | END IF |
INFO = 0 | INFO = 0 |
* | * |
* Solve A * x = b or A' * x = b. | * Solve A * x = b or A**T * x = b. |
* | * |
CALL DTRSM( 'Left', UPLO, TRANS, DIAG, N, NRHS, ONE, A, LDA, B, | CALL DTRSM( 'Left', UPLO, TRANS, DIAG, N, NRHS, ONE, A, LDA, B, |
$ LDB ) | $ LDB ) |