∀ {n m : Type v} (i : m → n) (S : AlgebraicGeometry.Scheme),
  CategoryTheory.CategoryStruct.comp (AlgebraicGeometry.AffineSpace.reindex i S)
      (AlgebraicGeometry.AffineSpace m S ↘ S) =
    AlgebraicGeometry.AffineSpace n S ↘ S