[英]Coq proof that p<q or p>=q
我試圖證明以下微不足道的引理:
Lemma lt_or_ge: forall a b : nat,
((a <? b) = false) -> (b <= a).
Proof.
intros a0 b0 H.
我需要類似的東西:
((a <? b) = false) -> (a >= b)
但是在 Coq 庫中似乎找不到它。 任何幫助表示贊賞,謝謝。
Search
命令只考慮導入的模塊,這意味着您需要導入Arith
模塊才能訪問許多有用的(現在可搜索的)引理。
如下所示的搜索查詢
From Coq Require Import Arith.
(* queries separated by whitespace mean boolean "and" *)
Search (_ <? _) false (_ <= _).
將立即為您提供所需的東西:
lt_or_ge: forall a b : nat, (a <? b) = false -> b <= a
Nat.ltb_ge: forall x y : nat, (x <? y) = false <-> y <= x
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.