blob: 49bf03a4a08d4351d6d0555d04f4d77f27c394f4 (
plain)
1
2
3
4
5
6
7
8
9
10
|
(** Common module for ensuring that the function is evaluated only once *)
module Path_Builder = Path.Builder.Make(Path.Point)
module Fixed = Path.Fixed.Make(Path.Point)
module SVGRepr = Path.WireFramePrinter.Make(Layer.Svg)
module SVG_Printer = Fixed.DrawFixed(SVGRepr)
module CanvaRepr = Path.FillPrinter.Make(Layer.CanvaPrinter)
module Fixed_Printer = Fixed.DrawFixed(CanvaRepr)
|
