summaryrefslogtreecommitdiff
path: root/BLAS
diff options
context:
space:
mode:
authorHenning Thielemann <git@henning-thielemann.de>2017-06-12 11:39:47 +0200
committerHenning Thielemann <git@henning-thielemann.de>2017-06-12 11:39:47 +0200
commitff6637d893261a2248e939db741ed9422f421c72 (patch)
tree03830d4ecf42e8956c8c92610ee89d3d789b2fe6 /BLAS
parent98fd66325bd6900becd886df52293158d14096a3 (diff)
downloadlapack-ff6637d893261a2248e939db741ed9422f421c72.tar.gz
lapack-ff6637d893261a2248e939db741ed9422f421c72.tar.bz2
lapack-ff6637d893261a2248e939db741ed9422f421c72.zip
BLAS/xROTM; parameter comments for xX and xY: correct array dimension
Diffstat (limited to 'BLAS')
-rw-r--r--BLAS/SRC/drotm.f6
-rw-r--r--BLAS/SRC/srotm.f6
2 files changed, 4 insertions, 8 deletions
diff --git a/BLAS/SRC/drotm.f b/BLAS/SRC/drotm.f
index b006dbd5..f75b88b3 100644
--- a/BLAS/SRC/drotm.f
+++ b/BLAS/SRC/drotm.f
@@ -51,8 +51,7 @@
*>
*> \param[in,out] DX
*> \verbatim
-*> DX is DOUBLE PRECISION array, dimension N
-*> double precision vector with N elements
+*> DX is DOUBLE PRECISION array, dimension ( 1 + ( N - 1 )*abs( INCX ) )
*> \endverbatim
*>
*> \param[in] INCX
@@ -63,8 +62,7 @@
*>
*> \param[in,out] DY
*> \verbatim
-*> DY is DOUBLE PRECISION array, dimension N
-*> double precision vector with N elements
+*> DY is DOUBLE PRECISION array, dimension ( 1 + ( N - 1 )*abs( INCY ) )
*> \endverbatim
*>
*> \param[in] INCY
diff --git a/BLAS/SRC/srotm.f b/BLAS/SRC/srotm.f
index c71f7f01..a0d00f28 100644
--- a/BLAS/SRC/srotm.f
+++ b/BLAS/SRC/srotm.f
@@ -52,8 +52,7 @@
*>
*> \param[in,out] SX
*> \verbatim
-*> SX is REAL array, dimension N
-*> double precision vector with N elements
+*> SX is REAL array, dimension ( 1 + ( N - 1 )*abs( INCX ) )
*> \endverbatim
*>
*> \param[in] INCX
@@ -64,8 +63,7 @@
*>
*> \param[in,out] SY
*> \verbatim
-*> SY is REAL array, dimension N
-*> double precision vector with N elements
+*> SY is REAL array, dimension ( 1 + ( N - 1 )*abs( INCY ) )
*> \endverbatim
*>
*> \param[in] INCY