sig type point = float * float val ccw : Delaunay.CCC.point -> Delaunay.CCC.point -> Delaunay.CCC.point -> bool val in_circle : Delaunay.CCC.point -> Delaunay.CCC.point -> Delaunay.CCC.point -> Delaunay.CCC.point -> bool end