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.