diff options
Diffstat (limited to 'TESTING/LIN/sdrvrf2.f')
-rw-r--r-- | TESTING/LIN/sdrvrf2.f | 18 |
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 * |