Diff for /rpl/lapack/lapack/zunbdb2.f between versions 1.5 and 1.9

version 1.5, 2017/06/17 10:54:32 version 1.9, 2023/08/07 08:39:43
Line 32 Line 32
 *  *
 *  *
 *> \par Purpose:  *> \par Purpose:
 *> =============  *  =============
 *>  *>
 *>\verbatim  *>\verbatim
 *>  *>
Line 122 Line 122
 *>  *>
 *> \param[out] TAUP1  *> \param[out] TAUP1
 *> \verbatim  *> \verbatim
 *>          TAUP1 is COMPLEX*16 array, dimension (P)  *>          TAUP1 is COMPLEX*16 array, dimension (P-1)
 *>           The scalar factors of the elementary reflectors that define  *>           The scalar factors of the elementary reflectors that define
 *>           P1.  *>           P1.
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[out] TAUP2  *> \param[out] TAUP2
 *> \verbatim  *> \verbatim
 *>          TAUP2 is COMPLEX*16 array, dimension (M-P)  *>          TAUP2 is COMPLEX*16 array, dimension (Q)
 *>           The scalar factors of the elementary reflectors that define  *>           The scalar factors of the elementary reflectors that define
 *>           P2.  *>           P2.
 *> \endverbatim  *> \endverbatim
Line 172 Line 172
 *> \author Univ. of Colorado Denver  *> \author Univ. of Colorado Denver
 *> \author NAG Ltd.  *> \author NAG Ltd.
 *  *
 *> \date July 2012  
 *  
 *> \ingroup complex16OTHERcomputational  *> \ingroup complex16OTHERcomputational
 *  *
 *> \par Further Details:  *> \par Further Details:
Line 201 Line 199
       SUBROUTINE ZUNBDB2( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI,        SUBROUTINE ZUNBDB2( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI,
      $                    TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO )       $                    TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO )
 *  *
 *  -- LAPACK computational routine (version 3.7.0) --  *  -- LAPACK computational routine --
 *  -- 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..--
 *     July 2012  
 *  *
 *     .. Scalar Arguments ..  *     .. Scalar Arguments ..
       INTEGER            INFO, LWORK, M, P, Q, LDX11, LDX21        INTEGER            INFO, LWORK, M, P, Q, LDX11, LDX21
Line 229 Line 226
       LOGICAL            LQUERY        LOGICAL            LQUERY
 *     ..  *     ..
 *     .. External Subroutines ..  *     .. External Subroutines ..
       EXTERNAL           ZLARF, ZLARFGP, ZUNBDB5, ZDROT, ZSCAL, XERBLA        EXTERNAL           ZLARF, ZLARFGP, ZUNBDB5, ZDROT, ZSCAL, ZLACGV,
        $                   XERBLA
 *     ..  *     ..
 *     .. External Functions ..  *     .. External Functions ..
       DOUBLE PRECISION   DZNRM2        DOUBLE PRECISION   DZNRM2

Removed from v.1.5  
changed lines
  Added in v.1.9


CVSweb interface <joel.bertrand@systella.fr>