{R : Type u} →
  [inst : CommRing R] →
    {motive : WeierstrassCurve.VariableChange R → Sort u_1} →
      ((u : Rˣ) → (r s t : R) → motive { u := u, r := r, s := s, t := t }) →
        (t : WeierstrassCurve.VariableChange R) → motive t