--- rpl/lapack/lapack/zptsvx.f	2010/12/21 13:53:55	1.7
+++ rpl/lapack/lapack/zptsvx.f	2011/07/22 07:38:19	1.8
@@ -1,10 +1,10 @@
       SUBROUTINE ZPTSVX( FACT, N, NRHS, D, E, DF, EF, B, LDB, X, LDX,
      $                   RCOND, FERR, BERR, WORK, RWORK, INFO )
 *
-*  -- LAPACK routine (version 3.2) --
+*  -- LAPACK routine (version 3.3.1) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-*     November 2006
+*  -- April 2011                                                      --
 *
 *     .. Scalar Arguments ..
       CHARACTER          FACT
@@ -191,7 +191,7 @@
 *
       IF( NOFACT ) THEN
 *
-*        Compute the L*D*L' (or U'*D*U) factorization of A.
+*        Compute the L*D*L**H (or U**H*D*U) factorization of A.
 *
          CALL DCOPY( N, D, 1, DF, 1 )
          IF( N.GT.1 )