~cypheon/kicad2spice

ref: 96e390bc4f914314da98ecdfd7bd775e620563e2 kicad2spice/lib/geometry_ops.ml -rw-r--r-- 138 bytes
96e390bc — Johann Rudloff Implement correct pin order according to field "Spice_Node_Sequence" 3 years ago
                                                                                
1
2
3
4
5
6
7
8
9
open Geometry

let ( * ) {a;b;c;d} {x;y} =
  {x = a*x + b*y;
   y = c*x + d*y}

let ( + ) p1 p2 =
  {x = p1.x + p2.x;
   y = p1.y + p2.y}