`sig
module S : CCC
type triangulation
val triangulate : S.point array -> Delaunay.Triangulation.triangulation
val iter :
(S.point -> S.point -> unit) ->
Delaunay.Triangulation.triangulation -> unit
val fold :
(S.point -> S.point -> 'a -> 'a) ->
Delaunay.Triangulation.triangulation -> 'a -> 'a
val iter_triangles :
(S.point -> S.point -> S.point -> unit) ->
Delaunay.Triangulation.triangulation -> unit
end`