Diff for /rpl/lapack/lapack/zlaqr3.f between versions 1.16 and 1.21

version 1.16, 2017/06/17 10:54:21 version 1.21, 2023/08/07 08:39:30
Line 100 Line 100
 *> \param[in] NW  *> \param[in] NW
 *> \verbatim  *> \verbatim
 *>          NW is INTEGER  *>          NW is INTEGER
 *>          Deflation window size.  1 .LE. NW .LE. (KBOT-KTOP+1).  *>          Deflation window size.  1 <= NW <= (KBOT-KTOP+1).
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[in,out] H  *> \param[in,out] H
Line 116 Line 116
 *>  *>
 *> \param[in] LDH  *> \param[in] LDH
 *> \verbatim  *> \verbatim
 *>          LDH is integer  *>          LDH is INTEGER
 *>          Leading dimension of H just as declared in the calling  *>          Leading dimension of H just as declared in the calling
 *>          subroutine.  N .LE. LDH  *>          subroutine.  N <= LDH
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[in] ILOZ  *> \param[in] ILOZ
Line 130 Line 130
 *> \verbatim  *> \verbatim
 *>          IHIZ is INTEGER  *>          IHIZ is INTEGER
 *>          Specify the rows of Z to which transformations must be  *>          Specify the rows of Z to which transformations must be
 *>          applied if WANTZ is .TRUE.. 1 .LE. ILOZ .LE. IHIZ .LE. N.  *>          applied if WANTZ is .TRUE.. 1 <= ILOZ <= IHIZ <= N.
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[in,out] Z  *> \param[in,out] Z
Line 144 Line 144
 *>  *>
 *> \param[in] LDZ  *> \param[in] LDZ
 *> \verbatim  *> \verbatim
 *>          LDZ is integer  *>          LDZ is INTEGER
 *>          The leading dimension of Z just as declared in the  *>          The leading dimension of Z just as declared in the
 *>          calling subroutine.  1 .LE. LDZ.  *>          calling subroutine.  1 <= LDZ.
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[out] NS  *> \param[out] NS
 *> \verbatim  *> \verbatim
 *>          NS is integer  *>          NS is INTEGER
 *>          The number of unconverged (ie approximate) eigenvalues  *>          The number of unconverged (ie approximate) eigenvalues
 *>          returned in SR and SI that may be used as shifts by the  *>          returned in SR and SI that may be used as shifts by the
 *>          calling subroutine.  *>          calling subroutine.
Line 159 Line 159
 *>  *>
 *> \param[out] ND  *> \param[out] ND
 *> \verbatim  *> \verbatim
 *>          ND is integer  *>          ND is INTEGER
 *>          The number of converged eigenvalues uncovered by this  *>          The number of converged eigenvalues uncovered by this
 *>          subroutine.  *>          subroutine.
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[out] SH  *> \param[out] SH
 *> \verbatim  *> \verbatim
 *>          SH is COMPLEX*16 array, dimension KBOT  *>          SH is COMPLEX*16 array, dimension (KBOT)
 *>          On output, approximate eigenvalues that may  *>          On output, approximate eigenvalues that may
 *>          be used for shifts are stored in SH(KBOT-ND-NS+1)  *>          be used for shifts are stored in SH(KBOT-ND-NS+1)
 *>          through SR(KBOT-ND).  Converged eigenvalues are  *>          through SR(KBOT-ND).  Converged eigenvalues are
Line 181 Line 181
 *>  *>
 *> \param[in] LDV  *> \param[in] LDV
 *> \verbatim  *> \verbatim
 *>          LDV is integer scalar  *>          LDV is INTEGER
 *>          The leading dimension of V just as declared in the  *>          The leading dimension of V just as declared in the
 *>          calling subroutine.  NW .LE. LDV  *>          calling subroutine.  NW <= LDV
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[in] NH  *> \param[in] NH
 *> \verbatim  *> \verbatim
 *>          NH is integer scalar  *>          NH is INTEGER
 *>          The number of columns of T.  NH.GE.NW.  *>          The number of columns of T.  NH >= NW.
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[out] T  *> \param[out] T
Line 199 Line 199
 *>  *>
 *> \param[in] LDT  *> \param[in] LDT
 *> \verbatim  *> \verbatim
 *>          LDT is integer  *>          LDT is INTEGER
 *>          The leading dimension of T just as declared in the  *>          The leading dimension of T just as declared in the
 *>          calling subroutine.  NW .LE. LDT  *>          calling subroutine.  NW <= LDT
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[in] NV  *> \param[in] NV
 *> \verbatim  *> \verbatim
 *>          NV is integer  *>          NV is INTEGER
 *>          The number of rows of work array WV available for  *>          The number of rows of work array WV available for
 *>          workspace.  NV.GE.NW.  *>          workspace.  NV >= NW.
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[out] WV  *> \param[out] WV
Line 218 Line 218
 *>  *>
 *> \param[in] LDWV  *> \param[in] LDWV
 *> \verbatim  *> \verbatim
 *>          LDWV is integer  *>          LDWV is INTEGER
 *>          The leading dimension of W just as declared in the  *>          The leading dimension of W just as declared in the
 *>          calling subroutine.  NW .LE. LDV  *>          calling subroutine.  NW <= LDV
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[out] WORK  *> \param[out] WORK
 *> \verbatim  *> \verbatim
 *>          WORK is COMPLEX*16 array, dimension LWORK.  *>          WORK is COMPLEX*16 array, dimension (LWORK)
 *>          On exit, WORK(1) is set to an estimate of the optimal value  *>          On exit, WORK(1) is set to an estimate of the optimal value
 *>          of LWORK for the given values of N, NW, KTOP and KBOT.  *>          of LWORK for the given values of N, NW, KTOP and KBOT.
 *> \endverbatim  *> \endverbatim
 *>  *>
 *> \param[in] LWORK  *> \param[in] LWORK
 *> \verbatim  *> \verbatim
 *>          LWORK is integer  *>          LWORK is INTEGER
 *>          The dimension of the work array WORK.  LWORK = 2*NW  *>          The dimension of the work array WORK.  LWORK = 2*NW
 *>          suffices, but greater efficiency may result from larger  *>          suffices, but greater efficiency may result from larger
 *>          values of LWORK.  *>          values of LWORK.
Line 252 Line 252
 *> \author Univ. of Colorado Denver  *> \author Univ. of Colorado Denver
 *> \author NAG Ltd.  *> \author NAG Ltd.
 *  *
 *> \date June 2016  
 *  
 *> \ingroup complex16OTHERauxiliary  *> \ingroup complex16OTHERauxiliary
 *  *
 *> \par Contributors:  *> \par Contributors:
Line 267 Line 265
      $                   IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT,       $                   IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT,
      $                   NV, WV, LDWV, WORK, LWORK )       $                   NV, WV, LDWV, WORK, LWORK )
 *  *
 *  -- LAPACK auxiliary routine (version 3.7.0) --  *  -- LAPACK auxiliary 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..--
 *     June 2016  
 *  *
 *     .. Scalar Arguments ..  *     .. Scalar Arguments ..
       INTEGER            IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,        INTEGER            IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV,

Removed from v.1.16  
changed lines
  Added in v.1.21


CVSweb interface <joel.bertrand@systella.fr>