From 0faaa5fda396f0eca6bebf69f3624a344278fa6e Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Sat, 19 Dec 2020 19:59:17 +0100 Subject: First commit --- path/point.mli | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) (limited to 'path/point.mli') diff --git a/path/point.mli b/path/point.mli index 4b75c3c..6418de4 100755 --- a/path/point.mli +++ b/path/point.mli @@ -1,10 +1,35 @@ type t +val empty : t + val (+): t -> Gg.v2 -> t val get_coord : t -> Gg.v2 val create: float -> float -> t +val copy : t -> Gg.v2 -> t + val get_coord' : t -> Gg.v2 + +type 'a repr + +val create_path + : unit -> 'a repr + +(* Start a new path. *) +val start + : t -> 'a repr -> 'a repr + +val line_to + : t -> 'a repr -> 'a repr + +val quadratic_to + : t -> t -> t -> t -> 'a repr -> 'a repr + +val stop + : 'a repr -> 'a repr + +val get + : 'a repr -> 'a CanvaPrinter.t -- cgit v1.2.3