在阿格达对皮亚诺公理工作，并打了一下一个症结

Question

PA6 : ∀{m n} -> m ≡ n -> n ≡ m

是我试图解决与支持公理，我已经采用丛（从核心库）尝试，但是与丛构造

有麻烦

PA6 = cong

让我无处，我知道聪我要求您提供REFL平等和类型，但我，不知道是什么类型我应该供应。想法？

这是在大学的小任务，所以我宁愿别人证明什么，我已经错过了，而不是写在acutual答案，但我会很感激的支持任何程度。

Answer 1

我已经创建的

通过该系统的性质，我不得不实现我有两个等价，因此需要使用等效方法REFL

因此，为了满足我类型签名AGDA接受：PA6 refl = refl

希望帮助

Answer 2

您PA6说≡为对称的。

这可以在从Relation.Binary.PropositionalEquality模块的标准库中找到。

sym : ∀ {a} {A : Set a} {x y : A} → x ≡ y → y ≡ x
sym refl = refl

（这个问题是很老，但我张贴的未来读者的是绊倒它的好处。）