Diff for /rpl/lapack/lapack/zlaqr3.f between versions 1.17 and 1.20

version 1.17, 2017/06/17 11:06:56 version 1.20, 2020/05/21 21:46:09
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 267 Line 267
      $                   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 (version 3.7.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..--
 *     June 2016  *     June 2016

Removed from v.1.17  
changed lines
  Added in v.1.20


CVSweb interface <joel.bertrand@systella.fr>