diff options
| -rw-r--r-- | src/RewriterWf1.v | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/RewriterWf1.v b/src/RewriterWf1.v index 411287bcc..e22c8155b 100644 --- a/src/RewriterWf1.v +++ b/src/RewriterWf1.v @@ -2830,6 +2830,7 @@ Module Compilers. | [ |- List.In ?x ?seg ] => is_evar seg; unify seg (cons x nil); left end | constructor + | progress (cbv [wf_value] in *; cbn [wf_value'] in * ) | match goal with H : _ |- _ => eapply H; revgoals; clear H end ]. Qed. |