--- rpl/lapack/lapack/lsamen.f 2011/07/22 07:40:26 1.8
+++ rpl/lapack/lapack/lsamen.f 2011/11/21 20:43:07 1.9
@@ -1,35 +1,89 @@
+*> \brief \b LSAMEN
+*
+* =========== DOCUMENTATION ===========
+*
+* Online html documentation available at
+* http://www.netlib.org/lapack/explore-html/
+*
+*> \htmlonly
+*> Download LSAMEN + dependencies
+*>
+*> [TGZ]
+*>
+*> [ZIP]
+*>
+*> [TXT]
+*> \endhtmlonly
+*
+* Definition:
+* ===========
+*
+* LOGICAL FUNCTION LSAMEN( N, CA, CB )
+*
+* .. Scalar Arguments ..
+* CHARACTER*( * ) CA, CB
+* INTEGER N
+* ..
+*
+*
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
+*>
+*> LSAMEN tests if the first N letters of CA are the same as the
+*> first N letters of CB, regardless of case.
+*> LSAMEN returns .TRUE. if CA and CB are equivalent except for case
+*> and .FALSE. otherwise. LSAMEN also returns .FALSE. if LEN( CA )
+*> or LEN( CB ) is less than N.
+*> \endverbatim
+*
+* Arguments:
+* ==========
+*
+*> \param[in] N
+*> \verbatim
+*> N is INTEGER
+*> The number of characters in CA and CB to be compared.
+*> \endverbatim
+*>
+*> \param[in] CA
+*> \verbatim
+*> CA is CHARACTER*(*)
+*> \endverbatim
+*>
+*> \param[in] CB
+*> \verbatim
+*> CB is CHARACTER*(*)
+*> CA and CB specify two character strings of length at least N.
+*> Only the first N characters of each string will be accessed.
+*> \endverbatim
+*
+* Authors:
+* ========
+*
+*> \author Univ. of Tennessee
+*> \author Univ. of California Berkeley
+*> \author Univ. of Colorado Denver
+*> \author NAG Ltd.
+*
+*> \date November 2011
+*
+*> \ingroup auxOTHERauxiliary
+*
+* =====================================================================
LOGICAL FUNCTION LSAMEN( N, CA, CB )
*
-* -- LAPACK auxiliary routine (version 3.2) --
+* -- LAPACK auxiliary routine (version 3.4.0) --
* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-* November 2006
+* November 2011
*
* .. Scalar Arguments ..
CHARACTER*( * ) CA, CB
INTEGER N
* ..
*
-* Purpose
-* =======
-*
-* LSAMEN tests if the first N letters of CA are the same as the
-* first N letters of CB, regardless of case.
-* LSAMEN returns .TRUE. if CA and CB are equivalent except for case
-* and .FALSE. otherwise. LSAMEN also returns .FALSE. if LEN( CA )
-* or LEN( CB ) is less than N.
-*
-* Arguments
-* =========
-*
-* N (input) INTEGER
-* The number of characters in CA and CB to be compared.
-*
-* CA (input) CHARACTER*(*)
-* CB (input) CHARACTER*(*)
-* CA and CB specify two character strings of length at least N.
-* Only the first N characters of each string will be accessed.
-*
* =====================================================================
*
* .. Local Scalars ..