--- rpl/lapack/lapack/zgeqr2p.f	2017/06/17 10:54:10	1.14
+++ rpl/lapack/lapack/zgeqr2p.f	2023/08/07 08:39:19	1.18
@@ -33,8 +33,18 @@
 *>
 *> \verbatim
 *>
-*> ZGEQR2P computes a QR factorization of a complex m by n matrix A:
-*> A = Q * R. The diagonal entries of R are real and nonnegative.
+*> ZGEQR2P computes a QR factorization of a complex m-by-n matrix A:
+*>
+*>    A = Q * ( R ),
+*>            ( 0 )
+*>
+*> where:
+*>
+*>    Q is a m-by-m orthogonal matrix;
+*>    R is an upper-triangular n-by-n matrix with nonnegative diagonal
+*>    entries;
+*>    0 is a (m-n)-by-n zero matrix, if m > n.
+*>
 *> \endverbatim
 *
 *  Arguments:
@@ -97,8 +107,6 @@
 *> \author Univ. of Colorado Denver
 *> \author NAG Ltd.
 *
-*> \date December 2016
-*
 *> \ingroup complex16GEcomputational
 *
 *> \par Further Details:
@@ -124,10 +132,9 @@
 *  =====================================================================
       SUBROUTINE ZGEQR2P( M, N, A, LDA, TAU, WORK, INFO )
 *
-*  -- LAPACK computational routine (version 3.7.0) --
+*  -- LAPACK computational routine --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-*     December 2016
 *
 *     .. Scalar Arguments ..
       INTEGER            INFO, LDA, M, N