Mercurial > cpdt > repo
diff src/Match.v @ 297:b441010125d4
Everything compiles in Coq 8.3pl1
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Fri, 14 Jan 2011 14:39:12 -0500 |
parents | b653e6b19b6d |
children | f4768d5a75eb |
line wrap: on
line diff
--- a/src/Match.v Thu Dec 09 14:39:49 2010 -0500 +++ b/src/Match.v Fri Jan 14 14:39:12 2011 -0500 @@ -1,4 +1,4 @@ -(* Copyright (c) 2008-2010, Adam Chlipala +(* Copyright (c) 2008-2011, Adam Chlipala * * This work is licensed under a * Creative Commons Attribution-Noncommercial-No Derivative Works 3.0 @@ -988,7 +988,7 @@ -> P v2 u2 -> P (f v1 v2) (g u1 u2). - Theorem t6 : forall v1 v2, Q v1 -> Q v2 -> exists u1, exists u2, P (f v1 v2) (g u1 u2). + Theorem t7 : forall v1 v2, Q v1 -> Q v2 -> exists u1, exists u2, P (f v1 v2) (g u1 u2). intros; do 2 insterKeep H1; repeat match goal with | [ H : ex _ |- _ ] => destruct H