aboutsummaryrefslogtreecommitdiff
path: root/TESTING/LIN/sdrvrf2.f
diff options
context:
space:
mode:
Diffstat (limited to 'TESTING/LIN/sdrvrf2.f')
-rw-r--r--TESTING/LIN/sdrvrf2.f18
1 files changed, 9 insertions, 9 deletions
diff --git a/TESTING/LIN/sdrvrf2.f b/TESTING/LIN/sdrvrf2.f
index 921065ac..515da5c6 100644
--- a/TESTING/LIN/sdrvrf2.f
+++ b/TESTING/LIN/sdrvrf2.f
@@ -2,14 +2,14 @@
*
* =========== DOCUMENTATION ===========
*
-* Online html documentation available at
-* http://www.netlib.org/lapack/explore-html/
+* Online html documentation available at
+* http://www.netlib.org/lapack/explore-html/
*
* Definition:
* ===========
*
* SUBROUTINE SDRVRF2( NOUT, NN, NVAL, A, LDA, ARF, AP, ASAV )
-*
+*
* .. Scalar Arguments ..
* INTEGER LDA, NN, NOUT
* ..
@@ -17,7 +17,7 @@
* INTEGER NVAL( NN )
* REAL A( LDA, * ), ARF( * ), AP(*), ASAV( LDA, * )
* ..
-*
+*
*
*> \par Purpose:
* =============
@@ -77,10 +77,10 @@
* Authors:
* ========
*
-*> \author Univ. of Tennessee
-*> \author Univ. of California Berkeley
-*> \author Univ. of Colorado Denver
-*> \author NAG Ltd.
+*> \author Univ. of Tennessee
+*> \author Univ. of California Berkeley
+*> \author Univ. of Colorado Denver
+*> \author NAG Ltd.
*
*> \date November 2011
*
@@ -255,7 +255,7 @@
9997 FORMAT( 1X, 'All tests for the RFP conversion routines passed ( ',
+ I5,' tests run)')
9996 FORMAT( 1X, 'RFP conversion routines: ',I5,' out of ',I5,
- + ' error message recorded')
+ + ' error message recorded')
*
RETURN
*