Diff for /rpl/lapack/lapack/dlagts.f between versions 1.7 and 1.8

version 1.7, 2010/12/21 13:53:29 version 1.8, 2011/07/22 07:38:06
Line 1 Line 1
       SUBROUTINE DLAGTS( JOB, N, A, B, C, D, IN, Y, TOL, INFO )        SUBROUTINE DLAGTS( JOB, N, A, B, C, D, IN, Y, TOL, INFO )
 *  *
 *  -- LAPACK auxiliary routine (version 3.2) --  *  -- LAPACK auxiliary routine (version 3.3.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..--
 *     November 2006  *  -- April 2011                                                      --
 *  *
 *     .. Scalar Arguments ..  *     .. Scalar Arguments ..
       INTEGER            INFO, JOB, N        INTEGER            INFO, JOB, N
Line 19 Line 19
 *  *
 *  DLAGTS may be used to solve one of the systems of equations  *  DLAGTS may be used to solve one of the systems of equations
 *  *
 *     (T - lambda*I)*x = y   or   (T - lambda*I)'*x = y,  *     (T - lambda*I)*x = y   or   (T - lambda*I)**T*x = y,
 *  *
 *  where T is an n by n tridiagonal matrix, for x, following the  *  where T is an n by n tridiagonal matrix, for x, following the
 *  factorization of (T - lambda*I) as  *  factorization of (T - lambda*I) as
Line 42 Line 42
 *                and, if overflow would otherwise occur, the diagonal  *                and, if overflow would otherwise occur, the diagonal
 *                elements of U are to be perturbed. See argument TOL  *                elements of U are to be perturbed. See argument TOL
 *                below.  *                below.
 *          =  2: The equations  (T - lambda*I)'x = y  are to be solved,  *          =  2: The equations  (T - lambda*I)**Tx = y  are to be solved,
 *                but diagonal elements of U are not to be perturbed.  *                but diagonal elements of U are not to be perturbed.
 *          = -2: The equations  (T - lambda*I)'x = y  are to be solved  *          = -2: The equations  (T - lambda*I)**Tx = y  are to be solved
 *                and, if overflow would otherwise occur, the diagonal  *                and, if overflow would otherwise occur, the diagonal
 *                elements of U are to be perturbed. See argument TOL  *                elements of U are to be perturbed. See argument TOL
 *                below.  *                below.

Removed from v.1.7  
changed lines
  Added in v.1.8


CVSweb interface <joel.bertrand@systella.fr>