91
91
92
92
#
93
93
# BLAS 2
94
- #
95
94
96
- function LinearAlgebra. generic_matvecmul! (Y:: oneVector , tA:: AbstractChar , A:: oneStridedMatrix , B:: oneStridedVector , _add:: MulAddMul )
95
+ LinearAlgebra. generic_matvecmul! (Y:: oneVector , tA:: AbstractChar , A:: oneStridedMatrix , B:: oneStridedVector , _add:: MulAddMul ) =
96
+ LinearAlgebra. generic_matvecmul! (Y, tA, A, B, _add. alpha, _add. beta)
97
+ function LinearAlgebra. generic_matvecmul! (Y:: oneVector , tA:: AbstractChar , A:: oneStridedMatrix , B:: oneStridedVector , a:: Number , b:: Number )
97
98
mA, nA = tA == ' N' ? size (A) : reverse (size (A))
98
99
99
100
if nA != length (B)
@@ -113,7 +114,7 @@ function LinearAlgebra.generic_matvecmul!(Y::oneVector, tA::AbstractChar, A::one
113
114
end
114
115
115
116
T = eltype (Y)
116
- alpha, beta = promote (_add . alpha, _add . beta , zero (T))
117
+ alpha, beta = promote (a, b , zero (T))
117
118
if alpha isa Union{Bool,T} && beta isa Union{Bool,T}
118
119
if T <: onemklFloat && eltype (A) == eltype (B) == T
119
120
if tA in (' N' , ' T' , ' C' )
@@ -198,9 +199,11 @@ end # VERSION
198
199
# BLAS 3
199
200
#
200
201
201
- function LinearAlgebra. generic_matmatmul! (C:: oneStridedMatrix , tA, tB, A:: oneStridedVecOrMat , B:: oneStridedVecOrMat , _add:: MulAddMul = MulAddMul ())
202
+ LinearAlgebra. generic_matmatmul! (C:: oneStridedMatrix , tA, tB, A:: oneStridedVecOrMat , B:: oneStridedVecOrMat , _add:: MulAddMul = MulAddMul ()) =
203
+ LinearAlgebra. generic_matmatmul! (C, tA, tB, A, B, _add. alpha, _add. beta)
204
+ function LinearAlgebra. generic_matmatmul! (C:: oneStridedMatrix , tA, tB, A:: oneStridedVecOrMat , B:: oneStridedVecOrMat , a:: Number , b:: Number )
202
205
T = eltype (C)
203
- alpha, beta = promote (_add . alpha, _add . beta , zero (T))
206
+ alpha, beta = promote (a, b , zero (T))
204
207
mA, nA = size (A, tA == ' N' ? 1 : 2 ), size (A, tA == ' N' ? 2 : 1 )
205
208
mB, nB = size (B, tB == ' N' ? 1 : 2 ), size (B, tB == ' N' ? 2 : 1 )
206
209
0 commit comments