increase cov

Author: dlfivefifty

ext/InfiniteArraysBlockArraysExt.jl

@@ -38,10 +38,7 @@ sizes_from_blocks(A::AbstractVector, ::Tuple{OneToInf{Int}}) = (map(length,A),)
 length(::BlockedOneTo{Int,<:InfRanges}) = ℵ₀
 
 const OneToInfBlocks = BlockedOneTo{Int,OneToInfCumsum}
-const OneToBlocks = BlockedOneTo{Int,OneToCumsum}
-
 axes(a::OneToInfBlocks) = (a,)
-axes(a::OneToBlocks) = (a,)
 
 
 sub_materialize(_, V, ::Tuple{BlockedOneTo{Int,<:InfRanges}}) = V
@@ -51,7 +48,7 @@ function sub_materialize(::PaddedColumns, v::AbstractVector{T}, ax::Tuple{Blocke
     BlockedVector(Vcat(sub_materialize(dat), Zeros{T}(∞)), ax)
 end
 
-BlockArrays.dimlength(start, ::Infinity) = ℵ₀
+# BlockArrays.dimlength(start, ::Infinity) = ℵ₀
 
 function copy(bc::Broadcasted{<:BroadcastStyle,<:Any,typeof(*),<:Tuple{Ones{T,1,Tuple{OneToInfBlocks}},AbstractArray{V,N}}}) where {N,T,V}
     a,b = bc.args

test/test_infblock.jl

@@ -157,6 +157,19 @@ const BlockTriPertToeplitz = InfiniteArraysBlockArraysExt.BlockTriPertToeplitz
         @test (im*I+A)[1:100, 1:100] == im * I + A[1:100, 1:100]
         @test (im*I-A)[1:100, 1:100] == im * I - A[1:100, 1:100]
 
+        @test (A'-I)[1:100, 1:100] == A'[1:100, 1:100] - I
+        @test (A'+I)[1:100, 1:100] == A'[1:100, 1:100] + I
+        @test (I+A')[1:100, 1:100] == I + A'[1:100, 1:100]
+        @test (I-A')[1:100, 1:100] == I - A'[1:100, 1:100]
+
         @test BlockTridiagonal(A')[Block.(1:10),Block.(1:10)] == A[Block.(1:10),Block.(1:10)]'
     end
+
+    @testset "Bi/Diagonal mortar" begin
+        A = mortar(Diagonal(Fill([1 2; 3 4], ∞)))
+        @test A[Block(1,1)] == [1 2; 3 4]
+
+        B = mortar(Bidiagonal(Fill([1 2; 3 4], ∞), Fill([1 2; 3 4], ∞), :U))
+        @test B[Block(1,1)] == [1 2; 3 4]
+    end
 end