Skip to Content.
Sympa Menu

coq-club - Re: [Coq-Club] minimal inequality proof

coq-club AT inria.fr

Subject: The Coq mailing list

List archive

Re: [Coq-Club] minimal inequality proof


Chronological Thread 
  • From: Robbert Krebbers <mailinglists AT robbertkrebbers.nl>
  • To: t x <txrev319 AT gmail.com>
  • Cc: coq-club <coq-club AT inria.fr>
  • Subject: Re: [Coq-Club] minimal inequality proof
  • Date: Thu, 10 Oct 2013 22:39:54 +0200

On 10/10/2013 10:16 PM, t x wrote:
I don't find this particularly insightful.
Is there a shorter manually written proof?
The inversion tactic is neither known to generate short nor insightful proofs.

Do you like this proof better:

Definition tx (H : 0 = S 0) : False :=
match H in eq _ y return
match y with 0 => True | S _ => False end
with eq_refl => I end.

It shows it is just a dependent pattern match on an impossible equality proof. Recent versions of Coq even accept it without return annotations.

Definition tx (H : 0 = S 0) : False :=
match H with eq_refl => I end.



Archive powered by MHonArc 2.6.18.

Top of Page