summaryrefslogtreecommitdiff
path: root/BLAS/SRC/scopy.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/scopy.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/scopy.f')
-rw-r--r--BLAS/SRC/scopy.f7
1 files changed, 6 insertions, 1 deletions
diff --git a/BLAS/SRC/scopy.f b/BLAS/SRC/scopy.f
index ad04ee69..e0f41fe8 100644
--- a/BLAS/SRC/scopy.f
+++ b/BLAS/SRC/scopy.f
@@ -9,11 +9,16 @@
* Purpose
* =======
*
-* copies a vector, x, to a vector, y.
+* SCOPY copies a vector, x, to a vector, y.
* uses unrolled loops for increments equal to 1.
+*
+* Further Details
+* ===============
+*
* jack dongarra, linpack, 3/11/78.
* modified 12/3/93, array(1) declarations changed to array(*)
*
+* =====================================================================
*
* .. Local Scalars ..
INTEGER I,IX,IY,M,MP1