∀ {A : Type u_1} {σ : Type u_2} [inst : CommRing A] [inst_1 : SetLike σ A] [inst_2 : AddSubgroupClass σ A] (𝒜 : ℕ → σ)
  [inst_3 : GradedRing 𝒜] (f : A)
  (x : ↑↑((AlgebraicGeometry.Proj.toLocallyRingedSpace 𝒜).restrict ⋯).toPresheafedSpace),
  ((TopCat.Hom.hom (AlgebraicGeometry.ProjIsoSpecTopComponent.toSpec 𝒜 f)) x).asIdeal =
    AlgebraicGeometry.ProjIsoSpecTopComponent.ToSpec.carrier x