diff options
author | 2018-10-25 21:17:38 -0700 | |
---|---|---|
committer | 2018-10-29 19:41:44 -0400 | |
commit | 47d73a9f76ed16ec2ca719f60d717ec9e16eef86 (patch) | |
tree | 2815a04064e6e366d3e308bdac6548512423210c /src | |
parent | 167954a5667d7c7315519009b57e0ecd53a80aa2 (diff) |
Remove duplicate abstraction
`base_type` and `base_interp` are already abstracted by the section.
For compatibility with coq/coq#8820.
Diffstat (limited to 'src')
-rw-r--r-- | src/Experiments/NewPipeline/LanguageWf.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Experiments/NewPipeline/LanguageWf.v b/src/Experiments/NewPipeline/LanguageWf.v index 963f8f511..4caa34297 100644 --- a/src/Experiments/NewPipeline/LanguageWf.v +++ b/src/Experiments/NewPipeline/LanguageWf.v @@ -88,7 +88,7 @@ Hint Extern 10 (Proper ?R ?x) => simple eapply (@PER_valid_l _ R); [ | | solve [ Hint Extern 10 (Proper ?R ?x) => simple eapply (@PER_valid_r _ R); [ | | solve [ eauto with nocore ] ] : typeclass_instances. >> *) - Global Instance app_curried_Proper_gen {base_type base_interp R t} + Global Instance app_curried_Proper_gen {R t} : Proper (@type.related base_type base_interp R t ==> type.and_for_each_lhs_of_arrow (@type.related base_type base_interp R) ==> R (type.final_codomain t)) (@type.app_curried base_type base_interp t) | 1. Proof. |