∀ {X : AlgebraicGeometry.Scheme} {K : Type u} [inst : Field K] [inst_1 : IsAlgClosed K]
  (f : X ⟶ AlgebraicGeometry.Spec { carrier := K, commRing := Field.toEuclideanDomain.toCommRing })
  [inst_2 : AlgebraicGeometry.LocallyOfFiniteType f],
  AlgebraicGeometry.pointEquivClosedPoint f =
    { toFun := fun p => ⟨↑p (IsLocalRing.closedPoint K), ⋯⟩,
      invFun := fun x => ⟨AlgebraicGeometry.pointOfClosedPoint f ↑x ⋯, ⋯⟩, left_inv := ⋯, right_inv := ⋯ }