diff options
| author |  Jason Gross <jgross@mit.edu> | 2017-03-28 18:44:23 -0400 |
|---|---|---|
| committer | Jason Gross <jgross@mit.edu> | 2017-03-28 18:44:23 -0400 |
| commit | 1777daf558ae09e73f88ff85cc7a44f804c49193 (patch) | |
| tree | f2f00bb0350be582dcc125477e021a02eeacae88 /src/Reflection/Named | |
| parent | 7733e6ba2583948bb091edc313b121780b39f70b (diff) | |
Do more subst in ContextProperties/Tactics
Diffstat (limited to 'src/Reflection/Named')
| -rw-r--r-- | src/Reflection/Named/ContextProperties/Tactics.v | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Reflection/Named/ContextProperties/Tactics.v b/src/Reflection/Named/ContextProperties/Tactics.v index 66f6b07b4..91d6d20d2 100644 --- a/src/Reflection/Named/ContextProperties/Tactics.v +++ b/src/Reflection/Named/ContextProperties/Tactics.v @@ -20,6 +20,10 @@ Ltac fin_t_late_step := | exfalso; unfold not in *; eauto ]. Ltac inversion_step := first [ progress subst + | match goal with + | [ H := _ |- _ ] => subst H + | [ H : ?x = ?y |- _ ] => subst x || subst y + end | progress inversion_option | progress inversion_sigma | progress inversion_prod |