Mercurial > cpdt > repo
diff src/GeneralRec.v @ 548:a43fd2ba7ad3
Working again with Coq 8.4
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Wed, 12 Jul 2017 13:33:23 -0400 |
parents | 2c8c693ddaba |
children | 16d701d4bd82 |
line wrap: on
line diff
--- a/src/GeneralRec.v Wed Jul 12 13:08:24 2017 -0400 +++ b/src/GeneralRec.v Wed Jul 12 13:33:23 2017 -0400 @@ -822,6 +822,7 @@ match goal with | [ H : Bnd _ _ = Bnd _ _ |- _ ] => injection H; clear H; intros; try subst end. + subst B. crush. inversion H; clear H; crush. eauto. @@ -835,6 +836,7 @@ match goal with | [ H : Bnd _ _ = Bnd _ _ |- _ ] => injection H; clear H; intros; try subst end. + subst A. crush. inversion H0; clear H0; crush. eauto.