diff --git a/theories/algebra/ofe.v b/theories/algebra/ofe.v index b51402803548af145d104f6a582edbf799f359f6..9cf97615e6ec2735d6c76bbf6c6b7a340ec58a75 100644 --- a/theories/algebra/ofe.v +++ b/theories/algebra/ofe.v @@ -1061,6 +1061,7 @@ Inductive later (A : Type) : Type := Next { later_car : A }. Add Printing Constructor later. Arguments Next {_} _. Arguments later_car {_} _. +Instance: Params (@Next) 1. Section later. Context {A : ofeT}. diff --git a/theories/base_logic/lib/saved_prop.v b/theories/base_logic/lib/saved_prop.v index b1d1c462a29a1843ff5af67d462f4914c159e15d..e91c5670edf346336cc2e6cd9125420642d0056b 100644 --- a/theories/base_logic/lib/saved_prop.v +++ b/theories/base_logic/lib/saved_prop.v @@ -21,7 +21,7 @@ Definition saved_anything_own `{savedAnythingG Σ F} (γ : gname) (x : F (iProp Σ)) : iProp Σ := own γ (to_agree $ (cFunctor_map F (iProp_fold, iProp_unfold) x)). Typeclasses Opaque saved_anything_own. -Instance: Params (@saved_anything_own) 3. +Instance: Params (@saved_anything_own) 4. Section saved_anything. Context `{savedAnythingG Σ F}. diff --git a/theories/base_logic/lib/wsat.v b/theories/base_logic/lib/wsat.v index bfa226e3c8013cec1606c5ecd3d006fa9b23c923..a26f4f6ae6395fd36dfc415e01f14410ffd7d46c 100644 --- a/theories/base_logic/lib/wsat.v +++ b/theories/base_logic/lib/wsat.v @@ -23,6 +23,7 @@ Definition ownI `{invG Σ} (i : positive) (P : iProp Σ) : iProp Σ := own invariant_name (◯ {[ i := invariant_unfold P ]}). Arguments ownI {_ _} _ _%I. Typeclasses Opaque ownI. +Instance: Params (@invariant_unfold) 1. Instance: Params (@ownI) 3. Definition ownE `{invG Σ} (E : coPset) : iProp Σ :=