Skip to content
Snippets Groups Projects
Verified Commit a5559f9f authored by Paolo G. Giarrusso's avatar Paolo G. Giarrusso
Browse files

fin_sets: add missing Params instance for `set_map` 

Noticed from VERY slow rewrites.
parent 872a4579
No related branches found
No related tags found
1 merge request!328fin_sets: add missing Params instance for `set_map`
Hide whitespace changes
Inline Side-by-side
Showing
with 1 addition and 0 deletions
theories/fin_sets.v
+ 1
− 0
View file @ a5559f9f
...@@ -23,6 +23,7 @@ Definition set_map `{Elements A C, Singleton B D, Empty D, Union D} ...@@ -23,6 +23,7 @@ Definition set_map `{Elements A C, Singleton B D, Empty D, Union D}
(f : A → B) (X : C) : D := (f : A → B) (X : C) : D :=
list_to_set (f <$> elements X). list_to_set (f <$> elements X).
Typeclasses Opaque set_map. Typeclasses Opaque set_map.
Global Instance: Params (@set_map) 8 := {}.
Global Instance set_fresh `{Elements A C, Fresh A (list A)} : Fresh A C := Global Instance set_fresh `{Elements A C, Fresh A (list A)} : Fresh A C :=
fresh ∘ elements. fresh ∘ elements.
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment