add polyline layer

This commit is contained in:
Swrup 2024-01-30 00:48:37 +01:00
parent 92faca6a92
commit 3d91ee4ae6
2 changed files with 25 additions and 9 deletions

View file

@ -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