diff options
| author |  Jason Gross <jagro@google.com> | 2016-06-23 18:46:26 -0700 |
|---|---|---|
| committer | Jason Gross <jagro@google.com> | 2016-06-23 18:46:26 -0700 |
| commit | eafd5f50fc25dd93020869449e9a57858b4a3ceb (patch) | |
| tree | 44d6b353c622378da4d605913a443039249e5552 /src/Tactics | |
| parent | 1e913f67b94a909e04d73cf19cd17265aca38bac (diff) | |
nsatz_contradict can now handle invalid _ <> _ hypotheses
Diffstat (limited to 'src/Tactics')
| -rw-r--r-- | src/Tactics/Nsatz.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Tactics/Nsatz.v b/src/Tactics/Nsatz.v index 97b9da1ad..84d472e54 100644 --- a/src/Tactics/Nsatz.v +++ b/src/Tactics/Nsatz.v @@ -137,6 +137,8 @@ Ltac nsatz_contradict_single_hypothesis domain := match goal with | [ H : eq _ _ -> False |- eq _ _ -> False ] => intro; apply H; nsatz + | [ H : eq _ _ -> False |- False ] + => apply H; nsatz end end. |