如何在Coq中结束此证明

Question

我设法将目标缩小到

(fun x0 : PSR => me (x x0)) = x

我知道reflexivity会起作用，但出于教学原因，我宁愿继续减少它。

me是一个标识函数，因此unfold me将其简化为

(fun x0 : PSR => x x0) = x

这只是一个将函数x应用于虚拟变量x0的匿名函数，所以你可以说两边都只是函数x。如果可能的话，我想在双方达成相同的表达方式。

Answer 1

你可以：

Require Import FunctionalExtensionality.

然后：

rewrite -> eta_expansion.

这使用了依赖功能扩展性的公理。