Diff for /rpl/lapack/lapack/dlahqr.f between versions 1.18 and 1.19

version 1.18, 2018/05/29 07:17:56 version 1.19, 2020/05/21 21:45:59
Line 150 Line 150
 *> \param[out] INFO  *> \param[out] INFO
 *> \verbatim  *> \verbatim
 *>          INFO is INTEGER  *>          INFO is INTEGER
 *>           =   0: successful exit  *>           = 0:  successful exit
 *>          .GT. 0: If INFO = i, DLAHQR failed to compute all the  *>           > 0:  If INFO = i, DLAHQR failed to compute all the
 *>                  eigenvalues ILO to IHI in a total of 30 iterations  *>                  eigenvalues ILO to IHI in a total of 30 iterations
 *>                  per eigenvalue; elements i+1:ihi of WR and WI  *>                  per eigenvalue; elements i+1:ihi of WR and WI
 *>                  contain those eigenvalues which have been  *>                  contain those eigenvalues which have been
 *>                  successfully computed.  *>                  successfully computed.
 *>  *>
 *>                  If INFO .GT. 0 and WANTT is .FALSE., then on exit,  *>                  If INFO > 0 and WANTT is .FALSE., then on exit,
 *>                  the remaining unconverged eigenvalues are the  *>                  the remaining unconverged eigenvalues are the
 *>                  eigenvalues of the upper Hessenberg matrix rows  *>                  eigenvalues of the upper Hessenberg matrix rows
 *>                  and columns ILO thorugh INFO of the final, output  *>                  and columns ILO through INFO of the final, output
 *>                  value of H.  *>                  value of H.
 *>  *>
 *>                  If INFO .GT. 0 and WANTT is .TRUE., then on exit  *>                  If INFO > 0 and WANTT is .TRUE., then on exit
 *>          (*)       (initial value of H)*U  = U*(final value of H)  *>          (*)       (initial value of H)*U  = U*(final value of H)
 *>                  where U is an orthognal matrix.    The final  *>                  where U is an orthogonal matrix.    The final
 *>                  value of H is upper Hessenberg and triangular in  *>                  value of H is upper Hessenberg and triangular in
 *>                  rows and columns INFO+1 through IHI.  *>                  rows and columns INFO+1 through IHI.
 *>  *>
 *>                  If INFO .GT. 0 and WANTZ is .TRUE., then on exit  *>                  If INFO > 0 and WANTZ is .TRUE., then on exit
 *>                      (final value of Z)  = (initial value of Z)*U  *>                      (final value of Z)  = (initial value of Z)*U
 *>                  where U is the orthogonal matrix in (*)  *>                  where U is the orthogonal matrix in (*)
 *>                  (regardless of the value of WANTT.)  *>                  (regardless of the value of WANTT.)

Removed from v.1.18  
changed lines
  Added in v.1.19


CVSweb interface <joel.bertrand@systella.fr>