Complex UniformScaling addition/subtraction (#87)

Author: dlfivefifty

Project.toml

@@ -1,6 +1,6 @@
 name = "BlockBandedMatrices"
 uuid = "ffab5731-97b5-5995-9138-79e8c1846df0"
-version = "0.9.3"
+version = "0.9.4"
 
 [deps]
 ArrayLayouts = "4c555306-a7a7-4459-81d9-ec55ddd5c99a"

src/interfaceimpl.jl

@@ -94,11 +94,15 @@ for op in (:-, :+)
 
         function $op(A::BlockTridiagonal, λ::UniformScaling)
             checksquareblocks(A)
-            mortar(Tridiagonal(A.blocks.dl, broadcast($op, A.blocks.d, Ref(λ)), A.blocks.du))
+            mortar(Tridiagonal(broadcast($op, A.blocks.dl, Ref(0λ)), 
+                               broadcast($op, A.blocks.d, Ref(λ)),
+                               broadcast($op, A.blocks.du, Ref(0λ))))
         end
         function $op(λ::UniformScaling, A::BlockTridiagonal)
             checksquareblocks(A)
-            mortar(Tridiagonal(broadcast($op,A.blocks.dl), broadcast($op, Ref(λ), A.blocks.d), broadcast($op,A.blocks.du)))
+            mortar(Tridiagonal(broadcast($op, Ref(0λ), A.blocks.dl), 
+                               broadcast($op, Ref(λ), A.blocks.d), 
+                               broadcast($op, Ref(0λ), A.blocks.du)))
         end
         function $op(A::BlockBidiagonal, λ::UniformScaling)
             checksquareblocks(A)