∀ {ι : Type u_3} {S : Type u_2} {R : Type u_1} [inst : AddMonoid ι] [inst_1 : CommSemiring S] [inst_2 : Semiring R]
  [inst_3 : Algebra S R] (A : ι → Submodule S R) [inst_4 : SetLike.GradedMonoid A],
  (A 0).subtype GradedMonoid.GOne.one = (A 0).subtype GradedMonoid.GOne.one