https://github.com/coq-ext-lib/coq-ext-lib
Tip revision: e49214f49e467b01b01682ba499441074218672b authored by Gregory Malecha on 13 November 2018, 22:41:44 UTC
Merge pull request #49 from coq-ext-lib/string-fold-direction
Merge pull request #49 from coq-ext-lib/string-fold-direction
Tip revision: e49214f
ConsiderDemo.v
Require NPeano.
Import NPeano.Nat.
Require Import ExtLib.Tactics.Consider.
Require Import Coq.Bool.Bool.
Require Import ExtLib.Data.Nat.
Require Import Coq.ZArith.ZArith.
Set Implicit Arguments.
Set Strict Implicit.
(** Some tests *)
Section test.
Goal forall x y z, (ltb x y && ltb y z) = true ->
ltb x z = true.
intros x y z.
consider (ltb x y && ltb y z).
consider (ltb x z); auto. intros. exfalso. omega.
Qed.
Goal forall x y z,
ltb x y = true ->
ltb y z = true ->
ltb x z = true.
Proof.
intros. consider (ltb x y); consider (ltb y z); consider (ltb x z); intros; auto.
exfalso; omega.
Qed.
End test.