Diff for /rpl/lapack/lapack/zunbdb4.f between versions 1.6 and 1.9

version 1.6, 2017/06/17 11:07:05 version 1.9, 2023/08/07 08:39:43
Line 33 Line 33
 *  *
 *  *
 *> \par Purpose:  *> \par Purpose:
 *> =============  *  =============
 *>  *>
 *>\verbatim  *>\verbatim
 *>  *>
Line 124 Line 124
 *>  *>
 *> \param[out] TAUP1  *> \param[out] TAUP1
 *> \verbatim  *> \verbatim
 *>          TAUP1 is COMPLEX*16 array, dimension (P)  *>          TAUP1 is COMPLEX*16 array, dimension (M-Q)
 *>           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 (M-Q)
 *>           The scalar factors of the elementary reflectors that define  *>           The scalar factors of the elementary reflectors that define
 *>           P2.  *>           P2.
 *> \endverbatim  *> \endverbatim
Line 183 Line 183
 *> \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 213 Line 211
      $                    TAUP1, TAUP2, TAUQ1, PHANTOM, WORK, LWORK,       $                    TAUP1, TAUP2, TAUQ1, PHANTOM, WORK, LWORK,
      $                    INFO )       $                    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 241 Line 238
       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.6  
changed lines
  Added in v.1.9


CVSweb interface <joel.bertrand@systella.fr>