@@ -9,7 +9,7 @@ matprod(x, y) = x*y + x*y
9
9
dot (x:: Union{DenseArray{T},StridedVector{T}} , y:: Union{DenseArray{T},StridedVector{T}} ) where {T<: BlasReal } = BLAS. dot (x, y)
10
10
dot (x:: Union{DenseArray{T},StridedVector{T}} , y:: Union{DenseArray{T},StridedVector{T}} ) where {T<: BlasComplex } = BLAS. dotc (x, y)
11
11
12
- function dot (x:: Vector{T} , rx:: Union{UnitRange{TI}, AbstractRange{TI}} , y:: Vector{T} , ry:: Union{UnitRange{TI}, AbstractRange{TI} } ) where {T<: BlasReal ,TI<: Integer }
12
+ function dot (x:: Vector{T} , rx:: AbstractRange{TI} , y:: Vector{T} , ry:: AbstractRange{TI} ) where {T<: BlasReal ,TI<: Integer }
13
13
if length (rx) != length (ry)
14
14
throw (DimensionMismatch (" length of rx, $(length (rx)) , does not equal length of ry, $(length (ry)) " ))
15
15
end
@@ -22,7 +22,7 @@ function dot(x::Vector{T}, rx::Union{UnitRange{TI},AbstractRange{TI}}, y::Vector
22
22
GC. @preserve x y BLAS. dot (length (rx), pointer (x)+ (first (rx)- 1 )* sizeof (T), step (rx), pointer (y)+ (first (ry)- 1 )* sizeof (T), step (ry))
23
23
end
24
24
25
- function dot (x:: Vector{T} , rx:: Union{UnitRange{TI}, AbstractRange{TI}} , y:: Vector{T} , ry:: Union{UnitRange{TI}, AbstractRange{TI} } ) where {T<: BlasComplex ,TI<: Integer }
25
+ function dot (x:: Vector{T} , rx:: AbstractRange{TI} , y:: Vector{T} , ry:: AbstractRange{TI} ) where {T<: BlasComplex ,TI<: Integer }
26
26
if length (rx) != length (ry)
27
27
throw (DimensionMismatch (" length of rx, $(length (rx)) , does not equal length of ry, $(length (ry)) " ))
28
28
end
625
625
626
626
lapack_size (t:: AbstractChar , M:: AbstractVecOrMat ) = (size (M, t== ' N' ? 1 : 2 ), size (M, t== ' N' ? 2 : 1 ))
627
627
628
- function copyto! (B:: AbstractVecOrMat , ir_dest:: UnitRange {Int} , jr_dest:: UnitRange {Int} , tM:: AbstractChar , M:: AbstractVecOrMat , ir_src:: UnitRange {Int} , jr_src:: UnitRange {Int} )
628
+ function copyto! (B:: AbstractVecOrMat , ir_dest:: AbstractUnitRange {Int} , jr_dest:: AbstractUnitRange {Int} , tM:: AbstractChar , M:: AbstractVecOrMat , ir_src:: AbstractUnitRange {Int} , jr_src:: AbstractUnitRange {Int} )
629
629
if tM == ' N'
630
630
copyto! (B, ir_dest, jr_dest, M, ir_src, jr_src)
631
631
else
@@ -635,7 +635,7 @@ function copyto!(B::AbstractVecOrMat, ir_dest::UnitRange{Int}, jr_dest::UnitRang
635
635
B
636
636
end
637
637
638
- function copy_transpose! (B:: AbstractMatrix , ir_dest:: UnitRange {Int} , jr_dest:: UnitRange {Int} , tM:: AbstractChar , M:: AbstractVecOrMat , ir_src:: UnitRange {Int} , jr_src:: UnitRange {Int} )
638
+ function copy_transpose! (B:: AbstractMatrix , ir_dest:: AbstractUnitRange {Int} , jr_dest:: AbstractUnitRange {Int} , tM:: AbstractChar , M:: AbstractVecOrMat , ir_src:: AbstractUnitRange {Int} , jr_src:: AbstractUnitRange {Int} )
639
639
if tM == ' N'
640
640
LinearAlgebra. copy_transpose! (B, ir_dest, jr_dest, M, ir_src, jr_src)
641
641
else
0 commit comments