package patoline

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
type tip_info = {
  1. tip_line_width : float;
  2. is_double : bool;
}
type info = {
  1. tip_info : tip_info;
  2. start : Gentity.t;
  3. finish : Gentity.t;
  4. params : Patoraw.RawContent.path_param;
  5. given_curve : Curve.t;
  6. underlying_curve : Curve.t;
  7. curves : (Patoraw.RawContent.path_param * Curve.t) list;
  8. decorations : decoration list;
  9. z_curve : float array list;
  10. anchor : anchor -> Point.t;
}
and decoration =
  1. | Curve of Patoraw.RawContent.path_param * Curve.t
  2. | Node of Node.t
val evaluate_z : info -> (int * float) -> float
val evaluate_z_global : info -> float -> float
type t = info
type edge_transfo = info -> info
module Transfo : sig ... end
val default_tip_info : tip_info
val default_params : Patoraw.RawContent.path_param
val default_edge_info : Gentity.t -> Gentity.t -> Curve.t -> info
val empty : info
val transform : Transfo.Style.t list -> Gentity.t -> Gentity.t -> Curve.t -> info
val outer_curve : 'a -> 'b -> 'b
type continue_path_spec = Point.t list
and path_spec = continue_path_spec list
val point_lists_of_path_spec : 'a -> 'a list list -> 'a list list
type controls = continue_path_spec * Point.t list
val point_lists_of_edge_spec_rec : 'a list list -> 'a -> 'a -> 'a list list -> 'a list list
val point_lists_of_edge_spec : Gentity.t -> Point.t list list -> Gentity.t -> Point.t list list
val decoration_to_contents : 'a -> decoration -> Patoraw.RawContent.raw list
val to_contents : info -> Patoraw.RawContent.raw list
val to_gentity : info -> Gentity.t
val params_pet : Transfo.Pet.t
val dashed : float list -> Transfo.Style.t
val noStroke : Transfo.Style.t
val black : Transfo.Style.t
val lineWidth : float -> Transfo.Style.t
val do_clip : (float array * float array) list -> Gentity.t -> Gentity.t -> (float array * float array) list
val clip : Transfo.Style.t
val clip_pet : Transfo.Pet.t
val draw : Transfo.Style.t
val draw_pet : Transfo.Pet.t
val do_squiggle : int -> float -> (float array * float array) -> (float array * float array) list
val squiggle : int -> float -> float -> float -> Transfo.Style.t
val squiggle_pet : Transfo.Pet.t
val shorten : float -> float -> Transfo.Style.t
val shorten_pet : Transfo.Pet.t
val shortenS : float -> Transfo.Style.t
val shortenE : float -> Transfo.Style.t
val zs : float array list -> Transfo.Style.t
val zs_pet : Transfo.Pet.t
val double : float -> Transfo.Style.t
val double_pet : Transfo.Pet.t
val fontArrowHeadCurves : Document.environment -> (float array * float array) list list * float
val fontArrowHead : (float * float) -> float -> 'a -> tip_info -> Patoraw.RawContent.path_param -> (float array * float array) list list -> float -> (float array * float array) list
val cliptip : ?reverse:bool -> (float * float) -> info -> (float array * float array) list -> (float array * float array) list -> (float array * float array) list
val base_arrow : Document.environment -> ?head_or_tail:bool -> info -> info
val arrow_head_pet : Transfo.Pet.t
val backArrow_head_pet : Transfo.Pet.t
val bothArrow_head_pet : Transfo.Pet.t
val modToOf : float -> float -> Document.environment -> Transfo.Style.t
val mod_to_of_pet : Transfo.Pet.t
val bendOf : float -> Transfo.Style.t
val bend_pet : Transfo.Pet.t
val bendLeft : float -> Transfo.Style.t
val bendRight : float -> Transfo.Style.t
val foreground : ?shortens:float -> ?shortene:float -> ?color:Patoraw.Color.color -> float -> Transfo.Style.t
val foreground_pet : Transfo.Pet.t
val make_anchors : Transfo.Style.t
val make_anchors_pet : Transfo.Pet.t
val label_pet : Transfo.Pet.t
val label_anchor : anchor -> Document.environment -> ?pos:anchor -> ?shape:Node.Transfo.Style.t -> ?style:Node.Transfo.Style.t list -> Document.content list -> Transfo.Style.t
val raw_edge : Transfo.Style.t list -> Gentity.t -> Gentity.t -> Curve.t -> info
val path_of_curve : Transfo.Style.t list -> Curve.t -> info
val path : Transfo.Style.t list -> (float * float) -> (float * float) list list -> info
val polyLine : Transfo.Style.t list -> Node.info list -> info
val of_gentities : Transfo.Style.t list -> Gentity.t -> ?controls:Point.t list list -> Gentity.t -> info
val make : Transfo.Style.t list -> Node.info -> ?controls:Point.t list list -> Node.info -> info
val makes : Transfo.Style.t list -> (Transfo.Style.t list * Node.info * Point.t list list * Node.info) list -> info list
val make_3d : Transfo.Style.t list -> Node.info -> ?projection:Proj3d.projection -> ?controls:Point.t list list -> ?controls3d:(float * float * float) list list -> Node.info -> info
val makes_3d : Transfo.Style.t list -> ?projection:Proj3d.projection -> (Transfo.Style.t list * Node.info * Point.t list list * (float * float * float) list list * Node.info) list -> info list
val restrict : info -> (int * float) -> (int * float) -> info
val put_forth : info -> (int * float) -> ?color:Patoraw.Color.color -> float -> float -> info