add polyline layer
This commit is contained in:
parent
92faca6a92
commit
3d91ee4ae6
2 changed files with 25 additions and 9 deletions
|
|
@ -5,12 +5,14 @@ type _ t =
|
|||
| Geojson : Jv.t -> [> `Geojson ] t
|
||||
| Marker : Jv.t -> [> `Marker ] t
|
||||
| Tile : Jv.t -> [> `Tile ] t
|
||||
| Vector : Jv.t -> [> `Vector ] t
|
||||
|
||||
type _ sub =
|
||||
| Basic : [> `Basic ] sub
|
||||
| Geojson : [> `Geojson ] sub
|
||||
| Marker : [> `Marker ] sub
|
||||
| Tile : [> `Tile ] sub
|
||||
| Vector : [> `Vector ] sub
|
||||
|
||||
(** Basic layers *)
|
||||
|
||||
|
|
@ -97,3 +99,6 @@ val create_tile :
|
|||
attribution set to [openstreetmap.org]. See
|
||||
{:https://wiki.openstreetmap.org/wiki/Tile_servers} *)
|
||||
val create_tile_osm : tile_layer_opt list -> [ `Tile ] t
|
||||
|
||||
(** [create_polyline l] create a polyline layer from [l] *)
|
||||
val create_polyline : Latlng.t list -> [ `Vector ] t
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue