Source file `kicadLib_sigs.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
open KicadSch_sigs

type relcoord = RelCoord of int * int

type circle = {center: relcoord; radius: int}

type pin_orientation = P_L | P_R | P_U | P_D

type pin_tag = string * size

type pin =
  { name: pin_tag
  ; number: pin_tag
  ; length: size
  ; contact: relcoord
  ; orient: pin_orientation
  }

type primitive =
  | Field
  | Polygon of int * relcoord list
  | Circle of int * circle
  | Pin of pin
  | Text of {c: relcoord; text: string; s: size}
  | Arc of
      { s: size
      ; radius: int
      ; sp: relcoord
      ; ep: relcoord
      ; center: relcoord
      }

type elt = {parts: int; prim: primitive}

type component =
  { names: string list
  ; draw_pnum: bool
  ; draw_pname: bool
  ; multi: bool
  ; graph: elt list
  }