如何在Coq中比较两个'int'类型的命题?

时间:2016-07-26 09:27:19

标签: logic coq compcert

我在Coq中的spec文件中有以下定义。我需要有一个比较两个“int”类型值的命题。这两个是't'和'Int.repr(i。(period1))'。(i.period1)和(i.period2)的类型为'Z'。

这是我的代码段:

Definition trans_uni_r_reject (i: invariant) (om os: block) (rid roff rval t: int) (m: mem) :=
  ( t > (Int.repr (i.(period1)))        
 /\ t < (Int.repr (i.(period2)))
 /\  master_eval_reject i om os rid roff rval m).

这给了我以下错误:

术语“t”的类型为“int”,而预期类型为“Z”

我也尝试过:

   (Int.cmpu Cgt t (Int.repr (i.(period1))))
/\ (Int.cmpu Clt t (Int.repr (i.(period2))))
/\ (master_eval_reject i om os rid roff rval m).

但它给了我这个错误:

术语“Int.cmpu Cgt t(Int.repr(period1 i))”的类型为“bool”,而预期类型为“Prop”。

有什么方法可以比较这两个'int'类型或将它们转换为其他类型并返回'prop'类型?

谢谢,

1 个答案:

答案 0 :(得分:2)

任何bool都可以通过将其Prop等同来转换为true。在您的示例中,这将导致:

   Int.cmpu Cgt t (Int.repr (i.(period1))) = true
/\ Int.cmpu Clt t (Int.repr (i.(period2))) = true
/\ master_eval_reject i om os rid roff rval m.

如果您在Int.cmpu运算符上搜索结果,您可能会在Int模块中找到以Int.cmpu Cgt x y = true表示的许多引号。为此,您可以使用SearchAbout命令:

SearchAbout Int.cmpu. (* Looks for all results on Int.cmpu *)
SearchAbout Int.cmpu Cgt (* Looks for all results that mention
                            Int.cmpu and Cgt *)

的强制

将布尔值等同于true是如此常见,以至于人们经常声明强制使用布尔值,就好像它们是命题一样:

Definition is_true (b : bool) : Prop := b = true.
Coercion is_true : bool >-> Sortclass.

现在,您可以在期望命题的上下文中使用任何布尔值:

   Int.cmpu Cgt t (Int.repr (i.(period1)))
/\ Int.cmpu Clt t (Int.repr (i.(period2)))
/\ master_eval_reject i om os rid roff rval m.

在幕后,Coq会围绕这些事件向is_true插入隐形调用。但是,您应该知道强制仍然出现在您的条款中。您可以通过发出特殊命令

来查看
Set Printing Coercions.

会显示Coq看到的上述片段:

   is_true (Int.cmpu Cgt t (Int.repr (i.(period1))))
/\ is_true (Int.cmpu Clt t (Int.repr (i.(period2))))
/\ master_eval_reject i om os rid roff rval m.

(要撤消上一步,只需运行Unset Printing Coercions。)

由于默认情况下不会打印强制,因此您可能需要一些时间才能有效地使用它们。 Ssreflect and MathComp Coq库大量使用is_true作为强制,并且特别支持使其更易于使用。如果你有兴趣,我建议你看看它们!