[BACK]Return to dormr2.f CVS log [TXT] [DIR] Up to [local] / rpl / lapack / lapack

Diff for /rpl/lapack/lapack/dormr2.f between versions 1.7 and 1.8

version 1.7, 2010/12/21 13:53:35 version 1.8, 2011/07/22 07:38:09
Line 1 Line 1
       SUBROUTINE DORMR2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC,        SUBROUTINE DORMR2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC,
      $                   WORK, INFO )       $                   WORK, INFO )
 *  *
 *  -- LAPACK routine (version 3.2) --  *  -- LAPACK routine (version 3.3.1) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --  *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--  *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
 *     November 2006  *  -- April 2011                                                      --
 *  *
 *     .. Scalar Arguments ..  *     .. Scalar Arguments ..
       CHARACTER          SIDE, TRANS        CHARACTER          SIDE, TRANS
Line 21 Line 21
 *  *
 *        Q * C  if SIDE = 'L' and TRANS = 'N', or  *        Q * C  if SIDE = 'L' and TRANS = 'N', or
 *  *
 *        Q'* C  if SIDE = 'L' and TRANS = 'T', or  *        Q**T* C  if SIDE = 'L' and TRANS = 'T', or
 *  *
 *        C * Q  if SIDE = 'R' and TRANS = 'N', or  *        C * Q  if SIDE = 'R' and TRANS = 'N', or
 *  *
 *        C * Q' if SIDE = 'R' and TRANS = 'T',  *        C * Q**T if SIDE = 'R' and TRANS = 'T',
 *  *
 *  where Q is a real orthogonal matrix defined as the product of k  *  where Q is a real orthogonal matrix defined as the product of k
 *  elementary reflectors  *  elementary reflectors
Line 39 Line 39
 *  =========  *  =========
 *  *
 *  SIDE    (input) CHARACTER*1  *  SIDE    (input) CHARACTER*1
 *          = 'L': apply Q or Q' from the Left  *          = 'L': apply Q or Q**T from the Left
 *          = 'R': apply Q or Q' from the Right  *          = 'R': apply Q or Q**T from the Right
 *  *
 *  TRANS   (input) CHARACTER*1  *  TRANS   (input) CHARACTER*1
 *          = 'N': apply Q  (No transpose)  *          = 'N': apply Q  (No transpose)
Line 75 Line 75
 *  *
 *  C       (input/output) DOUBLE PRECISION array, dimension (LDC,N)  *  C       (input/output) DOUBLE PRECISION array, dimension (LDC,N)
 *          On entry, the m by n matrix C.  *          On entry, the m by n matrix C.
 *          On exit, C is overwritten by Q*C or Q'*C or C*Q' or C*Q.  *          On exit, C is overwritten by Q*C or Q**T*C or C*Q**T or C*Q.
 *  *
 *  LDC     (input) INTEGER  *  LDC     (input) INTEGER
 *          The leading dimension of the array C. LDC >= max(1,M).  *          The leading dimension of the array C. LDC >= max(1,M).
Removed from v.1.7  
changed lines
  Added in v.1.8

CVSweb interface <joel.bertrand@systella.fr>