{p : Prop} →
  {motive : Plausible.TestResult p → Sort u} →
    (t : Plausible.TestResult p) →
      ((a : Unit ⊕' p) → motive (Plausible.TestResult.success a)) →
        ((a : ℕ) → motive (Plausible.TestResult.gaveUp a)) →
          ((a : ¬p) → (a_1 : List String) → (a_2 : ℕ) → motive (Plausible.TestResult.failure a a_1 a_2)) → motive t