use gadts for layer, clean code
This commit is contained in:
parent
f4ab3e17ad
commit
fbfb403734
17 changed files with 152 additions and 163 deletions
|
|
@ -9,6 +9,6 @@ let lng latlng = Jv.get latlng "lng" |> Jv.to_float
|
|||
|
||||
let equals a b = Jv.call a "equals" [| b |] |> Jv.to_bool
|
||||
|
||||
let of_jv_t = Fun.id
|
||||
let of_jv = Fun.id
|
||||
|
||||
let to_jv_t = Fun.id
|
||||
let to_jv = Fun.id
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue