diff src/Tactics.v @ 118:ee676bf3d681

Up to Streicher
author Adam Chlipala <adamc@hcoop.net>
date Sat, 18 Oct 2008 12:04:28 -0400
parents 8c7d9b82a4a4
children 56e205f966cc
line wrap: on
line diff
--- a/src/Tactics.v	Tue Oct 14 15:21:02 2008 -0400
+++ b/src/Tactics.v	Sat Oct 18 12:04:28 2008 -0400
@@ -163,3 +163,8 @@
                        | _ _ ?A => doit A
                        | _ ?A => doit A
                      end.
+
+Ltac clear_all :=
+  repeat match goal with
+           | [ H : _ |- _ ] => clear H
+         end.