{α ι : Type} →
  {P : Sort u} →
    {pos : ι} →
      {res : α} →
        {pos' : ι} →
          {res' : α} →
            Std.Internal.Parsec.ParseResult.success pos res = Std.Internal.Parsec.ParseResult.success pos' res' →
              (pos ≍ pos' → res ≍ res' → P) → P