LAPACK
3.12.1
LAPACK: Linear Algebra PACKage
Toggle main menu visibility
Main Page
Related Pages
Routines
Modules
Modules List
Module Members
All
c
d
s
z
Functions/Subroutines
Variables
c
d
s
z
Data Types
Data Types List
Data Type Index
Data Fields
All
Functions/Subroutines
Variables
Files
File List
File Members
All
_
a
b
c
d
f
g
h
i
l
m
p
r
s
t
u
x
z
Functions/Subroutines
_
a
c
d
f
g
h
i
l
m
s
t
x
z
Variables
c
l
r
Typedefs
Enumerations
Enumerator
Macros
a
b
c
f
i
p
t
u
x
▼
LAPACK
►
LAPACK
►
Routines
►
Modules
►
Data Types
▼
Files
▼
File List
▼
BLAS
▼
SRC
►
caxpy.f
►
ccopy.f
►
cdotc.f
►
cdotu.f
►
cgbmv.f
►
cgemm.f
►
cgemmtr.f
►
cgemv.f
►
cgerc.f
►
cgeru.f
►
chbmv.f
►
chemm.f
►
chemv.f
►
cher.f
►
cher2.f
►
cher2k.f
►
cherk.f
►
chpmv.f
►
chpr.f
►
chpr2.f
►
crotg.f90
►
cscal.f
►
csrot.f
►
csscal.f
►
cswap.f
►
csymm.f
►
csyr2k.f
►
csyrk.f
►
ctbmv.f
►
ctbsv.f
►
ctpmv.f
►
ctpsv.f
►
ctrmm.f
►
ctrmv.f
►
ctrsm.f
►
ctrsv.f
►
dasum.f
►
daxpy.f
►
dcabs1.f
►
dcopy.f
►
ddot.f
►
dgbmv.f
►
dgemm.f
►
dgemmtr.f
►
dgemv.f
►
dger.f
►
dnrm2.f90
►
drot.f
►
drotg.f90
►
drotm.f
►
drotmg.f
►
dsbmv.f
►
dscal.f
►
dsdot.f
►
dspmv.f
►
dspr.f
►
dspr2.f
►
dswap.f
►
dsymm.f
►
dsymv.f
►
dsyr.f
►
dsyr2.f
►
dsyr2k.f
►
dsyrk.f
►
dtbmv.f
►
dtbsv.f
►
dtpmv.f
►
dtpsv.f
►
dtrmm.f
►
dtrmv.f
►
dtrsm.f
►
dtrsv.f
►
dzasum.f
►
dznrm2.f90
►
icamax.f
►
idamax.f
►
isamax.f
►
izamax.f
►
sasum.f
►
saxpy.f
►
scabs1.f
►
scasum.f
►
scnrm2.f90
►
scopy.f
►
sdot.f
►
sdsdot.f
►
sgbmv.f
►
sgemm.f
►
sgemmtr.f
►
sgemv.f
►
sger.f
►
snrm2.f90
►
srot.f
►
srotg.f90
►
srotm.f
►
srotmg.f
►
ssbmv.f
►
sscal.f
►
sspmv.f
►
sspr.f
►
sspr2.f
►
sswap.f
►
ssymm.f
►
ssymv.f
►
ssyr.f
►
ssyr2.f
►
ssyr2k.f
►
ssyrk.f
►
stbmv.f
►
stbsv.f
►
stpmv.f
►
stpsv.f
►
strmm.f
►
strmv.f
►
strsm.f
►
strsv.f
►
zaxpy.f
►
zcopy.f
►
zdotc.f
►
zdotu.f
►
zdrot.f
►
zdscal.f
►
zgbmv.f
►
zgemm.f
►
zgemmtr.f
►
zgemv.f
►
zgerc.f
►
zgeru.f
►
zhbmv.f
►
zhemm.f
►
zhemv.f
►
zher.f
►
zher2.f
►
zher2k.f
►
zherk.f
►
zhpmv.f
►
zhpr.f
►
zhpr2.f
►
zrotg.f90
►
zscal.f
►
zswap.f
►
zsymm.f
►
zsyr2k.f
►
zsyrk.f
►
ztbmv.f
►
ztbsv.f
►
ztpmv.f
►
ztpsv.f
►
ztrmm.f
►
ztrmv.f
►
ztrsm.f
►
ztrsv.f
►
TESTING
►
CBLAS
DOCS
►
INSTALL
►
SRC
►
TESTING
►
File Members
•
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Macros
Modules
Pages
Loading...
Searching...
No Matches
caxpy.f
Go to the documentation of this file.
1
*> \brief \b CAXPY
2
*
3
* =========== DOCUMENTATION ===========
4
*
5
* Online html documentation available at
6
* http://www.netlib.org/lapack/explore-html/
7
*
8
* Definition:
9
* ===========
10
*
11
* SUBROUTINE CAXPY(N,CA,CX,INCX,CY,INCY)
12
*
13
* .. Scalar Arguments ..
14
* COMPLEX CA
15
* INTEGER INCX,INCY,N
16
* ..
17
* .. Array Arguments ..
18
* COMPLEX CX(*),CY(*)
19
* ..
20
*
21
*
22
*> \par Purpose:
23
* =============
24
*>
25
*> \verbatim
26
*>
27
*> CAXPY constant times a vector plus a vector.
28
*> \endverbatim
29
*
30
* Arguments:
31
* ==========
32
*
33
*> \param[in] N
34
*> \verbatim
35
*> N is INTEGER
36
*> number of elements in input vector(s)
37
*> \endverbatim
38
*>
39
*> \param[in] CA
40
*> \verbatim
41
*> CA is COMPLEX
42
*> On entry, CA specifies the scalar alpha.
43
*> \endverbatim
44
*>
45
*> \param[in] CX
46
*> \verbatim
47
*> CX is COMPLEX array, dimension ( 1 + ( N - 1 )*abs( INCX ) )
48
*> \endverbatim
49
*>
50
*> \param[in] INCX
51
*> \verbatim
52
*> INCX is INTEGER
53
*> storage spacing between elements of CX
54
*> \endverbatim
55
*>
56
*> \param[in,out] CY
57
*> \verbatim
58
*> CY is COMPLEX array, dimension ( 1 + ( N - 1 )*abs( INCY ) )
59
*> \endverbatim
60
*>
61
*> \param[in] INCY
62
*> \verbatim
63
*> INCY is INTEGER
64
*> storage spacing between elements of CY
65
*> \endverbatim
66
*
67
* Authors:
68
* ========
69
*
70
*> \author Univ. of Tennessee
71
*> \author Univ. of California Berkeley
72
*> \author Univ. of Colorado Denver
73
*> \author NAG Ltd.
74
*
75
*> \ingroup axpy
76
*
77
*> \par Further Details:
78
* =====================
79
*>
80
*> \verbatim
81
*>
82
*> jack dongarra, linpack, 3/11/78.
83
*> modified 12/3/93, array(1) declarations changed to array(*)
84
*> \endverbatim
85
*>
86
* =====================================================================
87
SUBROUTINE
caxpy
(N,CA,CX,INCX,CY,INCY)
88
*
89
* -- Reference BLAS level1 routine --
90
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
91
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
92
*
93
* .. Scalar Arguments ..
94
COMPLEX
CA
95
INTEGER
INCX,INCY,N
96
* ..
97
* .. Array Arguments ..
98
COMPLEX
CX(*),CY(*)
99
* ..
100
*
101
* =====================================================================
102
*
103
* .. Local Scalars ..
104
INTEGER
I,IX,IY
105
* ..
106
* .. External Functions ..
107
REAL
SCABS1
108
EXTERNAL
scabs1
109
* ..
110
IF
(n.LE.0)
RETURN
111
IF
(scabs1(ca).EQ.0.0e+0)
RETURN
112
IF
(incx.EQ.1 .AND. incy.EQ.1)
THEN
113
*
114
* code for both increments equal to 1
115
*
116
DO
i = 1,n
117
cy(i) = cy(i) + ca*cx(i)
118
END DO
119
ELSE
120
*
121
* code for unequal increments or equal increments
122
* not equal to 1
123
*
124
ix = 1
125
iy = 1
126
IF
(incx.LT.0) ix = (-n+1)*incx + 1
127
IF
(incy.LT.0) iy = (-n+1)*incy + 1
128
DO
i = 1,n
129
cy(iy) = cy(iy) + ca*cx(ix)
130
ix = ix + incx
131
iy = iy + incy
132
END DO
133
END IF
134
*
135
RETURN
136
*
137
* End of CAXPY
138
*
87
SUBROUTINE
caxpy
(N,CA,CX,INCX,CY,INCY)
…
139
END
caxpy
subroutine caxpy(n, ca, cx, incx, cy, incy)
CAXPY
Definition
caxpy.f:88
BLAS
SRC
caxpy.f
Generated on Mon Jan 20 2025 17:18:05 for LAPACK by
1.11.0