∀ {X : Type u_1} {m : Type u_4} {n : Type u_5} {p : Type u_6} {R : Type u_8} [inst : AddCommMonoid R]
  [inst_1 : TopologicalSpace R] {L : SummationFilter X} {f : X → Matrix (m × p) (n × p) R}
  {a : Matrix (m × p) (n × p) R}, HasSum f a L → HasSum (fun x => (f x).blockDiag) a.blockDiag L