{ε σ α : Type u} →
  {motive : EStateM.Result ε σ α → Sort u_1} →
    ((a : α) → (a_1 : σ) → motive (EStateM.Result.ok a a_1)) →
      ((a : ε) → (a_1 : σ) → motive (EStateM.Result.error a a_1)) → (t : EStateM.Result ε σ α) → motive t