{R : Type u} →
  {A : Type v} →
    [inst : CommRing R] →
      [inst_1 : Ring A] →
        [inst_2 : Algebra R A] →
          {motive : Algebra.Transcendental R A → Sort u_1} →
            (t : Algebra.Transcendental R A) → ((transcendental : ∃ x, Transcendental R x) → motive ⋯) → motive t