如何破坏 Coq 中的等价对?

How to destruct pair equivalence in Coq?

我试图在使用 Coq 时破坏一对等价假设的证明。但是没找到适合我的攻略

案例是:

a, b, a', b' : nat
H0 : (a, b) = (a', b')

我想破坏H0中的对来生成

H1 : a = a'
H2 : b = b'

我怎样才能做到这一点?我应该使用哪种策略?或者我应该定义引理来破坏这样的对吗?

谢谢!

使用 injection H0 后跟 intros 作为第一个近似值。

您也可以使用 inversion H0 一步完成。