{ι : Type u_1} →
  {σ : Type u_2} →
    {A : Type u_3} →
      [inst : AddMonoid ι] →
        [inst_1 : Semiring A] →
          [inst_2 : SetLike σ A] →
            [inst_3 : AddSubmonoidClass σ A] →
              {𝒜 : ι → σ} →
                [inst_4 : DecidableEq ι] →
                  [inst_5 : GradedRing 𝒜] →
                    {motive : HomogeneousSubsemiring 𝒜 → Sort u} →
                      (t : HomogeneousSubsemiring 𝒜) →
                        ((toSubsemiring : Subsemiring A) →
                            (is_homogeneous' : DirectSum.SetLike.IsHomogeneous 𝒜 toSubsemiring) →
                              motive { toSubsemiring := toSubsemiring, is_homogeneous' := is_homogeneous' }) →
                          motive t