∀ {A : Type u_2} {B : Type u_3} [inst : AddMonoid A] [inst_1 : AddMonoid B] [inst_2 : TopologicalSpace A]
  [inst_3 : TopologicalSpace B] [DiscreteTopology A] [ContinuousAdd B] [T2Space B] [CompactSpace B],
  CompactSpace (A →ₜ+ B)