（A - B） - ＆gt; A = B？

Question

假设我定义了这个集合。

Inductive Set_1 : Set :=
  | Constr_1 : Set_1
  | Constr_2 : Set_1.

是否有可能证明这一陈述？

(Constr_1 = Constr_2) = False

如果是这样，我会采用什么策略？这可能对autorewrite很有用。

Answer 1

(A <-> B) -> A = B被称为命题扩展性，由classical logic隐含。

但是你不需要它来使用autorewrite的等价物，只需要Require Import Coq.Setoids.Setoid。