Coq：展开类实例

Question

如何在 Coq 中展开类实例？似乎只有当实例不包含证明或其他内容时才有可能。考虑一下：

Class C1 (t:Type) := {v1:t}.
Class C2 (t:Type) := {v2:t;c2:v2=v2}.

Instance C1_nat: C1 nat:= {v1:=4}.

Instance C2_nat: C2 nat:= {v2:=4}.
trivial.
Qed.

Theorem thm1 : v1=4.
unfold v1.
unfold C1_nat.
trivial.
Qed.

Theorem thm2 : v2=4.
unfold v2.
unfold C2_nat.
trivial.
Qed.

thm1被证明了，但我无法证明thm2；它在unfold C2_nat 步骤与Error: Cannot coerce C2_nat to an evaluable reference. 抱怨。

发生了什么事？如何获得C2_nat对v2的定义？

Answer 1

您以Qed 结束了C2_nat 的定义。以Qed 结尾的定义是不透明的，无法展开。改写如下

Instance C2_nat: C2 nat:= {v2:=4}.
  trivial.
Defined.

你的证明顺利完成。