∀ (R : Type u_2) (M : Type u_1) [inst : Semiring R] [inst_1 : AddCommMonoid M] [inst_2 : Module R M]
  [inst_3 : TopologicalSpace M] [inst_4 : TopologicalSpace R] [inst_5 : ContinuousSMul R M] (x : M),
  (fun f => f 1) (ContinuousLinearMap.toSpanSingleton R x) = x