Expose 'subset-impl' from Map
Signed-off-by: Danila Fedorin <danila.fedorin@gmail.com>
This commit is contained in:
parent
2a06e6ae2d
commit
99fc21cef2
|
@ -479,7 +479,7 @@ _∈k_ k m = MemProp._∈_ k (keys m)
|
|||
Map-functional : ∀ {k : A} {v v' : B} {m : Map} → (k , v) ∈ m → (k , v') ∈ m → v ≡ v'
|
||||
Map-functional {m = (l , ul)} k,v∈m k,v'∈m = ListAB-functional ul k,v∈m k,v'∈m
|
||||
|
||||
open ImplRelation renaming (subset to subset-impl)
|
||||
open ImplRelation using () renaming (subset to subset-impl) public
|
||||
|
||||
_⊆_ : Map → Map → Set (a ⊔ℓ b)
|
||||
_⊆_ (kvs₁ , _) (kvs₂ , _) = subset-impl kvs₁ kvs₂
|
||||
|
|
Loading…
Reference in New Issue
Block a user