diff options
Diffstat (limited to 'SRC/dlaqtr.f')
| -rw-r--r-- | SRC/dlaqtr.f | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/SRC/dlaqtr.f b/SRC/dlaqtr.f index e56a1c23..18c42f46 100644 --- a/SRC/dlaqtr.f +++ b/SRC/dlaqtr.f @@ -51,7 +51,7 @@ * LTRAN (input) LOGICAL * On entry, LTRAN specifies the option of conjugate transpose: * = .FALSE., op(T+i*B) = T+i*B, -* = .TRUE., op(T+i*B) = (T+i*B)'. +* = .TRUE., op(T+i*B) = (T+i*B)**T. * * LREAL (input) LOGICAL * On entry, LREAL specifies the input matrix structure: @@ -532,7 +532,7 @@ * ELSE * -* Solve (T + iB)'*(p+iq) = c+id +* Solve (T + iB)**T*(p+iq) = c+id * JNEXT = 1 DO 80 J = 1, N |