Remove all trailing whitespace except lapack-netlib

Signed-off-by: Timothy Gu <timothygu99@gmail.com>
This commit is contained in:
Timothy Gu
2014-06-27 12:05:18 -07:00
parent d10db52edb
commit 6c2ead30f0
1423 changed files with 21229 additions and 21229 deletions

View File

@@ -37,7 +37,7 @@ SBLAS2OBJS = \
SBLAS3OBJS = \
sgemmf.$(SUFFIX) ssymmf.$(SUFFIX) strmmf.$(SUFFIX) \
strsmf.$(SUFFIX) ssyrkf.$(SUFFIX) ssyr2kf.$(SUFFIX)
strsmf.$(SUFFIX) ssyrkf.$(SUFFIX) ssyr2kf.$(SUFFIX)
DBLAS1OBJS = \
daxpyf.$(SUFFIX) dswapf.$(SUFFIX) \
@@ -59,7 +59,7 @@ DBLAS2OBJS = \
DBLAS3OBJS = \
dgemmf.$(SUFFIX) dsymmf.$(SUFFIX) dtrmmf.$(SUFFIX) \
dtrsmf.$(SUFFIX) dsyrkf.$(SUFFIX) dsyr2kf.$(SUFFIX)
dtrsmf.$(SUFFIX) dsyrkf.$(SUFFIX) dsyr2kf.$(SUFFIX)
CBLAS1OBJS = \
caxpyf.$(SUFFIX) caxpycf.$(SUFFIX) cswapf.$(SUFFIX) \
@@ -140,7 +140,7 @@ DBLASOBJS += \
dpotf2f.$(SUFFIX) dpotrff.$(SUFFIX) dtrti2f.$(SUFFIX) dtrtrif.$(SUFFIX) \
dlaswpf.$(SUFFIX) dgetrsf.$(SUFFIX) dgesvf.$(SUFFIX) dpotrif.$(SUFFIX) \
QBLASOBJS +=
QBLASOBJS +=
# \
qgetf2f.$(SUFFIX) qgetrff.$(SUFFIX) qlauu2f.$(SUFFIX) qlauumf.$(SUFFIX) \
qpotf2f.$(SUFFIX) qpotrff.$(SUFFIX) qtrti2f.$(SUFFIX) qtrtrif.$(SUFFIX) \
@@ -156,7 +156,7 @@ ZBLASOBJS += \
zpotf2f.$(SUFFIX) zpotrff.$(SUFFIX) ztrti2f.$(SUFFIX) ztrtrif.$(SUFFIX) \
zlaswpf.$(SUFFIX) zgetrsf.$(SUFFIX) zgesvf.$(SUFFIX) zpotrif.$(SUFFIX) \
XBLASOBJS +=
XBLASOBJS +=
# \
xgetf2f.$(SUFFIX) xgetrff.$(SUFFIX) xlauu2f.$(SUFFIX) xlauumf.$(SUFFIX) \
xpotf2f.$(SUFFIX) xpotrff.$(SUFFIX) xtrti2f.$(SUFFIX) xtrtrif.$(SUFFIX) \

View File

@@ -78,7 +78,7 @@
* supplied as zero then Y need not be set on input.
* Unchanged on exit.
*
* Y (input/output) COMPLEX array, dimension at least
* Y (input/output) COMPLEX array, dimension at least
* ( 1 + ( N - 1 )*abs( INCY ) ).
* Before entry, the incremented array Y must contain the n
* element vector y. On exit, Y is overwritten by the updated

View File

@@ -140,7 +140,7 @@
IF( N.EQ.0 )
$ RETURN
*
NOCONJ = LSAME( TRANS, 'N' ) .OR. LSAME( TRANS, 'T' )
NOCONJ = LSAME( TRANS, 'N' ) .OR. LSAME( TRANS, 'T' )
NOUNIT = LSAME( DIAG , 'N' )
*
* Set up the start point in X if the increment is not unity. This

View File

@@ -3,7 +3,7 @@
* -- LAPACK routine (version 3.0) --
* Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd.,
* Courant Institute, Argonne National Lab, and Rice University
* March 31, 1993
* March 31, 1993
*
* .. Scalar Arguments ..
INTEGER INFO, LDA, M, N

View File

@@ -3,7 +3,7 @@
* -- LAPACK routine (version 3.0) --
* Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd.,
* Courant Institute, Argonne National Lab, and Rice University
* March 31, 1993
* March 31, 1993
*
* .. Scalar Arguments ..
CHARACTER TRANS

View File

@@ -3,7 +3,7 @@
* -- LAPACK routine (version 3.0) --
* Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd.,
* Courant Institute, Argonne National Lab, and Rice University
* March 31, 1993
* March 31, 1993
*
* .. Scalar Arguments ..
CHARACTER UPLO

View File

@@ -3,7 +3,7 @@
* -- LAPACK routine (version 3.0) --
* Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd.,
* Courant Institute, Argonne National Lab, and Rice University
* March 31, 1993
* March 31, 1993
*
* .. Scalar Arguments ..
CHARACTER DIAG, UPLO

View File

@@ -140,7 +140,7 @@
IF( N.EQ.0 )
$ RETURN
*
NOCONJ = LSAME( TRANS, 'N' ) .OR. LSAME( TRANS, 'T' )
NOCONJ = LSAME( TRANS, 'N' ) .OR. LSAME( TRANS, 'T' )
NOUNIT = LSAME( DIAG , 'N' )
*
* Set up the start point in X if the increment is not unity. This

View File

@@ -174,7 +174,7 @@
X( I ) = X( I ) + TEMP*A( I, J )
ELSE
X( I ) = X( I ) + TEMP*DCONJG(A( I, J ))
ENDIF
ENDIF
10 CONTINUE
IF (NOCONJ) THEN
IF( NOUNIT )