12 lines
298 B
Text
12 lines
298 B
Text
|
--| An empty `Map` of the given key and value types
|
||
|
|
let Map = ./Type.dhall
|
||
|
|
|
||
|
|
let empty
|
||
|
|
: ∀(k : Type) → ∀(v : Type) → Map k v
|
||
|
|
= λ(k : Type) → λ(v : Type) → [] : Map k v
|
||
|
|
|
||
|
|
let example0 =
|
||
|
|
assert : empty Text Bool ≡ ([] : List { mapKey : Text, mapValue : Bool })
|
||
|
|
|
||
|
|
in empty
|