package patoline

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
module Drivers = Patoraw.RawContent
val diagram : 'a -> 'a
val swap : ('a * 'b) -> 'b * 'a
val pi : float
val one_third : float
val half_pi : float
val to_deg : float -> float
val to_rad : float -> float
val default_line_width : float ref
val ex : Document.environment -> float
val scale_env : Document.environment -> float
val drag_hook : (((float * float) -> bool -> unit) -> (float * float) -> bool -> (string * Patutil.Util.visibility) list) ref
val mem_compare : ('a -> 'b -> int) -> 'a -> 'b list -> bool
val only_last : 'a -> 'b -> 'b list
val array_last : 'a array -> 'a
val array_update_last : 'a array -> 'a -> unit
val array_update : ('a -> 'a) -> 'a array -> unit
val acurve_update : ('a -> 'a) -> ('b -> 'b) -> ('a array * 'b array) array -> unit
val list_split_last_rev : 'a list -> 'a list * 'a
val app_default : ('a -> 'b -> 'c option) -> 'a -> 'b -> 'c -> 'c
val max_list : ('a -> 'b) -> 'b -> 'a list -> 'b
val max_list_list : ('a -> 'b) -> 'b -> 'a list list -> 'b
module Point : sig ... end
module Vector : sig ... end
module Curve : sig ... end
module Transfo (X : Set.OrderedType) : sig ... end
type anchor = [
  1. | `Angle of float
  2. | `North
  3. | `South
  4. | `NorthEast
  5. | `SouthEast
  6. | `NorthWest
  7. | `SouthWest
  8. | `West
  9. | `East
  10. | `Center
  11. | `Main
  12. | `Base
  13. | `BaseWest
  14. | `BaseEast
  15. | `Line
  16. | `LineWest
  17. | `LineEast
  18. | `Vec of Vector.t
  19. | `Pdf
  20. | `Curvilinear of float
  21. | `CurvilinearFromStart of float
  22. | `Temporal of float
  23. | `Start
  24. | `End
  25. | `SouthBase
  26. | `SouthLine
  27. | `Vertex of int
  28. | `Apex
  29. | `Edge of int
  30. | `A
  31. | `B
  32. | `C
  33. | `D
]
val opposite : [> `Angle of float | `Base | `BaseEast | `BaseWest | `Center | `East | `LineEast | `LineWest | `Main | `North | `NorthEast | `NorthWest | `Pdf | `South | `SouthEast | `SouthWest | `Vec of float * float | `West ] -> [> `Angle of float | `Base | `BaseEast | `BaseWest | `Center | `East | `LineEast | `LineWest | `Main | `North | `NorthEast | `NorthWest | `Pdf | `South | `SouthEast | `SouthWest | `Vec of float * float | `West ]
module Gentity : sig ... end
type gentity = Gentity.t
val coord : Point.t -> Gentity.t
val coord3d : Proj3d.projection -> (float * float * float) -> Gentity.t
val translate : (float * float) -> Gentity.t -> Gentity.t
module Node : sig ... end
module Matrix : sig ... end
module Matrix3d : sig ... end
module Edge : sig ... end
module Entity : sig ... end
type entity = Entity.t
module MakeDiagram (Args : sig ... end) : sig ... end
val default_where : Node.info array array -> float * float
val default_deco : 'a -> Node.info array array -> 'b list * (float * float)
val xarrow : ?margin:float -> ?decoration: (Document.environment -> Node.info Matrix.matrix -> Entity.t list * (float * float)) -> Maths.math list -> Maths.math list
val xto : ?margin:float -> Maths.math list -> Maths.math list
val xot : ?margin:float -> Maths.math list -> Maths.math list
module type Diagram = sig ... end
val drawingOfDiagram : Document.content list -> Document.environment -> Box.drawingBox