aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorGravatar Jason Gross <jgross@mit.edu>2018-10-28 23:11:40 -0400
committerGravatar Jason Gross <jgross@mit.edu>2018-10-28 23:11:40 -0400
commit310dfae39664702a0a30415c882b162bf327f7f8 (patch)
tree28ae866ac6208a5706007241b7a37c34e4b9438c /src
parent841b485536d21947debb9797205f7d435aaff980 (diff)
Fix a proof
Diffstat (limited to 'src')
-rw-r--r--src/Experiments/NewPipeline/RewriterWf1.v2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Experiments/NewPipeline/RewriterWf1.v b/src/Experiments/NewPipeline/RewriterWf1.v
index a244fa1b4..8200a131c 100644
--- a/src/Experiments/NewPipeline/RewriterWf1.v
+++ b/src/Experiments/NewPipeline/RewriterWf1.v
@@ -781,7 +781,7 @@ Module Compilers.
: @unify_types ident var pident t e p T k = k (@unify_types ident var pident t e p _ id).
Proof using Type.
cbv [unify_types]; break_innermost_match; try reflexivity.
- etransitivity; rewrite pattern.type.add_var_types_cps_id; reflexivity.
+ etransitivity; rewrite pattern.type.add_var_types_cps_id; [ reflexivity | ]; break_innermost_match; reflexivity.
Qed.
Lemma unify_pattern'_cps_id {t e p evm K v T cont}