{motive : Aesop.NormSeqResult → Sort u} →
  (t : Aesop.NormSeqResult) →
    ((script : Array (Aesop.DisplayRuleName × Option (Array Aesop.Script.LazyStep))) →
        motive (Aesop.NormSeqResult.proved script)) →
      ((goal : Lean.MVarId) →
          (script : Array (Aesop.DisplayRuleName × Option (Array Aesop.Script.LazyStep))) →
            motive (Aesop.NormSeqResult.changed goal script)) →
        motive Aesop.NormSeqResult.unchanged → motive t