Module `Mlpost__Point`

type corner = Mlpost__.Types.corner
type t = Mlpost.Ctypes.point

val dir : float -> Mlpost__.Point_lib.t
val up : Mlpost__.Point_lib.t
val down : Mlpost__.Point_lib.t
val left : Mlpost__.Point_lib.t
val right : Mlpost__.Point_lib.t
val xpart : Mlpost__.Point_lib.t -> float
val ypart : Mlpost__.Point_lib.t -> float
val add : Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val mult : float -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val sub : Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val shift : Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val scale : float -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val segment : float -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val rotate : float -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val rotate_around : Mlpost__.Point_lib.t -> float -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val xscale : float -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val yscale : float -> Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t
val transform : Mlpost.Transform.t -> t -> t
val pt : (float * float) -> Mlpost__.Point_lib.t
val p : ?⁠scale:(float -> float) -> (float * float) -> Mlpost__.Point_lib.t
val length : Mlpost__.Point_lib.t -> float
val origin : Mlpost__.Point_lib.t
val ptlist : ?⁠scale:(float -> float) -> (float * float) list -> Mlpost__.Point_lib.t list
val bpp : (float * float) -> Mlpost__.Point_lib.t
val inp : (float * float) -> Mlpost__.Point_lib.t
val cmp : (float * float) -> Mlpost__.Point_lib.t
val mmp : (float * float) -> Mlpost__.Point_lib.t
val ptp : (float * float) -> Mlpost__.Point_lib.t
val map_bp : (float * float) list -> Mlpost__.Point_lib.t list
val map_in : (float * float) list -> Mlpost__.Point_lib.t list
val map_cm : (float * float) list -> Mlpost__.Point_lib.t list
val map_mm : (float * float) list -> Mlpost__.Point_lib.t list
val map_pt : (float * float) list -> Mlpost__.Point_lib.t list
val draw : ?⁠brush:Mlpost__.Types.brush -> ?⁠color:Mlpost__.Types.color -> ?⁠pen:Mlpost__.Types.pen -> Mlpost__.Types.point -> Mlpost__.Types.commandpic
val normalize : Mlpost__.Point_lib.t -> Mlpost__.Point_lib.t