diff options
Diffstat (limited to 'src/Util/Tactics/Not.v')
| -rw-r--r-- | src/Util/Tactics/Not.v | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Util/Tactics/Not.v b/src/Util/Tactics/Not.v new file mode 100644 index 000000000..09985ad73 --- /dev/null +++ b/src/Util/Tactics/Not.v @@ -0,0 +1,4 @@ +Require Import Crypto.Util.Tactics.Test. + +(** [not tac] is equivalent to [fail tac "succeeds"] if [tac] succeeds, and is equivalent to [idtac] if [tac] fails *) +Tactic Notation "not" tactic3(tac) := try ((test tac); fail 1 tac "succeeds"). |