∀ (R : Type u_1) {A : Type u_2} [inst : CommSemiring R] [inst_1 : NonUnitalSemiring A] [inst_2 : Module R A]
  [inst_3 : IsScalarTower R A A] [inst_4 : SMulCommClass R A A] [inst_5 : TopologicalSpace A]
  [inst_6 : IsTopologicalSemiring A] [inst_7 : ContinuousConstSMul R A] (x : A), Topology.IsClosedEmbedding Subtype.val