{A : Type u_2} →
  [inst : CommRing A] →
    {motive : IsDedekindRing A → Sort u} →
      ([toIsNoetherian : IsNoetherian A A] →
          [toDimensionLEOne : Ring.DimensionLEOne A] →
            [toIsIntegralClosure : IsIntegralClosure A A (FractionRing A)] → motive ⋯) →
        (t : IsDedekindRing A) → motive t