added logic gates

src/elements/logic/or.typ

@@ -0,0 +1,96 @@
+#import "@preview/cetz:0.2.2": draw
+#import "gate.typ"
+
+#let draw-shape(id, tl, tr, br, bl, fill, stroke) = {
+  let (x, y) = bl
+  let (width, height) = (tr.at(0) - x, tr.at(1) - y)
+
+  let t = (x + width / 2, y + height)
+  let b = (x + width / 2, y)
+
+  let ctrl-bl = (x + width / 2, y)
+  let ctrl-br = (x + width * 0.8, y + height * 0.1)
+  let ctrl-tl = (x + width / 2, y + height)
+  let ctrl-tr = (x + width * 0.8, y + height * 0.9)
+
+  let l = (x + width * 0.2, y + height / 2)
+  let r = (x + width, y + height / 2)
+
+  let f = draw.group(name: id, {
+    draw.merge-path(
+      inset: 0.5em,
+      fill: fill,
+      stroke: stroke,
+      name: id + "-path", {
+        draw.bezier-through(bl, l, tl)
+        draw.bezier((), r, ctrl-tl, ctrl-tr)
+        draw.bezier((), bl, ctrl-br, ctrl-bl)
+      }
+    )
+    
+    draw.intersections("i",
+      id + "-path",
+      draw.hide(draw.line(t, b))
+    )
+    draw.anchor("north", "i.0")
+    draw.anchor("south", "i.1")
+  })
+  return (f, tl, tr, br, bl)
+}
+
+#let gate-or(
+  x: none,
+  y: none,
+  w: none,
+  h: none,
+  inputs: 2,
+  fill: none,
+  stroke: black + 1pt,
+  id: "",
+  inverted: (),
+  debug: (
+    ports: false
+  )
+) = {
+  gate.gate(
+    draw-shape: draw-shape,
+    x: x,
+    y: y,
+    w: w,
+    h: h,
+    inputs: inputs,
+    fill: fill,
+    stroke: stroke,
+    id: id,
+    inverted: inverted,
+    debug: debug
+  )
+}
+
+#let gate-nor(
+  x: none,
+  y: none,
+  w: none,
+  h: none,
+  inputs: 2,
+  fill: none,
+  stroke: black + 1pt,
+  id: "",
+  inverted: (),
+  debug: (
+    ports: false
+  )
+) = {
+  gate-or(
+    x: x,
+    y: y,
+    w: w,
+    h: h,
+    inputs: inputs,
+    fill: fill,
+    stroke: stroke,
+    id: id,
+    inverted: inverted + ("out",),
+    debug: debug
+  )
+}