From a63662059215a26db627c4b76147a3c9338f5b74 Mon Sep 17 00:00:00 2001
From: Sébastien Dailly <sebastien@chimrod.com>
Date: Wed, 6 Jan 2021 22:09:53 +0100
Subject: Point suppression

---
 path/fixed.mli | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'path/fixed.mli')

diff --git a/path/fixed.mli b/path/fixed.mli
index c6af84d..32f6012 100755
--- a/path/fixed.mli
+++ b/path/fixed.mli
@@ -40,9 +40,15 @@ module Make(Point:P) : sig
   val distance
     : Gg.v2 -> t -> (Gg.v2 * float * Point.t * Point.t) option
 
+  val iter
+    : t -> f:(Point.t -> unit) -> unit
+
   val map_point
     : t -> (Point.t -> Point.t) -> t
 
+  val remove_point 
+    : t -> Point.t -> t
+
   type bezier =
     { p0:Point.t    (* The starting point *)
     ; p1:Point.t    (* The end point *)
-- 
cgit v1.2.3