diff options
Diffstat (limited to 'SRC/dormrz.f')
| -rw-r--r-- | SRC/dormrz.f | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/SRC/dormrz.f b/SRC/dormrz.f index b9f775ac..a6c5f2aa 100644 --- a/SRC/dormrz.f +++ b/SRC/dormrz.f @@ -264,19 +264,19 @@ * IF( LEFT ) THEN * -* H or H' is applied to C(i:m,1:n) +* H or H**T is applied to C(i:m,1:n) * MI = M - I + 1 IC = I ELSE * -* H or H' is applied to C(1:m,i:n) +* H or H**T is applied to C(1:m,i:n) * NI = N - I + 1 JC = I END IF * -* Apply H or H' +* Apply H or H**T * CALL DLARZB( SIDE, TRANST, 'Backward', 'Rowwise', MI, NI, $ IB, L, A( I, JA ), LDA, T, LDT, C( IC, JC ), |