{A : Type u_1} →
  [inst : CommRing A] →
    {g : PowerSeries A} →
      {f : Polynomial A} →
        {h : PowerSeries A} →
          {I : Ideal A} →
            {motive : g.IsWeierstrassFactorizationAt f h I → Sort u} →
              (t : g.IsWeierstrassFactorizationAt f h I) →
                ((isDistinguishedAt : f.IsDistinguishedAt I) → (isUnit : IsUnit h) → (eq_mul : g = ↑f * h) → motive ⋯) →
                  motive t