summaryrefslogtreecommitdiff
path: root/TESTING/LIN/ddrvrf2.f
diff options
context:
space:
mode:
Diffstat (limited to 'TESTING/LIN/ddrvrf2.f')
-rw-r--r--TESTING/LIN/ddrvrf2.f120
1 files changed, 92 insertions, 28 deletions
diff --git a/TESTING/LIN/ddrvrf2.f b/TESTING/LIN/ddrvrf2.f
index e5a8e3ce..0838733f 100644
--- a/TESTING/LIN/ddrvrf2.f
+++ b/TESTING/LIN/ddrvrf2.f
@@ -1,44 +1,108 @@
- SUBROUTINE DDRVRF2( NOUT, NN, NVAL, A, LDA, ARF, AP, ASAV )
-*
-* -- LAPACK test routine (version 3.2.0) --
-* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd..
-* November 2008
-*
-* .. Scalar Arguments ..
- INTEGER LDA, NN, NOUT
-* ..
-* .. Array Arguments ..
- INTEGER NVAL( NN )
- DOUBLE PRECISION A( LDA, * ), ARF( * ), AP(*), ASAV( LDA, * )
-* ..
-*
+*> \brief \b DDRVRF2
+*
+* =========== DOCUMENTATION ===========
+*
+* Online html documentation available at
+* http://www.netlib.org/lapack/explore-html/
+*
+* Definition
+* ==========
+*
+* SUBROUTINE DDRVRF2( NOUT, NN, NVAL, A, LDA, ARF, AP, ASAV )
+*
+* .. Scalar Arguments ..
+* INTEGER LDA, NN, NOUT
+* ..
+* .. Array Arguments ..
+* INTEGER NVAL( NN )
+* DOUBLE PRECISION A( LDA, * ), ARF( * ), AP(*), ASAV( LDA, * )
+* ..
+*
* Purpose
* =======
*
-* DDRVRF2 tests the LAPACK RFP convertion routines.
+*>\details \b Purpose:
+*>\verbatim
+*>
+*> DDRVRF2 tests the LAPACK RFP convertion routines.
+*>
+*>\endverbatim
*
* Arguments
* =========
*
-* NOUT (input) INTEGER
-* The unit number for output.
-*
-* NN (input) INTEGER
-* The number of values of N contained in the vector NVAL.
+*> \param[in] NOUT
+*> \verbatim
+*> NOUT is INTEGER
+*> The unit number for output.
+*> \endverbatim
+*>
+*> \param[in] NN
+*> \verbatim
+*> NN is INTEGER
+*> The number of values of N contained in the vector NVAL.
+*> \endverbatim
+*>
+*> \param[in] NVAL
+*> \verbatim
+*> NVAL is INTEGER array, dimension (NN)
+*> The values of the matrix dimension N.
+*> \endverbatim
+*>
+*> \param[out] A
+*> \verbatim
+*> A is DOUBLE PRECISION array, dimension (LDA,NMAX)
+*> \endverbatim
+*>
+*> \param[in] LDA
+*> \verbatim
+*> LDA is INTEGER
+*> The leading dimension of the array A. LDA >= max(1,NMAX).
+*> \endverbatim
+*>
+*> \param[out] ARF
+*> \verbatim
+*> ARF is DOUBLE PRECISION array, dimension ((NMAX*(NMAX+1))/2).
+*> \endverbatim
+*>
+*> \param[out] AP
+*> \verbatim
+*> AP is DOUBLE PRECISION array, dimension ((NMAX*(NMAX+1))/2).
+*> \endverbatim
+*>
+*> \param[out] A2
+*> \verbatim
+*> A2 is DOUBLE PRECISION array, dimension (LDA,NMAX)
+*> \endverbatim
+*>
+*
+* Authors
+* =======
*
-* NVAL (input) INTEGER array, dimension (NN)
-* The values of the matrix dimension N.
+*> \author Univ. of Tennessee
+*> \author Univ. of California Berkeley
+*> \author Univ. of Colorado Denver
+*> \author NAG Ltd.
*
-* A (workspace) DOUBLE PRECISION array, dimension (LDA,NMAX)
+*> \date November 2011
*
-* LDA (input) INTEGER
-* The leading dimension of the array A. LDA >= max(1,NMAX).
+*> \ingroup double_lin
*
-* ARF (workspace) DOUBLE PRECISION array, dimension ((NMAX*(NMAX+1))/2).
+* =====================================================================
+ SUBROUTINE DDRVRF2( NOUT, NN, NVAL, A, LDA, ARF, AP, ASAV )
*
-* AP (workspace) DOUBLE PRECISION array, dimension ((NMAX*(NMAX+1))/2).
+* -- LAPACK test routine (version 3.2.0) --
+* -- LAPACK is a software package provided by Univ. of Tennessee, --
+* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
+* November 2011
*
-* A2 (workspace) DOUBLE PRECISION array, dimension (LDA,NMAX)
+* .. Scalar Arguments ..
+ INTEGER LDA, NN, NOUT
+* ..
+* .. Array Arguments ..
+ INTEGER NVAL( NN )
+ DOUBLE PRECISION A( LDA, * ), ARF( * ), AP(*), ASAV( LDA, * )
+* ..
*
* =====================================================================
* ..