summaryrefslogtreecommitdiff
path: root/BLAS/SRC/dscal.f
diff options
context:
space:
mode:
authorjulie <julielangou@users.noreply.github.com>2009-01-02 21:57:02 +0000
committerjulie <julielangou@users.noreply.github.com>2009-01-02 21:57:02 +0000
commita0d64643e4c994d1b84f870d40df7de8924e4d7f (patch)
tree399ab29aa00e23d5028c5f42d6d5b362562b63da /BLAS/SRC/dscal.f
parent61e82a389d6bdbdb610d200153937c38c6f6051a (diff)
downloadlapack-a0d64643e4c994d1b84f870d40df7de8924e4d7f.tar.gz
lapack-a0d64643e4c994d1b84f870d40df7de8924e4d7f.tar.bz2
lapack-a0d64643e4c994d1b84f870d40df7de8924e4d7f.zip
Last round of modifications to the comments for the generation of the manpages
Diffstat (limited to 'BLAS/SRC/dscal.f')
-rw-r--r--BLAS/SRC/dscal.f9
1 files changed, 7 insertions, 2 deletions
diff --git a/BLAS/SRC/dscal.f b/BLAS/SRC/dscal.f
index 0b423cf2..81425a94 100644
--- a/BLAS/SRC/dscal.f
+++ b/BLAS/SRC/dscal.f
@@ -9,13 +9,18 @@
*
* Purpose
* =======
-**
-* scales a vector by a constant.
+*
+* DSCAL scales a vector by a constant.
* uses unrolled loops for increment equal to one.
+*
+* Further Details
+* ===============
+*
* jack dongarra, linpack, 3/11/78.
* modified 3/93 to return if incx .le. 0.
* modified 12/3/93, array(1) declarations changed to array(*)
*
+* =====================================================================
*
* .. Local Scalars ..
INTEGER I,M,MP1,NINCX