Module Delaunay.Int
Delaunay triangulation with integer coordinates
module S = IntPointsval triangulate : S.point array -> triangulationtriangulate acomputes the Delaunay triangulation of a set of points, given as an arraya. IfNis the number of points (that isArray.length a), then the running time is $O(N \log N)$ on the average and $O(N^2)$ on the worst-case. The space used is always $O(N)$.
val iter : (S.point -> S.point -> unit) -> triangulation -> unititer f titerates over all edges of the triangulationt.f u vis called once for each undirected edge(u,v).
val fold : (S.point -> S.point -> 'a -> 'a) -> triangulation -> 'a -> 'aval iter_triangles : (S.point -> S.point -> S.point -> unit) -> triangulation -> unit