kei-lisp-plugin-graphics 1.0.1 → 1.1.0

package/dist/index.cjs.map

@@ -1 +1 @@
-{"version":3,"file":"index.cjs","names":["Cons","InterpretedSymbol"],"sources":["../src/GraphicsPlugin/index.ts","../src/index.ts"],"sourcesContent":["/* eslint-disable unicorn/prefer-add-event-listener,\n                  unicorn/prefer-math-min-max,\n                  sonarjs/no-nested-conditional,\n                  sonarjs/no-duplicate-string */\n\n// These lint rules are disabled file-wide so the ported handlers can preserve\n// the legacy Graphist patterns (Image#onload, clamp ternaries, mode-flag\n// ternaries, repeated diagnostic strings) without per-line escape hatches.\n\nimport type { KeiLispPlugin, LispValue, PluginContext } from 'kei-lisp';\nimport { Cons, InterpretedSymbol } from 'kei-lisp';\n\n/**\n * @class\n * @classdesc Canvas2D drawing plugin for the kei-lisp interpreter. Implements\n *            the `KeiLispPlugin` contract (`name` / `has` / `apply`) and\n *            exposes 43 `g…` Lisp functions that proxy to a 2D rendering\n *            context.\n * @author Keisuke Ikeda\n * @this {GraphicsPlugin}\n */\nexport class GraphicsPlugin extends Object implements KeiLispPlugin {\n  /**\n   * Dispatch map from a Lisp function name (InterpretedSymbol) to the name of\n   * the GraphicsPlugin method that implements it.\n   */\n  static readonly buildInFunctions: Map<InterpretedSymbol, string> = GraphicsPlugin.setup();\n\n  /**\n   * Plugin identifier, used for diagnostics.\n   */\n  readonly name: string = 'graphics';\n\n  canvas: HTMLCanvasElement | OffscreenCanvas;\n  ctx: CanvasRenderingContext2D | OffscreenCanvasRenderingContext2D | null;\n  isOpen: boolean;\n\n  /**\n   * Constructor.\n   * @constructor\n   * @param canvas - the canvas to draw to\n   */\n  constructor(canvas: HTMLCanvasElement | OffscreenCanvas) {\n    super();\n    this.canvas = canvas;\n    this.ctx = canvas.getContext('2d');\n    this.isOpen = false;\n  }\n\n  /**\n   * Returns true if this plugin handles the given symbol.\n   * @param aSymbol - the call symbol\n   * @return true if `apply` should be called\n   */\n  has(aSymbol: InterpretedSymbol): boolean {\n    return GraphicsPlugin.buildInFunctions.has(aSymbol);\n  }\n\n  /**\n   * Dispatches the given symbol to the matching `g…` method.\n   * @param aSymbol - the call symbol\n   * @param args - the evaluated argument list\n   * @param _ctx - the interpreter context (unused by this plugin)\n   * @return the method's result, or `Cons.nil` if dispatch fails\n   */\n  apply(aSymbol: InterpretedSymbol, args: Cons, _ctx: PluginContext): LispValue {\n    return this.selectProcedure(aSymbol, args);\n  }\n\n  /**\n   * Resolves the procedure name and invokes the matching method.\n   * @param procedure - the Lisp symbol\n   * @param args - the evaluated argument list\n   * @return the method's result, or `Cons.nil` if not registered\n   */\n  selectProcedure(procedure: InterpretedSymbol, args: Cons): LispValue {\n    if (GraphicsPlugin.buildInFunctions.has(procedure)) {\n      return this.buildInFunction(procedure, args);\n    }\n    this._print(`I could find no procedure description for ${String(procedure)}`);\n    return Cons.nil;\n  }\n\n  /**\n   * Looks up and invokes the JS method that implements the given Lisp symbol.\n   * Throws `TypeError` when the dispatch table points to a method that does\n   * not exist on the instance — this matches the legacy behavior, where the\n   * Ramda `R.invoker(1, methodName)(args, this)` call would surface the same\n   * error by attempting to call `undefined`.\n   * @param procedure - the Lisp symbol\n   * @param args - the evaluated argument list\n   * @return the method's result\n   */\n  buildInFunction(procedure: InterpretedSymbol, args: Cons): LispValue {\n    const methodName = GraphicsPlugin.buildInFunctions.get(procedure) as string;\n    const target = this as unknown as Record<string, unknown>;\n    const method = target[methodName];\n    if (typeof method !== 'function') {\n      throw new TypeError(`${this.constructor.name} does not have a method named \"${methodName}\"`);\n    }\n    return (method as (args: Cons) => LispValue).call(this, args);\n  }\n\n  /**\n   * Checks whether the canvas exposes a usable 2D context, and narrows\n   * `this.ctx` to non-null for the caller when it returns true.\n   * @return type predicate — true when ctx is non-null\n   */\n  checkSupport(): this is GraphicsPlugin & {\n    ctx: CanvasRenderingContext2D | OffscreenCanvasRenderingContext2D;\n  } {\n    if (this.ctx === null) {\n      this._print('Unable to initialize canvas. The browser or machine may not support it.');\n      return false;\n    }\n    return true;\n  }\n\n  /**\n   * Writes a diagnostic line directly to `process.stderr`, matching the\n   * convention used by kei-lisp itself (`Applier.format` writes to\n   * `process.stdout`). In a Node runtime this hits the real stderr; in a\n   * browser kei-lisp host (e.g. kei-lisp-web) the host typically swaps\n   * `process.stderr.write` for a sink that routes to the REPL output panel,\n   * so the same call reaches the user via the host's normal output channel.\n   * @param line - the line to write\n   */\n  _print(line: string): void {\n    process.stderr.write(line + '\\n');\n  }\n\n  gAlpha(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1 && Cons.isNumber(args.car)) {\n          const aNumber = args.car <= 0 ? 0 : args.car >= 1 ? 1 : args.car;\n          this.ctx.globalAlpha = aNumber;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set alpha.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set alpha.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gArc(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 6) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          const cdr5 = cdr4.cdr as Cons;\n          const a5 = cdr5.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4) &&\n            Cons.isNumber(a5)\n          ) {\n            const aFlag = a5 >= 0;\n            this.ctx.arc(a0, a1, a2, (Math.PI / 180) * a3, (Math.PI / 180) * a4, aFlag);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw arc.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw arc.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gArcTo(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 5) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4)\n          ) {\n            this.ctx.arcTo(a0, a1, a2, a3, a4);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw arc to.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw arc to.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gBezCurveTo(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 6) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          const cdr5 = cdr4.cdr as Cons;\n          const a5 = cdr5.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4) &&\n            Cons.isNumber(a5)\n          ) {\n            this.ctx.bezierCurveTo(a0, a1, a2, a3, a4, a5);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw bezier curve.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw bezier curve.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gClear(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.fillStyle = '#ffffff';\n        this.ctx.fillRect(0, 0, this.canvas.width, this.canvas.height);\n        this.ctx.fillStyle = '#000000';\n        this.ctx.save();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this._print('Can not clear.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gClose(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.clearRect(0, 0, this.canvas.width, this.canvas.height);\n        this.isOpen = false;\n        return InterpretedSymbol.of('t');\n      } catch {\n        this._print('Can not close.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas has already been closed.');\n    return Cons.nil;\n  }\n\n  gColor(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() >= 1) {\n          const aColor = this.selectColor(args);\n          this.ctx.fillStyle = aColor;\n          this.ctx.strokeStyle = aColor;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set color.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set color.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFill(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.fill();\n        this.ctx.save();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this._print('Can not fill.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFillColor(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() >= 1) {\n          const aColor = this.selectColor(args);\n          this.ctx.fillStyle = aColor;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set fill color.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set fill color.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFillRect(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 4) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n            this.ctx.fillRect(a0, a1, a2, a3);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw fill rectangle.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw fill rectangle.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFillText(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 3) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          if (Cons.isString(a0) && Cons.isNumber(a1) && Cons.isNumber(a2)) {\n            this.ctx.fillText(a0, a1, a2);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw fill text.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw fill text.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFillTri(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 6) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          const cdr5 = cdr4.cdr as Cons;\n          const a5 = cdr5.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4) &&\n            Cons.isNumber(a5)\n          ) {\n            this.ctx.beginPath();\n            this.ctx.moveTo(a0, a1);\n            this.ctx.lineTo(a2, a3);\n            this.ctx.lineTo(a4, a5);\n            this.ctx.fill();\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw fill triangle.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw fill triangle.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFinishPath(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.closePath();\n        this.ctx.save();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this._print('Can not finish path.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gImage(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        const len = args.length();\n        if (len === 3) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          if (Cons.isString(a0) && Cons.isNumber(a1) && Cons.isNumber(a2)) {\n            const ctx = this.ctx;\n            const anImage = new Image();\n            anImage.src = a0;\n            anImage.onload = () => {\n              ctx.drawImage(anImage, a1, a2);\n            };\n            ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        } else if (len === 5) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          if (\n            Cons.isString(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4)\n          ) {\n            const ctx = this.ctx;\n            const anImage = new Image();\n            anImage.src = a0;\n            anImage.onload = () => {\n              ctx.drawImage(anImage, a1, a2, a3, a4);\n            };\n            ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw Image.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw Image.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gLineTo(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 2) {\n          const a0 = args.car;\n          const a1 = (args.cdr as Cons).car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1)) {\n            this.ctx.lineTo(a0, a1);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw line to');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw line to');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gLineCap(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1 && Cons.isNumber(args.car)) {\n          const aString = args.car === 0 ? 'butt' : args.car > 0 ? 'round' : 'square';\n          this.ctx.lineCap = aString;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set line cap.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set line cap.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gLineJoin(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1 && Cons.isNumber(args.car)) {\n          const aString = args.car === 0 ? 'miter' : args.car > 0 ? 'round' : 'bevel';\n          this.ctx.lineJoin = aString;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set line join.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set line join.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gLineWidth(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1 && Cons.isNumber(args.car)) {\n          const aNumber = args.car <= 0 ? 1 : args.car;\n          this.ctx.lineWidth = aNumber;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set line width.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set line width.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gMoveTo(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 2) {\n          const a0 = args.car;\n          const a1 = (args.cdr as Cons).car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1)) {\n            this.ctx.moveTo(a0, a1);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not move');\n        return Cons.nil;\n      } catch {\n        this._print('Can not move');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gOpen(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (!this.isOpen) {\n      try {\n        this.isOpen = true;\n        this.ctx.fillStyle = '#ffffff';\n        this.ctx.fillRect(0, 0, this.canvas.width, this.canvas.height);\n        this.ctx.fillStyle = '#000000';\n        this.ctx.save();\n        this._print('canvas size, width : 600 height : 300');\n        return InterpretedSymbol.of('t');\n      } catch {\n        this._print('Can not open.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas has already been opened.');\n    return Cons.nil;\n  }\n\n  gPattern(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 2) {\n          const a0 = args.car;\n          const a1 = (args.cdr as Cons).car;\n          if (Cons.isString(a0) && Cons.isNumber(a1)) {\n            const aString = a1 === 0 ? 'repeat' : a1 > 0 ? 'repeat-x' : 'repeat-y';\n            const ctx = this.ctx;\n            const anImage = new Image();\n            anImage.src = a0;\n            anImage.onload = () => {\n              // Legacy bug: createPattern() may return null; assigning null to fillStyle\n              // is a no-op in practice (browsers ignore or coerce it).\n              ctx.fillStyle = ctx.createPattern(anImage, aString) as CanvasPattern;\n            };\n            ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not set pattern.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set pattern.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gQuadCurveTo(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 4) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n            this.ctx.quadraticCurveTo(a0, a1, a2, a3);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw quadratic curve.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw quadratic curve.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gSaveJpeg(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        const anImage = new Image();\n        anImage.crossOrigin = 'Anonymous';\n        // NOTE: toDataURL is not available on OffscreenCanvas; callers must use HTMLCanvasElement.\n        anImage.src = (this.canvas as HTMLCanvasElement).toDataURL('image/jpeg');\n        const link = document.createElement('a');\n        link.href = anImage.src;\n        link.download = 'canvas';\n        document.body.append(link);\n        link.click();\n        link.remove();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this._print(\n          \"Can not save jpeg.  If you are using an image in the canvas, you can't save jpeg.\",\n        );\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gSavePng(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        const anImage = new Image();\n        anImage.crossOrigin = 'Anonymous';\n        // NOTE: toDataURL is not available on OffscreenCanvas; callers must use HTMLCanvasElement.\n        anImage.src = (this.canvas as HTMLCanvasElement).toDataURL('image/png');\n        const link = document.createElement('a');\n        link.href = anImage.src;\n        link.download = 'canvas';\n        document.body.append(link);\n        link.click();\n        link.remove();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this._print(\n          \"Can not save png. If you are using an image in the canvas, you can't save png.\",\n        );\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gScale(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 2) {\n          const a0 = args.car;\n          const a1 = (args.cdr as Cons).car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1)) {\n            this.ctx.scale(a0, a1);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not scale.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not scale.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gShadowBlur(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      if (args.length() === 1 && Cons.isNumber(args.car)) {\n        // Legacy: writes to ctx.Blur (typo) rather than ctx.shadowBlur.\n        // Preserved verbatim from the original Graphist.js.\n        (this.ctx as unknown as { Blur: number }).Blur = args.car;\n        this.ctx.save();\n        return InterpretedSymbol.of('t');\n      }\n      this._print('Can not set shadow blur.');\n      return Cons.nil;\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gShadowColor(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1) {\n          const aColor = this.selectColor(args);\n          this.ctx.shadowColor = aColor;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set shadow color.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set shadow color.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  // NOTE: gShadowOffsetX, gShadowOffsetY, and gShadowBlur intentionally omit try/catch.\n  // The original Graphist.js had the same structure for all three shadow-property setters.\n  gShadowOffsetX(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      if (args.length() === 1 && Cons.isNumber(args.car)) {\n        this.ctx.shadowOffsetX = args.car;\n        this.ctx.save();\n        return InterpretedSymbol.of('t');\n      }\n      this._print('Can not set shadow offsetX.');\n      return Cons.nil;\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gShadowOffsetY(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      if (args.length() === 1 && Cons.isNumber(args.car)) {\n        this.ctx.shadowOffsetY = args.car;\n        this.ctx.save();\n        return InterpretedSymbol.of('t');\n      }\n      this._print('Can not set shadow offsetY.');\n      return Cons.nil;\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gSleep(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      const sleep = (ms: number): void => {\n        const time = Date.now() + ms;\n        while (Date.now() < time) {\n          // busy wait\n        }\n      };\n      if (args.length() === 1 && Cons.isNumber(args.car)) {\n        sleep(args.car);\n        return InterpretedSymbol.of('t');\n      }\n      this._print('Can not sleep');\n      return Cons.nil;\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStartPath(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.beginPath();\n        this.ctx.save();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this._print('Can not start path.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStroke(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.stroke();\n        this.ctx.save();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this._print('Can not stroke.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStrokeColor(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() >= 1) {\n          const aColor = this.selectColor(args);\n          this.ctx.strokeStyle = aColor;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set stroke color');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set stroke color');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStrokeRect(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 4) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n            this.ctx.strokeRect(a0, a1, a2, a3);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw stroke rectangle.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw stroke rectangle.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStrokeText(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 3) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          if (Cons.isString(a0) && Cons.isNumber(a1) && Cons.isNumber(a2)) {\n            this.ctx.strokeText(a0, a1, a2);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        // Legacy typo: message says 'fill text' but this method strokes. Preserved from the\n        // original Graphist.js.\n        this._print('Can not draw fill text.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw fill text.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStrokeTri(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 6) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          const cdr5 = cdr4.cdr as Cons;\n          const a5 = cdr5.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4) &&\n            Cons.isNumber(a5)\n          ) {\n            this.ctx.beginPath();\n            this.ctx.moveTo(a0, a1);\n            this.ctx.lineTo(a2, a3);\n            this.ctx.lineTo(a4, a5);\n            this.ctx.closePath();\n            this.ctx.stroke();\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw stroke triangle.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw stroke triangle.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTextAlign(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1 && Cons.isString(args.car)) {\n          this.ctx.textAlign = args.car as CanvasTextAlign;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set text align.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set text align.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTextBaseline(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1 && Cons.isString(args.car)) {\n          this.ctx.textBaseline = args.car as CanvasTextBaseline;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set text baseline.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set text baseline.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTextDirection(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1 && Cons.isNumber(args.car)) {\n          const aString = args.car === 0 ? 'inherit' : args.car > 0 ? 'rtl' : 'ltr';\n          this.ctx.direction = aString;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set text direction.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set text direction.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTextFont(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1 && Cons.isString(args.car)) {\n          this.ctx.font = args.car;\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not set text font.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not set text font.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTranslate(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 2) {\n          const a0 = args.car;\n          const a1 = (args.cdr as Cons).car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1)) {\n            this.ctx.translate(a0, a1);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not translate.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not translate.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gRect(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 4) {\n          const a0 = args.car;\n          const cdr1 = args.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n            this.ctx.rect(a0, a1, a2, a3);\n            this.ctx.save();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this._print('Can not draw rectangle.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not draw rectangle.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gRotate(args: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (args.length() === 1 && Cons.isNumber(args.car)) {\n          this.ctx.rotate((Math.PI / 180) * args.car);\n          this.ctx.save();\n          return InterpretedSymbol.of('t');\n        }\n        this._print('Can not rotate.');\n        return Cons.nil;\n      } catch {\n        this._print('Can not rotate.');\n        return Cons.nil;\n      }\n    }\n    this._print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  /**\n   * Parses a color spec from the head of the argument Cons. Accepts\n   * (1 string), (3 numbers — rgb), or (4 numbers — rgba); falls back to\n   * `'black'` on anything else (legacy behavior).\n   * @param args - the argument Cons to parse\n   * @return CSS color string\n   */\n  selectColor(args: Cons): string {\n    let aColor = 'black';\n    const len = args.length();\n    const a0 = args.car;\n    if (len === 1 && Cons.isString(a0)) {\n      aColor = a0;\n    } else if (len === 3) {\n      const cdr1 = args.cdr as Cons;\n      const a1 = cdr1.car;\n      const cdr2 = cdr1.cdr as Cons;\n      const a2 = cdr2.car;\n      if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2)) {\n        aColor = `rgb(${a0}, ${a1}, ${a2})`;\n      } else {\n        this._print('Can not set color. set color \"black\".');\n      }\n    } else if (len === 4) {\n      const cdr1 = args.cdr as Cons;\n      const a1 = cdr1.car;\n      const cdr2 = cdr1.cdr as Cons;\n      const a2 = cdr2.car;\n      const cdr3 = cdr2.cdr as Cons;\n      const a3 = cdr3.car;\n      if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n        aColor = `rgba(${a0}, ${a1}, ${a2}, ${a3})`;\n      } else {\n        this._print('Can not set color. set color \"black\".');\n      }\n    } else {\n      this._print('Can not set color. set color \"black\".');\n    }\n    return aColor;\n  }\n\n  /**\n   * Builds the dispatch table.\n   * @return the dispatch table\n   */\n  static setup(): Map<InterpretedSymbol, string> {\n    const aTable = new Map<InterpretedSymbol, string>();\n    aTable.set(InterpretedSymbol.of('galpha'), 'gAlpha');\n    aTable.set(InterpretedSymbol.of('garc'), 'gArc');\n    aTable.set(InterpretedSymbol.of('garc-to'), 'gArcTo');\n    aTable.set(InterpretedSymbol.of('gbezcurve-to'), 'gBezCurveTo');\n    aTable.set(InterpretedSymbol.of('gclear'), 'gClear');\n    aTable.set(InterpretedSymbol.of('gclose'), 'gClose');\n    aTable.set(InterpretedSymbol.of('gcolor'), 'gColor');\n    aTable.set(InterpretedSymbol.of('gfill'), 'gFill');\n    aTable.set(InterpretedSymbol.of('gfill-color'), 'gFillColor');\n    aTable.set(InterpretedSymbol.of('gfill-rect'), 'gFillRect');\n    aTable.set(InterpretedSymbol.of('gfill-text'), 'gFillText');\n    aTable.set(InterpretedSymbol.of('gfill-tri'), 'gFillTri');\n    aTable.set(InterpretedSymbol.of('gfinish-path'), 'gFinishPath');\n    aTable.set(InterpretedSymbol.of('gimage'), 'gImage');\n    aTable.set(InterpretedSymbol.of('gmove-to'), 'gMoveTo');\n    aTable.set(InterpretedSymbol.of('gline-to'), 'gLineTo');\n    aTable.set(InterpretedSymbol.of('gline-cap'), 'gLineCap');\n    aTable.set(InterpretedSymbol.of('gline-join'), 'gLineJoin');\n    aTable.set(InterpretedSymbol.of('gline-width'), 'gLineWidth');\n    aTable.set(InterpretedSymbol.of('gopen'), 'gOpen');\n    aTable.set(InterpretedSymbol.of('gpattern'), 'gPattern');\n    aTable.set(InterpretedSymbol.of('gquadcurve-to'), 'gQuadCurveTo');\n    aTable.set(InterpretedSymbol.of('gsave-jpeg'), 'gSaveJpeg');\n    aTable.set(InterpretedSymbol.of('gsave-png'), 'gSavePng');\n    aTable.set(InterpretedSymbol.of('gscale'), 'gScale');\n    aTable.set(InterpretedSymbol.of('gshadow-blur'), 'gShadowBlur');\n    aTable.set(InterpretedSymbol.of('gshadow-color'), 'gShadowColor');\n    aTable.set(InterpretedSymbol.of('gshadow-offsetx'), 'gShadowOffsetX');\n    aTable.set(InterpretedSymbol.of('gshadow-offsety'), 'gShadowOffsetY');\n    aTable.set(InterpretedSymbol.of('gsleep'), 'gSleep');\n    aTable.set(InterpretedSymbol.of('gstart-path'), 'gStartPath');\n    aTable.set(InterpretedSymbol.of('gstroke'), 'gStroke');\n    aTable.set(InterpretedSymbol.of('gstroke-color'), 'gStrokeColor');\n    aTable.set(InterpretedSymbol.of('gstroke-rect'), 'gStrokeRect');\n    aTable.set(InterpretedSymbol.of('gstroke-text'), 'gStrokeText');\n    aTable.set(InterpretedSymbol.of('gstroke-tri'), 'gStrokeTri');\n    aTable.set(InterpretedSymbol.of('gtext-align'), 'gTextAlign');\n    aTable.set(InterpretedSymbol.of('gtext-dire'), 'gTextDirection');\n    aTable.set(InterpretedSymbol.of('gtext-font'), 'gTextFont');\n    aTable.set(InterpretedSymbol.of('gtext-line'), 'gTextBaseline');\n    aTable.set(InterpretedSymbol.of('gtranslate'), 'gTranslate');\n    aTable.set(InterpretedSymbol.of('grect'), 'gRect');\n    aTable.set(InterpretedSymbol.of('grotate'), 'gRotate');\n    return aTable;\n  }\n}\n","import { GraphicsPlugin } from './GraphicsPlugin/index.js';\n\n/**\n * Creates a Canvas2D drawing plugin bound to the given canvas. Register it on\n * a `LispInterpreter` via `interpreter.use(plugin)` to make the `g…` drawing\n * primitives callable from Lisp source.\n * @param options - the canvas to draw to\n * @return a KeiLispPlugin that handles the `g…` symbols\n */\nexport function createGraphicsPlugin(options: {\n  canvas: HTMLCanvasElement | OffscreenCanvas;\n}): GraphicsPlugin {\n  return new GraphicsPlugin(options.canvas);\n}\n\nexport { GraphicsPlugin } from './GraphicsPlugin/index.js';\n"],"mappings":";;;;;;;;;;;;AAqBA,IAAa,iBAAb,MAAa,uBAAuB,OAAgC;;;;;CAKlE,OAAgB,mBAAmD,eAAe,MAAM;;;;CAKxF,OAAwB;CAExB;CACA;CACA;;;;;;CAOA,YAAY,QAA6C;EACvD,MAAM;EACN,KAAK,SAAS;EACd,KAAK,MAAM,OAAO,WAAW,IAAI;EACjC,KAAK,SAAS;CAChB;;;;;;CAOA,IAAI,SAAqC;EACvC,OAAO,eAAe,iBAAiB,IAAI,OAAO;CACpD;;;;;;;;CASA,MAAM,SAA4B,MAAY,MAAgC;EAC5E,OAAO,KAAK,gBAAgB,SAAS,IAAI;CAC3C;;;;;;;CAQA,gBAAgB,WAA8B,MAAuB;EACnE,IAAI,eAAe,iBAAiB,IAAI,SAAS,GAC/C,OAAO,KAAK,gBAAgB,WAAW,IAAI;EAE7C,KAAK,OAAO,6CAA6C,OAAO,SAAS,GAAG;EAC5E,OAAOA,SAAAA,KAAK;CACd;;;;;;;;;;;CAYA,gBAAgB,WAA8B,MAAuB;EACnE,MAAM,aAAa,eAAe,iBAAiB,IAAI,SAAS;EAEhE,MAAM,SAAS,KAAO;EACtB,IAAI,OAAO,WAAW,YACpB,MAAM,IAAI,UAAU,GAAG,KAAK,YAAY,KAAK,iCAAiC,WAAW,EAAE;EAE7F,OAAQ,OAAqC,KAAK,MAAM,IAAI;CAC9D;;;;;;CAOA,eAEE;EACA,IAAI,KAAK,QAAQ,MAAM;GACrB,KAAK,OAAO,yEAAyE;GACrF,OAAO;EACT;EACA,OAAO;CACT;;;;;;;;;;CAWA,OAAO,MAAoB;EACzB,QAAQ,OAAO,MAAM,OAAO,IAAI;CAClC;CAEA,OAAO,MAAuB;EAC5B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,MAAM,UAAU,KAAK,OAAO,IAAI,IAAI,KAAK,OAAO,IAAI,IAAI,KAAK;IAC7D,KAAK,IAAI,cAAc;IACvB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,oBAAoB;GAChC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,oBAAoB;GAChC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,KAAK,MAAuB;EAC1B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,MAAM,QAAQ,MAAM;KACpB,KAAK,IAAI,IAAI,IAAI,IAAI,IAAK,KAAK,KAAK,MAAO,IAAK,KAAK,KAAK,MAAO,IAAI,KAAK;KAC1E,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,mBAAmB;GAC/B,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,mBAAmB;GAC/B,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,OAAO,MAAuB;EAC5B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,KAAK,IAAI,MAAM,IAAI,IAAI,IAAI,IAAI,EAAE;KACjC,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,sBAAsB;GAClC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,sBAAsB;GAClC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,YAAY,MAAuB;EACjC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,KAAK,IAAI,cAAc,IAAI,IAAI,IAAI,IAAI,IAAI,EAAE;KAC7C,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,4BAA4B;GACxC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,4BAA4B;GACxC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,SAAoB;EAClB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,YAAY;GACrB,KAAK,IAAI,SAAS,GAAG,GAAG,KAAK,OAAO,OAAO,KAAK,OAAO,MAAM;GAC7D,KAAK,IAAI,YAAY;GACrB,KAAK,IAAI,KAAK;GACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAK,OAAO,gBAAgB;GAC5B,OAAOD,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,SAAoB;EAClB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,UAAU,GAAG,GAAG,KAAK,OAAO,OAAO,KAAK,OAAO,MAAM;GAC9D,KAAK,SAAS;GACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAK,OAAO,gBAAgB;GAC5B,OAAOD,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,qCAAqC;EACjD,OAAOA,SAAAA,KAAK;CACd;CAEA,OAAO,MAAuB;EAC5B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,KAAK,GAAG;IACtB,MAAM,SAAS,KAAK,YAAY,IAAI;IACpC,KAAK,IAAI,YAAY;IACrB,KAAK,IAAI,cAAc;IACvB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,oBAAoB;GAChC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,oBAAoB;GAChC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,QAAmB;EACjB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,KAAK;GACd,KAAK,IAAI,KAAK;GACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAK,OAAO,eAAe;GAC3B,OAAOD,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,WAAW,MAAuB;EAChC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,KAAK,GAAG;IACtB,MAAM,SAAS,KAAK,YAAY,IAAI;IACpC,KAAK,IAAI,YAAY;IACrB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,yBAAyB;GACrC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,yBAAyB;GACrC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,UAAU,MAAuB;EAC/B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KACpF,KAAK,IAAI,SAAS,IAAI,IAAI,IAAI,EAAE;KAChC,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,8BAA8B;GAC1C,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,8BAA8B;GAC1C,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,UAAU,MAAuB;EAC/B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC/D,KAAK,IAAI,SAAS,IAAI,IAAI,EAAE;KAC5B,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,yBAAyB;GACrC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,yBAAyB;GACrC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,SAAS,MAAuB;EAC9B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,KAAK,IAAI,UAAU;KACnB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,KAAK;KACd,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,6BAA6B;GACzC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,6BAA6B;GACzC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,cAAyB;EACvB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,UAAU;GACnB,KAAK,IAAI,KAAK;GACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAK,OAAO,sBAAsB;GAClC,OAAOD,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,OAAO,MAAuB;EAC5B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,MAAM,MAAM,KAAK,OAAO;GACxB,IAAI,QAAQ,GAAG;IACb,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC/D,MAAM,MAAM,KAAK;KACjB,MAAM,UAAU,IAAI,MAAM;KAC1B,QAAQ,MAAM;KACd,QAAQ,eAAe;MACrB,IAAI,UAAU,SAAS,IAAI,EAAE;KAC/B;KACA,IAAI,KAAK;KACT,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF,OAAO,IAAI,QAAQ,GAAG;IACpB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACED,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,MAAM,MAAM,KAAK;KACjB,MAAM,UAAU,IAAI,MAAM;KAC1B,QAAQ,MAAM;KACd,QAAQ,eAAe;MACrB,IAAI,UAAU,SAAS,IAAI,IAAI,IAAI,EAAE;KACvC;KACA,IAAI,KAAK;KACT,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,qBAAqB;GACjC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,qBAAqB;GACjC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,QAAQ,MAAuB;EAC7B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,KAAM,KAAK,IAAa;IAC9B,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,sBAAsB;GAClC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,sBAAsB;GAClC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,SAAS,MAAuB;EAC9B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,MAAM,UAAU,KAAK,QAAQ,IAAI,SAAS,KAAK,MAAM,IAAI,UAAU;IACnE,KAAK,IAAI,UAAU;IACnB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,uBAAuB;GACnC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,uBAAuB;GACnC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,UAAU,MAAuB;EAC/B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,MAAM,UAAU,KAAK,QAAQ,IAAI,UAAU,KAAK,MAAM,IAAI,UAAU;IACpE,KAAK,IAAI,WAAW;IACpB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,wBAAwB;GACpC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,wBAAwB;GACpC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,WAAW,MAAuB;EAChC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,MAAM,UAAU,KAAK,OAAO,IAAI,IAAI,KAAK;IACzC,KAAK,IAAI,YAAY;IACrB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,yBAAyB;GACrC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,yBAAyB;GACrC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,QAAQ,MAAuB;EAC7B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,KAAM,KAAK,IAAa;IAC9B,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,cAAc;GAC1B,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,cAAc;GAC1B,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,QAAmB;EACjB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,CAAC,KAAK,QACR,IAAI;GACF,KAAK,SAAS;GACd,KAAK,IAAI,YAAY;GACrB,KAAK,IAAI,SAAS,GAAG,GAAG,KAAK,OAAO,OAAO,KAAK,OAAO,MAAM;GAC7D,KAAK,IAAI,YAAY;GACrB,KAAK,IAAI,KAAK;GACd,KAAK,OAAO,uCAAuC;GACnD,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAK,OAAO,eAAe;GAC3B,OAAOD,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,qCAAqC;EACjD,OAAOA,SAAAA,KAAK;CACd;CAEA,SAAS,MAAuB;EAC9B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,KAAM,KAAK,IAAa;IAC9B,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,MAAM,UAAU,OAAO,IAAI,WAAW,KAAK,IAAI,aAAa;KAC5D,MAAM,MAAM,KAAK;KACjB,MAAM,UAAU,IAAI,MAAM;KAC1B,QAAQ,MAAM;KACd,QAAQ,eAAe;MAGrB,IAAI,YAAY,IAAI,cAAc,SAAS,OAAO;KACpD;KACA,IAAI,KAAK;KACT,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,sBAAsB;GAClC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,sBAAsB;GAClC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,aAAa,MAAuB;EAClC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KACpF,KAAK,IAAI,iBAAiB,IAAI,IAAI,IAAI,EAAE;KACxC,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,+BAA+B;GAC3C,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,+BAA+B;GAC3C,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,YAAuB;EACrB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,MAAM,UAAU,IAAI,MAAM;GAC1B,QAAQ,cAAc;GAEtB,QAAQ,MAAO,KAAK,OAA6B,UAAU,YAAY;GACvE,MAAM,OAAO,SAAS,cAAc,GAAG;GACvC,KAAK,OAAO,QAAQ;GACpB,KAAK,WAAW;GAChB,SAAS,KAAK,OAAO,IAAI;GACzB,KAAK,MAAM;GACX,KAAK,OAAO;GACZ,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAK,OACH,mFACF;GACA,OAAOD,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,WAAsB;EACpB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,MAAM,UAAU,IAAI,MAAM;GAC1B,QAAQ,cAAc;GAEtB,QAAQ,MAAO,KAAK,OAA6B,UAAU,WAAW;GACtE,MAAM,OAAO,SAAS,cAAc,GAAG;GACvC,KAAK,OAAO,QAAQ;GACpB,KAAK,WAAW;GAChB,SAAS,KAAK,OAAO,IAAI;GACzB,KAAK,MAAM;GACX,KAAK,OAAO;GACZ,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAK,OACH,gFACF;GACA,OAAOD,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,OAAO,MAAuB;EAC5B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,KAAM,KAAK,IAAa;IAC9B,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,KAAK,IAAI,MAAM,IAAI,EAAE;KACrB,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,gBAAgB;GAC5B,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,gBAAgB;GAC5B,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,YAAY,MAAuB;EACjC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QAAQ;GACf,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAGlD,KAAM,IAAoC,OAAO,KAAK;IACtD,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,0BAA0B;GACtC,OAAOD,SAAAA,KAAK;EACd;EACA,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,aAAa,MAAuB;EAClC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,SAAS,KAAK,YAAY,IAAI;IACpC,KAAK,IAAI,cAAc;IACvB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,2BAA2B;GACvC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,2BAA2B;GACvC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAIA,eAAe,MAAuB;EACpC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QAAQ;GACf,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,KAAK,IAAI,gBAAgB,KAAK;IAC9B,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,6BAA6B;GACzC,OAAOD,SAAAA,KAAK;EACd;EACA,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,eAAe,MAAuB;EACpC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QAAQ;GACf,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,KAAK,IAAI,gBAAgB,KAAK;IAC9B,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,6BAA6B;GACzC,OAAOD,SAAAA,KAAK;EACd;EACA,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,OAAO,MAAuB;EAC5B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QAAQ;GACf,MAAM,SAAS,OAAqB;IAClC,MAAM,OAAO,KAAK,IAAI,IAAI;IAC1B,OAAO,KAAK,IAAI,IAAI;GAGtB;GACA,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,MAAM,KAAK,GAAG;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,eAAe;GAC3B,OAAOD,SAAAA,KAAK;EACd;EACA,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,aAAwB;EACtB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,UAAU;GACnB,KAAK,IAAI,KAAK;GACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAK,OAAO,qBAAqB;GACjC,OAAOD,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,UAAqB;EACnB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,OAAO;GAChB,KAAK,IAAI,KAAK;GACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAK,OAAO,iBAAiB;GAC7B,OAAOD,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,aAAa,MAAuB;EAClC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,KAAK,GAAG;IACtB,MAAM,SAAS,KAAK,YAAY,IAAI;IACpC,KAAK,IAAI,cAAc;IACvB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,0BAA0B;GACtC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,0BAA0B;GACtC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,YAAY,MAAuB;EACjC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KACpF,KAAK,IAAI,WAAW,IAAI,IAAI,IAAI,EAAE;KAClC,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,gCAAgC;GAC5C,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,gCAAgC;GAC5C,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,YAAY,MAAuB;EACjC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC/D,KAAK,IAAI,WAAW,IAAI,IAAI,EAAE;KAC9B,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GAGA,KAAK,OAAO,yBAAyB;GACrC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,yBAAyB;GACrC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,WAAW,MAAuB;EAChC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,KAAK,IAAI,UAAU;KACnB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,UAAU;KACnB,KAAK,IAAI,OAAO;KAChB,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,+BAA+B;GAC3C,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,+BAA+B;GAC3C,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,WAAW,MAAuB;EAChC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,KAAK,IAAI,YAAY,KAAK;IAC1B,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,yBAAyB;GACrC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,yBAAyB;GACrC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,cAAc,MAAuB;EACnC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,KAAK,IAAI,eAAe,KAAK;IAC7B,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,4BAA4B;GACxC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,4BAA4B;GACxC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,eAAe,MAAuB;EACpC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,MAAM,UAAU,KAAK,QAAQ,IAAI,YAAY,KAAK,MAAM,IAAI,QAAQ;IACpE,KAAK,IAAI,YAAY;IACrB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,6BAA6B;GACzC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,6BAA6B;GACzC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,UAAU,MAAuB;EAC/B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,KAAK,IAAI,OAAO,KAAK;IACrB,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,wBAAwB;GACpC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,wBAAwB;GACpC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,WAAW,MAAuB;EAChC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,KAAM,KAAK,IAAa;IAC9B,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,KAAK,IAAI,UAAU,IAAI,EAAE;KACzB,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,oBAAoB;GAChC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,oBAAoB;GAChC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,MAAM,MAAuB;EAC3B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,GAAG;IACvB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KACpF,KAAK,IAAI,KAAK,IAAI,IAAI,IAAI,EAAE;KAC5B,KAAK,IAAI,KAAK;KACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAK,OAAO,yBAAyB;GACrC,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,yBAAyB;GACrC,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;CAEA,QAAQ,MAAuB;EAC7B,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,KAAK,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,KAAK,GAAG,GAAG;IAClD,KAAK,IAAI,OAAQ,KAAK,KAAK,MAAO,KAAK,GAAG;IAC1C,KAAK,IAAI,KAAK;IACd,OAAOC,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAK,OAAO,iBAAiB;GAC7B,OAAOD,SAAAA,KAAK;EACd,QAAQ;GACN,KAAK,OAAO,iBAAiB;GAC7B,OAAOA,SAAAA,KAAK;EACd;EAEF,KAAK,OAAO,8CAA8C;EAC1D,OAAOA,SAAAA,KAAK;CACd;;;;;;;;CASA,YAAY,MAAoB;EAC9B,IAAI,SAAS;EACb,MAAM,MAAM,KAAK,OAAO;EACxB,MAAM,KAAK,KAAK;EAChB,IAAI,QAAQ,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAC/B,SAAS;OACJ,IAAI,QAAQ,GAAG;GACpB,MAAM,OAAO,KAAK;GAClB,MAAM,KAAK,KAAK;GAEhB,MAAM,KADO,KAAK,IACF;GAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAC5D,SAAS,OAAO,GAAG,IAAI,GAAG,IAAI,GAAG;QAEjC,KAAK,OAAO,yCAAuC;EAEvD,OAAO,IAAI,QAAQ,GAAG;GACpB,MAAM,OAAO,KAAK;GAClB,MAAM,KAAK,KAAK;GAChB,MAAM,OAAO,KAAK;GAClB,MAAM,KAAK,KAAK;GAEhB,MAAM,KADO,KAAK,IACF;GAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GACjF,SAAS,QAAQ,GAAG,IAAI,GAAG,IAAI,GAAG,IAAI,GAAG;QAEzC,KAAK,OAAO,yCAAuC;EAEvD,OACE,KAAK,OAAO,yCAAuC;EAErD,OAAO;CACT;;;;;CAMA,OAAO,QAAwC;EAC7C,MAAM,yBAAS,IAAI,IAA+B;EAClD,OAAO,IAAIC,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,MAAM,GAAG,MAAM;EAC/C,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,SAAS,GAAG,QAAQ;EACpD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,OAAO,GAAG,OAAO;EACjD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,WAAW,GAAG,UAAU;EACxD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,UAAU,GAAG,SAAS;EACtD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,UAAU,GAAG,SAAS;EACtD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,WAAW,GAAG,UAAU;EACxD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,OAAO,GAAG,OAAO;EACjD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,UAAU,GAAG,UAAU;EACvD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,eAAe,GAAG,cAAc;EAChE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,WAAW,GAAG,UAAU;EACxD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,eAAe,GAAG,cAAc;EAChE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,iBAAiB,GAAG,gBAAgB;EACpE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,iBAAiB,GAAG,gBAAgB;EACpE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,SAAS,GAAG,SAAS;EACrD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,eAAe,GAAG,cAAc;EAChE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,gBAAgB;EAC/D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,eAAe;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,YAAY;EAC3D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,OAAO,GAAG,OAAO;EACjD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,SAAS,GAAG,SAAS;EACrD,OAAO;CACT;AACF;;;;;;;;;;ACzwCA,SAAgB,qBAAqB,SAElB;CACjB,OAAO,IAAI,eAAe,QAAQ,MAAM;AAC1C"}
+{"version":3,"file":"index.cjs","names":["InterpretedSymbol","#print","Cons"],"sources":["../src/GraphicsPlugin/index.ts","../src/index.ts"],"sourcesContent":["/* eslint-disable unicorn/prefer-add-event-listener,\n                  unicorn/prefer-math-min-max,\n                  sonarjs/no-nested-conditional,\n                  sonarjs/no-duplicate-string */\n\n// These lint rules are disabled file-wide so the ported handlers can preserve\n// the legacy Graphist patterns (Image#onload, clamp ternaries, mode-flag\n// ternaries, repeated diagnostic strings) without per-line escape hatches.\n\nimport type { KeiLispPlugin, LispValue, PluginContext } from 'kei-lisp';\nimport { Cons, InterpretedSymbol } from 'kei-lisp';\n\n/**\n * @class\n * @classdesc Canvas2D drawing plugin for the kei-lisp interpreter. Implements\n *            the `KeiLispPlugin` contract (`name` / `has` / `apply`) and\n *            exposes 45 `g…` Lisp functions that proxy to a 2D rendering\n *            context.\n * @author Keisuke Ikeda\n * @this {GraphicsPlugin}\n */\nexport class GraphicsPlugin extends Object implements KeiLispPlugin {\n  /**\n   * Dispatch map from a Lisp function name (InterpretedSymbol) to the name of\n   * the GraphicsPlugin method that implements it.\n   */\n  static readonly buildInFunctions: Map<InterpretedSymbol, string> = GraphicsPlugin.setup();\n\n  /**\n   * Builds the dispatch table.\n   * @return the dispatch table\n   */\n  static setup(): Map<InterpretedSymbol, string> {\n    const aTable = new Map<InterpretedSymbol, string>();\n    aTable.set(InterpretedSymbol.of('galpha'), 'gAlpha');\n    aTable.set(InterpretedSymbol.of('garc'), 'gArc');\n    aTable.set(InterpretedSymbol.of('garc-to'), 'gArcTo');\n    aTable.set(InterpretedSymbol.of('gbezcurve-to'), 'gBezCurveTo');\n    aTable.set(InterpretedSymbol.of('gclear'), 'gClear');\n    aTable.set(InterpretedSymbol.of('gclose'), 'gClose');\n    aTable.set(InterpretedSymbol.of('gcolor'), 'gColor');\n    aTable.set(InterpretedSymbol.of('gfill'), 'gFill');\n    aTable.set(InterpretedSymbol.of('gfill-color'), 'gFillColor');\n    aTable.set(InterpretedSymbol.of('gfill-rect'), 'gFillRect');\n    aTable.set(InterpretedSymbol.of('gfill-text'), 'gFillText');\n    aTable.set(InterpretedSymbol.of('gfill-tri'), 'gFillTri');\n    aTable.set(InterpretedSymbol.of('gfinish-path'), 'gFinishPath');\n    aTable.set(InterpretedSymbol.of('gimage'), 'gImage');\n    aTable.set(InterpretedSymbol.of('gmove-to'), 'gMoveTo');\n    aTable.set(InterpretedSymbol.of('gline-to'), 'gLineTo');\n    aTable.set(InterpretedSymbol.of('gline-cap'), 'gLineCap');\n    aTable.set(InterpretedSymbol.of('gline-join'), 'gLineJoin');\n    aTable.set(InterpretedSymbol.of('gline-width'), 'gLineWidth');\n    aTable.set(InterpretedSymbol.of('gopen'), 'gOpen');\n    aTable.set(InterpretedSymbol.of('gpattern'), 'gPattern');\n    aTable.set(InterpretedSymbol.of('gquadcurve-to'), 'gQuadCurveTo');\n    aTable.set(InterpretedSymbol.of('gsave-jpeg'), 'gSaveJpeg');\n    aTable.set(InterpretedSymbol.of('gsave-png'), 'gSavePng');\n    aTable.set(InterpretedSymbol.of('gscale'), 'gScale');\n    aTable.set(InterpretedSymbol.of('gshadow-blur'), 'gShadowBlur');\n    aTable.set(InterpretedSymbol.of('gshadow-color'), 'gShadowColor');\n    aTable.set(InterpretedSymbol.of('gshadow-offsetx'), 'gShadowOffsetX');\n    aTable.set(InterpretedSymbol.of('gshadow-offsety'), 'gShadowOffsetY');\n    aTable.set(InterpretedSymbol.of('gsleep'), 'gSleep');\n    aTable.set(InterpretedSymbol.of('gstart-path'), 'gStartPath');\n    aTable.set(InterpretedSymbol.of('gstroke'), 'gStroke');\n    aTable.set(InterpretedSymbol.of('gstroke-color'), 'gStrokeColor');\n    aTable.set(InterpretedSymbol.of('gstroke-rect'), 'gStrokeRect');\n    aTable.set(InterpretedSymbol.of('gstroke-text'), 'gStrokeText');\n    aTable.set(InterpretedSymbol.of('gstroke-tri'), 'gStrokeTri');\n    aTable.set(InterpretedSymbol.of('gtext-align'), 'gTextAlign');\n    aTable.set(InterpretedSymbol.of('gtext-dire'), 'gTextDirection');\n    aTable.set(InterpretedSymbol.of('gtext-font'), 'gTextFont');\n    aTable.set(InterpretedSymbol.of('gtext-line'), 'gTextBaseline');\n    aTable.set(InterpretedSymbol.of('gtranslate'), 'gTranslate');\n    aTable.set(InterpretedSymbol.of('grect'), 'gRect');\n    aTable.set(InterpretedSymbol.of('grotate'), 'gRotate');\n    aTable.set(InterpretedSymbol.of('gsave'), 'gSave');\n    aTable.set(InterpretedSymbol.of('grestore'), 'gRestore');\n    return aTable;\n  }\n\n  /**\n   * Plugin identifier, used for diagnostics.\n   */\n  readonly name: string = 'graphics';\n\n  canvas: HTMLCanvasElement | OffscreenCanvas;\n  ctx: CanvasRenderingContext2D | OffscreenCanvasRenderingContext2D | null;\n  isOpen: boolean;\n\n  /**\n   * Constructor.\n   * @constructor\n   * @param canvas - the canvas to draw to\n   */\n  constructor(canvas: HTMLCanvasElement | OffscreenCanvas) {\n    super();\n    this.canvas = canvas;\n    this.ctx = canvas.getContext('2d');\n    this.isOpen = false;\n  }\n\n  /**\n   * Writes a diagnostic line directly to `process.stderr`, matching the\n   * convention used by kei-lisp itself (`Applier.format` writes to\n   * `process.stdout`). In a Node runtime this hits the real stderr; in a\n   * browser kei-lisp host (e.g. kei-lisp-web) the host typically swaps\n   * `process.stderr.write` for a sink that routes to the REPL output panel,\n   * so the same call reaches the user via the host's normal output channel.\n   * @param line - the line to write\n   */\n  #print(line: string): void {\n    process.stderr.write(line + '\\n');\n  }\n\n  /**\n   * Returns true if this plugin handles the given symbol.\n   * @param aSymbol - the call symbol\n   * @return true if `apply` should be called\n   */\n  has(aSymbol: InterpretedSymbol): boolean {\n    return GraphicsPlugin.buildInFunctions.has(aSymbol);\n  }\n\n  /**\n   * Dispatches the given symbol to the matching `g…` method.\n   * @param aSymbol - the call symbol\n   * @param arguments_ - the evaluated argument list\n   * @param _context - the interpreter context (unused by this plugin)\n   * @return the method's result, or `Cons.nil` if dispatch fails\n   */\n  apply(aSymbol: InterpretedSymbol, arguments_: Cons, _context: PluginContext): LispValue {\n    return this.selectProcedure(aSymbol, arguments_);\n  }\n\n  /**\n   * Resolves the procedure name and invokes the matching method.\n   * @param procedure - the Lisp symbol\n   * @param arguments_ - the evaluated argument list\n   * @return the method's result, or `Cons.nil` if not registered\n   */\n  selectProcedure(procedure: InterpretedSymbol, arguments_: Cons): LispValue {\n    if (GraphicsPlugin.buildInFunctions.has(procedure)) {\n      return this.buildInFunction(procedure, arguments_);\n    }\n    this.#print(`I could find no procedure description for ${String(procedure)}`);\n    return Cons.nil;\n  }\n\n  /**\n   * Looks up and invokes the JS method that implements the given Lisp symbol.\n   * Throws `TypeError` when the dispatch table points to a method that does\n   * not exist on the instance — this matches the legacy behavior, where the\n   * Ramda `R.invoker(1, methodName)(args, this)` call would surface the same\n   * error by attempting to call `undefined`.\n   * @param procedure - the Lisp symbol\n   * @param arguments_ - the evaluated argument list\n   * @return the method's result\n   */\n  buildInFunction(procedure: InterpretedSymbol, arguments_: Cons): LispValue {\n    const methodName = GraphicsPlugin.buildInFunctions.get(procedure) as string;\n    const target = this as unknown as Record<string, unknown>;\n    const method = target[methodName];\n    if (typeof method !== 'function') {\n      throw new TypeError(`${this.constructor.name} does not have a method named \"${methodName}\"`);\n    }\n    return (method as (arguments__: Cons) => LispValue).call(this, arguments_);\n  }\n\n  /**\n   * Checks whether the canvas exposes a usable 2D context, and narrows\n   * `this.ctx` to non-null for the caller when it returns true.\n   * @return type predicate — true when ctx is non-null\n   */\n  checkSupport(): this is GraphicsPlugin & {\n    ctx: CanvasRenderingContext2D | OffscreenCanvasRenderingContext2D;\n  } {\n    if (this.ctx === null) {\n      this.#print('Unable to initialize canvas. The browser or machine may not support it.');\n      return false;\n    }\n    return true;\n  }\n\n  gAlpha(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n          const aNumber = arguments_.car <= 0 ? 0 : arguments_.car >= 1 ? 1 : arguments_.car;\n          this.ctx.globalAlpha = aNumber;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set alpha.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set alpha.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gArc(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 6) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          const cdr5 = cdr4.cdr as Cons;\n          const a5 = cdr5.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4) &&\n            Cons.isNumber(a5)\n          ) {\n            const isAFlag = a5 >= 0;\n            this.ctx.arc(a0, a1, a2, (Math.PI / 180) * a3, (Math.PI / 180) * a4, isAFlag);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw arc.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw arc.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gArcTo(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 5) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4)\n          ) {\n            this.ctx.arcTo(a0, a1, a2, a3, a4);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw arc to.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw arc to.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gBezCurveTo(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 6) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          const cdr5 = cdr4.cdr as Cons;\n          const a5 = cdr5.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4) &&\n            Cons.isNumber(a5)\n          ) {\n            this.ctx.bezierCurveTo(a0, a1, a2, a3, a4, a5);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw bezier curve.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw bezier curve.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gClear(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.fillStyle = '#ffffff';\n        this.ctx.fillRect(0, 0, this.canvas.width, this.canvas.height);\n        this.ctx.fillStyle = '#000000';\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print('Can not clear.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gClose(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.clearRect(0, 0, this.canvas.width, this.canvas.height);\n        this.isOpen = false;\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print('Can not close.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas has already been closed.');\n    return Cons.nil;\n  }\n\n  gColor(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() >= 1) {\n          const aColor = this.selectColor(arguments_);\n          this.ctx.fillStyle = aColor;\n          this.ctx.strokeStyle = aColor;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set color.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set color.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFill(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.fill();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print('Can not fill.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFillColor(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() >= 1) {\n          const aColor = this.selectColor(arguments_);\n          this.ctx.fillStyle = aColor;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set fill color.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set fill color.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFillRect(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 4) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n            this.ctx.fillRect(a0, a1, a2, a3);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw fill rectangle.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw fill rectangle.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFillText(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 3) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          if (Cons.isString(a0) && Cons.isNumber(a1) && Cons.isNumber(a2)) {\n            this.ctx.fillText(a0, a1, a2);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw fill text.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw fill text.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFillTri(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 6) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          const cdr5 = cdr4.cdr as Cons;\n          const a5 = cdr5.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4) &&\n            Cons.isNumber(a5)\n          ) {\n            this.ctx.beginPath();\n            this.ctx.moveTo(a0, a1);\n            this.ctx.lineTo(a2, a3);\n            this.ctx.lineTo(a4, a5);\n            this.ctx.fill();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw fill triangle.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw fill triangle.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gFinishPath(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.closePath();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print('Can not finish path.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gImage(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        const length_ = arguments_.length();\n        if (length_ === 3) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          if (Cons.isString(a0) && Cons.isNumber(a1) && Cons.isNumber(a2)) {\n            const context = this.ctx;\n            const anImage = new Image();\n            anImage.src = a0;\n            anImage.onload = () => {\n              context.drawImage(anImage, a1, a2);\n            };\n            return InterpretedSymbol.of('t');\n          }\n        } else if (length_ === 5) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          if (\n            Cons.isString(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4)\n          ) {\n            const context = this.ctx;\n            const anImage = new Image();\n            anImage.src = a0;\n            anImage.onload = () => {\n              context.drawImage(anImage, a1, a2, a3, a4);\n            };\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw Image.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw Image.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gLineTo(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 2) {\n          const a0 = arguments_.car;\n          const a1 = (arguments_.cdr as Cons).car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1)) {\n            this.ctx.lineTo(a0, a1);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw line to');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw line to');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gLineCap(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n          const aString = arguments_.car === 0 ? 'butt' : arguments_.car > 0 ? 'round' : 'square';\n          this.ctx.lineCap = aString;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set line cap.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set line cap.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gLineJoin(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n          const aString = arguments_.car === 0 ? 'miter' : arguments_.car > 0 ? 'round' : 'bevel';\n          this.ctx.lineJoin = aString;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set line join.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set line join.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gLineWidth(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n          const aNumber = arguments_.car <= 0 ? 1 : arguments_.car;\n          this.ctx.lineWidth = aNumber;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set line width.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set line width.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gMoveTo(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 2) {\n          const a0 = arguments_.car;\n          const a1 = (arguments_.cdr as Cons).car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1)) {\n            this.ctx.moveTo(a0, a1);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not move');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not move');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gOpen(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (!this.isOpen) {\n      try {\n        this.isOpen = true;\n        this.ctx.fillStyle = '#ffffff';\n        this.ctx.fillRect(0, 0, this.canvas.width, this.canvas.height);\n        this.ctx.fillStyle = '#000000';\n        this.#print(`canvas size, width : ${this.canvas.width} height : ${this.canvas.height}`);\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print('Can not open.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas has already been opened.');\n    return Cons.nil;\n  }\n\n  gPattern(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 2) {\n          const a0 = arguments_.car;\n          const a1 = (arguments_.cdr as Cons).car;\n          if (Cons.isString(a0) && Cons.isNumber(a1)) {\n            const aString = a1 === 0 ? 'repeat' : a1 > 0 ? 'repeat-x' : 'repeat-y';\n            const context = this.ctx;\n            const anImage = new Image();\n            anImage.src = a0;\n            anImage.onload = () => {\n              // Legacy bug: createPattern() may return null; assigning null to fillStyle\n              // is a no-op in practice (browsers ignore or coerce it).\n              context.fillStyle = context.createPattern(anImage, aString) as CanvasPattern;\n            };\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not set pattern.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set pattern.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gQuadCurveTo(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 4) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n            this.ctx.quadraticCurveTo(a0, a1, a2, a3);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw quadratic curve.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw quadratic curve.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gSaveJpeg(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        const anImage = new Image();\n        anImage.crossOrigin = 'Anonymous';\n        // NOTE: toDataURL is not available on OffscreenCanvas; callers must use HTMLCanvasElement.\n        anImage.src = (this.canvas as HTMLCanvasElement).toDataURL('image/jpeg');\n        const link = document.createElement('a');\n        link.href = anImage.src;\n        link.download = 'canvas';\n        document.body.append(link);\n        link.click();\n        link.remove();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print(\n          \"Can not save jpeg.  If you are using an image in the canvas, you can't save jpeg.\",\n        );\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gSavePng(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        const anImage = new Image();\n        anImage.crossOrigin = 'Anonymous';\n        // NOTE: toDataURL is not available on OffscreenCanvas; callers must use HTMLCanvasElement.\n        anImage.src = (this.canvas as HTMLCanvasElement).toDataURL('image/png');\n        const link = document.createElement('a');\n        link.href = anImage.src;\n        link.download = 'canvas';\n        document.body.append(link);\n        link.click();\n        link.remove();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print(\n          \"Can not save png. If you are using an image in the canvas, you can't save png.\",\n        );\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gScale(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 2) {\n          const a0 = arguments_.car;\n          const a1 = (arguments_.cdr as Cons).car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1)) {\n            this.ctx.scale(a0, a1);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not scale.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not scale.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gShadowBlur(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n        this.ctx.shadowBlur = arguments_.car;\n        return InterpretedSymbol.of('t');\n      }\n      this.#print('Can not set shadow blur.');\n      return Cons.nil;\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gShadowColor(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1) {\n          const aColor = this.selectColor(arguments_);\n          this.ctx.shadowColor = aColor;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set shadow color.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set shadow color.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  // NOTE: gShadowOffsetX, gShadowOffsetY, and gShadowBlur intentionally omit try/catch.\n  // The original Graphist.js had the same structure for all three shadow-property setters.\n  gShadowOffsetX(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n        this.ctx.shadowOffsetX = arguments_.car;\n        return InterpretedSymbol.of('t');\n      }\n      this.#print('Can not set shadow offsetX.');\n      return Cons.nil;\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gShadowOffsetY(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n        this.ctx.shadowOffsetY = arguments_.car;\n        return InterpretedSymbol.of('t');\n      }\n      this.#print('Can not set shadow offsetY.');\n      return Cons.nil;\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gSleep(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      const sleep = (ms: number): void => {\n        const time = Date.now() + ms;\n        while (Date.now() < time) {\n          // busy wait\n        }\n      };\n      if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n        sleep(arguments_.car);\n        return InterpretedSymbol.of('t');\n      }\n      this.#print('Can not sleep');\n      return Cons.nil;\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStartPath(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.beginPath();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print('Can not start path.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStroke(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.stroke();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print('Can not stroke.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStrokeColor(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() >= 1) {\n          const aColor = this.selectColor(arguments_);\n          this.ctx.strokeStyle = aColor;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set stroke color');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set stroke color');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStrokeRect(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 4) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n            this.ctx.strokeRect(a0, a1, a2, a3);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw stroke rectangle.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw stroke rectangle.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStrokeText(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 3) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          if (Cons.isString(a0) && Cons.isNumber(a1) && Cons.isNumber(a2)) {\n            this.ctx.strokeText(a0, a1, a2);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw stroke text.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw stroke text.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gStrokeTri(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 6) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          const cdr4 = cdr3.cdr as Cons;\n          const a4 = cdr4.car;\n          const cdr5 = cdr4.cdr as Cons;\n          const a5 = cdr5.car;\n          if (\n            Cons.isNumber(a0) &&\n            Cons.isNumber(a1) &&\n            Cons.isNumber(a2) &&\n            Cons.isNumber(a3) &&\n            Cons.isNumber(a4) &&\n            Cons.isNumber(a5)\n          ) {\n            this.ctx.beginPath();\n            this.ctx.moveTo(a0, a1);\n            this.ctx.lineTo(a2, a3);\n            this.ctx.lineTo(a4, a5);\n            this.ctx.closePath();\n            this.ctx.stroke();\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw stroke triangle.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw stroke triangle.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTextAlign(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1 && Cons.isString(arguments_.car)) {\n          this.ctx.textAlign = arguments_.car as CanvasTextAlign;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set text align.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set text align.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTextBaseline(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1 && Cons.isString(arguments_.car)) {\n          this.ctx.textBaseline = arguments_.car as CanvasTextBaseline;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set text baseline.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set text baseline.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTextDirection(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n          const aString = arguments_.car === 0 ? 'inherit' : arguments_.car > 0 ? 'rtl' : 'ltr';\n          this.ctx.direction = aString;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set text direction.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set text direction.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTextFont(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1 && Cons.isString(arguments_.car)) {\n          this.ctx.font = arguments_.car;\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not set text font.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not set text font.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gTranslate(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 2) {\n          const a0 = arguments_.car;\n          const a1 = (arguments_.cdr as Cons).car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1)) {\n            this.ctx.translate(a0, a1);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not translate.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not translate.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gRect(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 4) {\n          const a0 = arguments_.car;\n          const cdr1 = arguments_.cdr as Cons;\n          const a1 = cdr1.car;\n          const cdr2 = cdr1.cdr as Cons;\n          const a2 = cdr2.car;\n          const cdr3 = cdr2.cdr as Cons;\n          const a3 = cdr3.car;\n          if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n            this.ctx.rect(a0, a1, a2, a3);\n            return InterpretedSymbol.of('t');\n          }\n        }\n        this.#print('Can not draw rectangle.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not draw rectangle.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  gRotate(arguments_: Cons): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        if (arguments_.length() === 1 && Cons.isNumber(arguments_.car)) {\n          this.ctx.rotate((Math.PI / 180) * arguments_.car);\n          return InterpretedSymbol.of('t');\n        }\n        this.#print('Can not rotate.');\n        return Cons.nil;\n      } catch {\n        this.#print('Can not rotate.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  /**\n   * Pushes the current drawing state (styles, transform, clip) onto the\n   * context's state stack. Pairs with `gRestore` to let Lisp callers manage\n   * state explicitly. Replaces the legacy per-method `ctx.save()` calls, which\n   * pushed state on every draw with no matching `restore()` and grew the stack\n   * unbounded.\n   * @return `t` on success, `Cons.nil` otherwise\n   */\n  gSave(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.save();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print('Can not save.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  /**\n   * Pops the most recently saved drawing state off the context's state stack.\n   * Pairs with `gSave`. Popping an empty stack is a no-op per the Canvas spec.\n   * @return `t` on success, `Cons.nil` otherwise\n   */\n  gRestore(): LispValue {\n    if (!this.checkSupport()) return Cons.nil;\n    if (this.isOpen) {\n      try {\n        this.ctx.restore();\n        return InterpretedSymbol.of('t');\n      } catch {\n        this.#print('Can not restore.');\n        return Cons.nil;\n      }\n    }\n    this.#print('The canvas is closed and cannot be executed.');\n    return Cons.nil;\n  }\n\n  /**\n   * Parses a color spec from the head of the argument Cons. Accepts\n   * (1 string), (3 numbers — rgb), or (4 numbers — rgba); falls back to\n   * `'black'` on anything else (legacy behavior).\n   * @param arguments_ - the argument Cons to parse\n   * @return CSS color string\n   */\n  selectColor(arguments_: Cons): string {\n    let aColor = 'black';\n    const length_ = arguments_.length();\n    const a0 = arguments_.car;\n    if (length_ === 1 && Cons.isString(a0)) {\n      aColor = a0;\n    } else if (length_ === 3) {\n      const cdr1 = arguments_.cdr as Cons;\n      const a1 = cdr1.car;\n      const cdr2 = cdr1.cdr as Cons;\n      const a2 = cdr2.car;\n      if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2)) {\n        aColor = `rgb(${a0}, ${a1}, ${a2})`;\n      } else {\n        this.#print('Can not set color. set color \"black\".');\n      }\n    } else if (length_ === 4) {\n      const cdr1 = arguments_.cdr as Cons;\n      const a1 = cdr1.car;\n      const cdr2 = cdr1.cdr as Cons;\n      const a2 = cdr2.car;\n      const cdr3 = cdr2.cdr as Cons;\n      const a3 = cdr3.car;\n      if (Cons.isNumber(a0) && Cons.isNumber(a1) && Cons.isNumber(a2) && Cons.isNumber(a3)) {\n        aColor = `rgba(${a0}, ${a1}, ${a2}, ${a3})`;\n      } else {\n        this.#print('Can not set color. set color \"black\".');\n      }\n    } else {\n      this.#print('Can not set color. set color \"black\".');\n    }\n    return aColor;\n  }\n}\n","import { GraphicsPlugin } from './GraphicsPlugin/index.js';\n\n/**\n * Creates a Canvas2D drawing plugin bound to the given canvas. Register it on\n * a `LispInterpreter` via `interpreter.use(plugin)` to make the `g…` drawing\n * primitives callable from Lisp source.\n * @param options - the canvas to draw to\n * @return a KeiLispPlugin that handles the `g…` symbols\n */\nexport function createGraphicsPlugin(options: {\n  canvas: HTMLCanvasElement | OffscreenCanvas;\n}): GraphicsPlugin {\n  return new GraphicsPlugin(options.canvas);\n}\n\nexport { GraphicsPlugin } from './GraphicsPlugin/index.js';\n"],"mappings":";;;;;;;;;;;;AAqBA,IAAa,iBAAb,MAAa,uBAAuB,OAAgC;;;;;CAKlE,OAAgB,mBAAmD,eAAe,MAAM;;;;;CAMxF,OAAO,QAAwC;EAC7C,MAAM,yBAAS,IAAI,IAA+B;EAClD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,MAAM,GAAG,MAAM;EAC/C,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,SAAS,GAAG,QAAQ;EACpD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,OAAO,GAAG,OAAO;EACjD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,WAAW,GAAG,UAAU;EACxD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,UAAU,GAAG,SAAS;EACtD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,UAAU,GAAG,SAAS;EACtD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,WAAW,GAAG,UAAU;EACxD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,OAAO,GAAG,OAAO;EACjD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,UAAU,GAAG,UAAU;EACvD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,eAAe,GAAG,cAAc;EAChE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,WAAW,GAAG,UAAU;EACxD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,eAAe,GAAG,cAAc;EAChE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,iBAAiB,GAAG,gBAAgB;EACpE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,iBAAiB,GAAG,gBAAgB;EACpE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,QAAQ,GAAG,QAAQ;EACnD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,SAAS,GAAG,SAAS;EACrD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,eAAe,GAAG,cAAc;EAChE,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,cAAc,GAAG,aAAa;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,aAAa,GAAG,YAAY;EAC5D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,gBAAgB;EAC/D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,WAAW;EAC1D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,eAAe;EAC9D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,YAAY,GAAG,YAAY;EAC3D,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,OAAO,GAAG,OAAO;EACjD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,SAAS,GAAG,SAAS;EACrD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,OAAO,GAAG,OAAO;EACjD,OAAO,IAAIA,SAAAA,kBAAkB,GAAG,UAAU,GAAG,UAAU;EACvD,OAAO;CACT;;;;CAKA,OAAwB;CAExB;CACA;CACA;;;;;;CAOA,YAAY,QAA6C;EACvD,MAAM;EACN,KAAK,SAAS;EACd,KAAK,MAAM,OAAO,WAAW,IAAI;EACjC,KAAK,SAAS;CAChB;;;;;;;;;;CAWA,OAAO,MAAoB;EACzB,QAAQ,OAAO,MAAM,OAAO,IAAI;CAClC;;;;;;CAOA,IAAI,SAAqC;EACvC,OAAO,eAAe,iBAAiB,IAAI,OAAO;CACpD;;;;;;;;CASA,MAAM,SAA4B,YAAkB,UAAoC;EACtF,OAAO,KAAK,gBAAgB,SAAS,UAAU;CACjD;;;;;;;CAQA,gBAAgB,WAA8B,YAA6B;EACzE,IAAI,eAAe,iBAAiB,IAAI,SAAS,GAC/C,OAAO,KAAK,gBAAgB,WAAW,UAAU;EAEnD,KAAKC,OAAO,6CAA6C,OAAO,SAAS,GAAG;EAC5E,OAAOC,SAAAA,KAAK;CACd;;;;;;;;;;;CAYA,gBAAgB,WAA8B,YAA6B;EACzE,MAAM,aAAa,eAAe,iBAAiB,IAAI,SAAS;EAEhE,MAAM,SAAS,KAAO;EACtB,IAAI,OAAO,WAAW,YACpB,MAAM,IAAI,UAAU,GAAG,KAAK,YAAY,KAAK,iCAAiC,WAAW,EAAE;EAE7F,OAAQ,OAA4C,KAAK,MAAM,UAAU;CAC3E;;;;;;CAOA,eAEE;EACA,IAAI,KAAK,QAAQ,MAAM;GACrB,KAAKD,OAAO,yEAAyE;GACrF,OAAO;EACT;EACA,OAAO;CACT;CAEA,OAAO,YAA6B;EAClC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOC,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,MAAM,UAAU,WAAW,OAAO,IAAI,IAAI,WAAW,OAAO,IAAI,IAAI,WAAW;IAC/E,KAAK,IAAI,cAAc;IACvB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,oBAAoB;GAChC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,oBAAoB;GAChC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,KAAK,YAA6B;EAChC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,MAAM,UAAU,MAAM;KACtB,KAAK,IAAI,IAAI,IAAI,IAAI,IAAK,KAAK,KAAK,MAAO,IAAK,KAAK,KAAK,MAAO,IAAI,OAAO;KAC5E,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,mBAAmB;GAC/B,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,mBAAmB;GAC/B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,OAAO,YAA6B;EAClC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,KAAK,IAAI,MAAM,IAAI,IAAI,IAAI,IAAI,EAAE;KACjC,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,sBAAsB;GAClC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,sBAAsB;GAClC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,YAAY,YAA6B;EACvC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,KAAK,IAAI,cAAc,IAAI,IAAI,IAAI,IAAI,IAAI,EAAE;KAC7C,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,4BAA4B;GACxC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,4BAA4B;GACxC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,SAAoB;EAClB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,YAAY;GACrB,KAAK,IAAI,SAAS,GAAG,GAAG,KAAK,OAAO,OAAO,KAAK,OAAO,MAAM;GAC7D,KAAK,IAAI,YAAY;GACrB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OAAO,gBAAgB;GAC5B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,SAAoB;EAClB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,UAAU,GAAG,GAAG,KAAK,OAAO,OAAO,KAAK,OAAO,MAAM;GAC9D,KAAK,SAAS;GACd,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OAAO,gBAAgB;GAC5B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,qCAAqC;EACjD,OAAOC,SAAAA,KAAK;CACd;CAEA,OAAO,YAA6B;EAClC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,KAAK,GAAG;IAC5B,MAAM,SAAS,KAAK,YAAY,UAAU;IAC1C,KAAK,IAAI,YAAY;IACrB,KAAK,IAAI,cAAc;IACvB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,oBAAoB;GAChC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,oBAAoB;GAChC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,QAAmB;EACjB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,KAAK;GACd,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OAAO,eAAe;GAC3B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,WAAW,YAA6B;EACtC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,KAAK,GAAG;IAC5B,MAAM,SAAS,KAAK,YAAY,UAAU;IAC1C,KAAK,IAAI,YAAY;IACrB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,UAAU,YAA6B;EACrC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KACpF,KAAK,IAAI,SAAS,IAAI,IAAI,IAAI,EAAE;KAChC,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,8BAA8B;GAC1C,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,8BAA8B;GAC1C,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,UAAU,YAA6B;EACrC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC/D,KAAK,IAAI,SAAS,IAAI,IAAI,EAAE;KAC5B,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,SAAS,YAA6B;EACpC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,KAAK,IAAI,UAAU;KACnB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,KAAK;KACd,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,6BAA6B;GACzC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,6BAA6B;GACzC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,cAAyB;EACvB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,UAAU;GACnB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OAAO,sBAAsB;GAClC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,OAAO,YAA6B;EAClC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,MAAM,UAAU,WAAW,OAAO;GAClC,IAAI,YAAY,GAAG;IACjB,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC/D,MAAM,UAAU,KAAK;KACrB,MAAM,UAAU,IAAI,MAAM;KAC1B,QAAQ,MAAM;KACd,QAAQ,eAAe;MACrB,QAAQ,UAAU,SAAS,IAAI,EAAE;KACnC;KACA,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF,OAAO,IAAI,YAAY,GAAG;IACxB,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEE,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,MAAM,UAAU,KAAK;KACrB,MAAM,UAAU,IAAI,MAAM;KAC1B,QAAQ,MAAM;KACd,QAAQ,eAAe;MACrB,QAAQ,UAAU,SAAS,IAAI,IAAI,IAAI,EAAE;KAC3C;KACA,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,qBAAqB;GACjC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,qBAAqB;GACjC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,QAAQ,YAA6B;EACnC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,KAAM,WAAW,IAAa;IACpC,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,sBAAsB;GAClC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,sBAAsB;GAClC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,SAAS,YAA6B;EACpC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,MAAM,UAAU,WAAW,QAAQ,IAAI,SAAS,WAAW,MAAM,IAAI,UAAU;IAC/E,KAAK,IAAI,UAAU;IACnB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,uBAAuB;GACnC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,uBAAuB;GACnC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,UAAU,YAA6B;EACrC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,MAAM,UAAU,WAAW,QAAQ,IAAI,UAAU,WAAW,MAAM,IAAI,UAAU;IAChF,KAAK,IAAI,WAAW;IACpB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,wBAAwB;GACpC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,wBAAwB;GACpC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,WAAW,YAA6B;EACtC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,MAAM,UAAU,WAAW,OAAO,IAAI,IAAI,WAAW;IACrD,KAAK,IAAI,YAAY;IACrB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,QAAQ,YAA6B;EACnC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,KAAM,WAAW,IAAa;IACpC,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,cAAc;GAC1B,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,cAAc;GAC1B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,QAAmB;EACjB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,CAAC,KAAK,QACR,IAAI;GACF,KAAK,SAAS;GACd,KAAK,IAAI,YAAY;GACrB,KAAK,IAAI,SAAS,GAAG,GAAG,KAAK,OAAO,OAAO,KAAK,OAAO,MAAM;GAC7D,KAAK,IAAI,YAAY;GACrB,KAAKD,OAAO,wBAAwB,KAAK,OAAO,MAAM,YAAY,KAAK,OAAO,QAAQ;GACtF,OAAOD,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OAAO,eAAe;GAC3B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,qCAAqC;EACjD,OAAOC,SAAAA,KAAK;CACd;CAEA,SAAS,YAA6B;EACpC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,KAAM,WAAW,IAAa;IACpC,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,MAAM,UAAU,OAAO,IAAI,WAAW,KAAK,IAAI,aAAa;KAC5D,MAAM,UAAU,KAAK;KACrB,MAAM,UAAU,IAAI,MAAM;KAC1B,QAAQ,MAAM;KACd,QAAQ,eAAe;MAGrB,QAAQ,YAAY,QAAQ,cAAc,SAAS,OAAO;KAC5D;KACA,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,sBAAsB;GAClC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,sBAAsB;GAClC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,aAAa,YAA6B;EACxC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KACpF,KAAK,IAAI,iBAAiB,IAAI,IAAI,IAAI,EAAE;KACxC,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,+BAA+B;GAC3C,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,+BAA+B;GAC3C,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,YAAuB;EACrB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,MAAM,UAAU,IAAI,MAAM;GAC1B,QAAQ,cAAc;GAEtB,QAAQ,MAAO,KAAK,OAA6B,UAAU,YAAY;GACvE,MAAM,OAAO,SAAS,cAAc,GAAG;GACvC,KAAK,OAAO,QAAQ;GACpB,KAAK,WAAW;GAChB,SAAS,KAAK,OAAO,IAAI;GACzB,KAAK,MAAM;GACX,KAAK,OAAO;GACZ,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OACH,mFACF;GACA,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,WAAsB;EACpB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,MAAM,UAAU,IAAI,MAAM;GAC1B,QAAQ,cAAc;GAEtB,QAAQ,MAAO,KAAK,OAA6B,UAAU,WAAW;GACtE,MAAM,OAAO,SAAS,cAAc,GAAG;GACvC,KAAK,OAAO,QAAQ;GACpB,KAAK,WAAW;GAChB,SAAS,KAAK,OAAO,IAAI;GACzB,KAAK,MAAM;GACX,KAAK,OAAO;GACZ,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OACH,gFACF;GACA,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,OAAO,YAA6B;EAClC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,KAAM,WAAW,IAAa;IACpC,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,KAAK,IAAI,MAAM,IAAI,EAAE;KACrB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,gBAAgB;GAC5B,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,gBAAgB;GAC5B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,YAAY,YAA6B;EACvC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QAAQ;GACf,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,KAAK,IAAI,aAAa,WAAW;IACjC,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,0BAA0B;GACtC,OAAOC,SAAAA,KAAK;EACd;EACA,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,aAAa,YAA6B;EACxC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,SAAS,KAAK,YAAY,UAAU;IAC1C,KAAK,IAAI,cAAc;IACvB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,2BAA2B;GACvC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,2BAA2B;GACvC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAIA,eAAe,YAA6B;EAC1C,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QAAQ;GACf,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,KAAK,IAAI,gBAAgB,WAAW;IACpC,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,6BAA6B;GACzC,OAAOC,SAAAA,KAAK;EACd;EACA,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,eAAe,YAA6B;EAC1C,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QAAQ;GACf,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,KAAK,IAAI,gBAAgB,WAAW;IACpC,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,6BAA6B;GACzC,OAAOC,SAAAA,KAAK;EACd;EACA,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,OAAO,YAA6B;EAClC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QAAQ;GACf,MAAM,SAAS,OAAqB;IAClC,MAAM,OAAO,KAAK,IAAI,IAAI;IAC1B,OAAO,KAAK,IAAI,IAAI;GAGtB;GACA,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,MAAM,WAAW,GAAG;IACpB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,eAAe;GAC3B,OAAOC,SAAAA,KAAK;EACd;EACA,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,aAAwB;EACtB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,UAAU;GACnB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OAAO,qBAAqB;GACjC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,UAAqB;EACnB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,OAAO;GAChB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OAAO,iBAAiB;GAC7B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,aAAa,YAA6B;EACxC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,KAAK,GAAG;IAC5B,MAAM,SAAS,KAAK,YAAY,UAAU;IAC1C,KAAK,IAAI,cAAc;IACvB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,0BAA0B;GACtC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,0BAA0B;GACtC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,YAAY,YAA6B;EACvC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KACpF,KAAK,IAAI,WAAW,IAAI,IAAI,IAAI,EAAE;KAClC,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,gCAAgC;GAC5C,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,gCAAgC;GAC5C,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,YAAY,YAA6B;EACvC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC/D,KAAK,IAAI,WAAW,IAAI,IAAI,EAAE;KAC9B,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,2BAA2B;GACvC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,2BAA2B;GACvC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,WAAW,YAA6B;EACtC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IACEA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,KAChBA,SAAAA,KAAK,SAAS,EAAE,GAChB;KACA,KAAK,IAAI,UAAU;KACnB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,OAAO,IAAI,EAAE;KACtB,KAAK,IAAI,UAAU;KACnB,KAAK,IAAI,OAAO;KAChB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,+BAA+B;GAC3C,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,+BAA+B;GAC3C,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,WAAW,YAA6B;EACtC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,KAAK,IAAI,YAAY,WAAW;IAChC,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,cAAc,YAA6B;EACzC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,KAAK,IAAI,eAAe,WAAW;IACnC,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,4BAA4B;GACxC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,4BAA4B;GACxC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,eAAe,YAA6B;EAC1C,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,MAAM,UAAU,WAAW,QAAQ,IAAI,YAAY,WAAW,MAAM,IAAI,QAAQ;IAChF,KAAK,IAAI,YAAY;IACrB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,6BAA6B;GACzC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,6BAA6B;GACzC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,UAAU,YAA6B;EACrC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,KAAK,IAAI,OAAO,WAAW;IAC3B,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,wBAAwB;GACpC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,wBAAwB;GACpC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,WAAW,YAA6B;EACtC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,KAAM,WAAW,IAAa;IACpC,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KAC1C,KAAK,IAAI,UAAU,IAAI,EAAE;KACzB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,oBAAoB;GAChC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,oBAAoB;GAChC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,MAAM,YAA6B;EACjC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,GAAG;IAC7B,MAAM,KAAK,WAAW;IACtB,MAAM,OAAO,WAAW;IACxB,MAAM,KAAK,KAAK;IAChB,MAAM,OAAO,KAAK;IAClB,MAAM,KAAK,KAAK;IAEhB,MAAM,KADO,KAAK,IACF;IAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAAG;KACpF,KAAK,IAAI,KAAK,IAAI,IAAI,IAAI,EAAE;KAC5B,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;IACjC;GACF;GACA,KAAKC,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,yBAAyB;GACrC,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;CAEA,QAAQ,YAA6B;EACnC,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,IAAI,WAAW,OAAO,MAAM,KAAKA,SAAAA,KAAK,SAAS,WAAW,GAAG,GAAG;IAC9D,KAAK,IAAI,OAAQ,KAAK,KAAK,MAAO,WAAW,GAAG;IAChD,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;GACjC;GACA,KAAKC,OAAO,iBAAiB;GAC7B,OAAOC,SAAAA,KAAK;EACd,QAAQ;GACN,KAAKD,OAAO,iBAAiB;GAC7B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;;;;;;;;;CAUA,QAAmB;EACjB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,KAAK;GACd,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OAAO,eAAe;GAC3B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;;;;;;CAOA,WAAsB;EACpB,IAAI,CAAC,KAAK,aAAa,GAAG,OAAOA,SAAAA,KAAK;EACtC,IAAI,KAAK,QACP,IAAI;GACF,KAAK,IAAI,QAAQ;GACjB,OAAOF,SAAAA,kBAAkB,GAAG,GAAG;EACjC,QAAQ;GACN,KAAKC,OAAO,kBAAkB;GAC9B,OAAOC,SAAAA,KAAK;EACd;EAEF,KAAKD,OAAO,8CAA8C;EAC1D,OAAOC,SAAAA,KAAK;CACd;;;;;;;;CASA,YAAY,YAA0B;EACpC,IAAI,SAAS;EACb,MAAM,UAAU,WAAW,OAAO;EAClC,MAAM,KAAK,WAAW;EACtB,IAAI,YAAY,KAAKA,SAAAA,KAAK,SAAS,EAAE,GACnC,SAAS;OACJ,IAAI,YAAY,GAAG;GACxB,MAAM,OAAO,WAAW;GACxB,MAAM,KAAK,KAAK;GAEhB,MAAM,KADO,KAAK,IACF;GAChB,IAAIA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GAC5D,SAAS,OAAO,GAAG,IAAI,GAAG,IAAI,GAAG;QAEjC,KAAKD,OAAO,yCAAuC;EAEvD,OAAO,IAAI,YAAY,GAAG;GACxB,MAAM,OAAO,WAAW;GACxB,MAAM,KAAK,KAAK;GAChB,MAAM,OAAO,KAAK;GAClB,MAAM,KAAK,KAAK;GAEhB,MAAM,KADO,KAAK,IACF;GAChB,IAAIC,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,KAAKA,SAAAA,KAAK,SAAS,EAAE,GACjF,SAAS,QAAQ,GAAG,IAAI,GAAG,IAAI,GAAG,IAAI,GAAG;QAEzC,KAAKD,OAAO,yCAAuC;EAEvD,OACE,KAAKA,OAAO,yCAAuC;EAErD,OAAO;CACT;AACF;;;;;;;;;;AC1wCA,SAAgB,qBAAqB,SAElB;CACjB,OAAO,IAAI,eAAe,QAAQ,MAAM;AAC1C"}

package/dist/index.d.cts

@@ -5,17 +5,23 @@ import { Cons, InterpretedSymbol, KeiLispPlugin, LispValue, PluginContext } from
  * @class
  * @classdesc Canvas2D drawing plugin for the kei-lisp interpreter. Implements
  *            the `KeiLispPlugin` contract (`name` / `has` / `apply`) and
- *            exposes 43 `g…` Lisp functions that proxy to a 2D rendering
+ *            exposes 45 `g…` Lisp functions that proxy to a 2D rendering
  *            context.
  * @author Keisuke Ikeda
  * @this {GraphicsPlugin}
  */
 declare class GraphicsPlugin extends Object implements KeiLispPlugin {
+  #private;
   /**
    * Dispatch map from a Lisp function name (InterpretedSymbol) to the name of
    * the GraphicsPlugin method that implements it.
    */
   static readonly buildInFunctions: Map<InterpretedSymbol, string>;
+  /**
+   * Builds the dispatch table.
+   * @return the dispatch table
+   */
+  static setup(): Map<InterpretedSymbol, string>;
   /**
    * Plugin identifier, used for diagnostics.
    */
@@ -38,18 +44,18 @@ declare class GraphicsPlugin extends Object implements KeiLispPlugin {
   /**
    * Dispatches the given symbol to the matching `g…` method.
    * @param aSymbol - the call symbol
-   * @param args - the evaluated argument list
-   * @param _ctx - the interpreter context (unused by this plugin)
+   * @param arguments_ - the evaluated argument list
+   * @param _context - the interpreter context (unused by this plugin)
    * @return the method's result, or `Cons.nil` if dispatch fails
    */
-  apply(aSymbol: InterpretedSymbol, args: Cons, _ctx: PluginContext): LispValue;
+  apply(aSymbol: InterpretedSymbol, arguments_: Cons, _context: PluginContext): LispValue;
   /**
    * Resolves the procedure name and invokes the matching method.
    * @param procedure - the Lisp symbol
-   * @param args - the evaluated argument list
+   * @param arguments_ - the evaluated argument list
    * @return the method's result, or `Cons.nil` if not registered
    */
-  selectProcedure(procedure: InterpretedSymbol, args: Cons): LispValue;
+  selectProcedure(procedure: InterpretedSymbol, arguments_: Cons): LispValue;
   /**
    * Looks up and invokes the JS method that implements the given Lisp symbol.
    * Throws `TypeError` when the dispatch table points to a method that does
@@ -57,10 +63,10 @@ declare class GraphicsPlugin extends Object implements KeiLispPlugin {
    * Ramda `R.invoker(1, methodName)(args, this)` call would surface the same
    * error by attempting to call `undefined`.
    * @param procedure - the Lisp symbol
-   * @param args - the evaluated argument list
+   * @param arguments_ - the evaluated argument list
    * @return the method's result
    */
-  buildInFunction(procedure: InterpretedSymbol, args: Cons): LispValue;
+  buildInFunction(procedure: InterpretedSymbol, arguments_: Cons): LispValue;
   /**
    * Checks whether the canvas exposes a usable 2D context, and narrows
    * `this.ctx` to non-null for the caller when it returns true.
@@ -69,72 +75,72 @@ declare class GraphicsPlugin extends Object implements KeiLispPlugin {
   checkSupport(): this is GraphicsPlugin & {
     ctx: CanvasRenderingContext2D | OffscreenCanvasRenderingContext2D;
   };
-  /**
-   * Writes a diagnostic line directly to `process.stderr`, matching the
-   * convention used by kei-lisp itself (`Applier.format` writes to
-   * `process.stdout`). In a Node runtime this hits the real stderr; in a
-   * browser kei-lisp host (e.g. kei-lisp-web) the host typically swaps
-   * `process.stderr.write` for a sink that routes to the REPL output panel,
-   * so the same call reaches the user via the host's normal output channel.
-   * @param line - the line to write
-   */
-  _print(line: string): void;
-  gAlpha(args: Cons): LispValue;
-  gArc(args: Cons): LispValue;
-  gArcTo(args: Cons): LispValue;
-  gBezCurveTo(args: Cons): LispValue;
+  gAlpha(arguments_: Cons): LispValue;
+  gArc(arguments_: Cons): LispValue;
+  gArcTo(arguments_: Cons): LispValue;
+  gBezCurveTo(arguments_: Cons): LispValue;
   gClear(): LispValue;
   gClose(): LispValue;
-  gColor(args: Cons): LispValue;
+  gColor(arguments_: Cons): LispValue;
   gFill(): LispValue;
-  gFillColor(args: Cons): LispValue;
-  gFillRect(args: Cons): LispValue;
-  gFillText(args: Cons): LispValue;
-  gFillTri(args: Cons): LispValue;
+  gFillColor(arguments_: Cons): LispValue;
+  gFillRect(arguments_: Cons): LispValue;
+  gFillText(arguments_: Cons): LispValue;
+  gFillTri(arguments_: Cons): LispValue;
   gFinishPath(): LispValue;
-  gImage(args: Cons): LispValue;
-  gLineTo(args: Cons): LispValue;
-  gLineCap(args: Cons): LispValue;
-  gLineJoin(args: Cons): LispValue;
-  gLineWidth(args: Cons): LispValue;
-  gMoveTo(args: Cons): LispValue;
+  gImage(arguments_: Cons): LispValue;
+  gLineTo(arguments_: Cons): LispValue;
+  gLineCap(arguments_: Cons): LispValue;
+  gLineJoin(arguments_: Cons): LispValue;
+  gLineWidth(arguments_: Cons): LispValue;
+  gMoveTo(arguments_: Cons): LispValue;
   gOpen(): LispValue;
-  gPattern(args: Cons): LispValue;
-  gQuadCurveTo(args: Cons): LispValue;
+  gPattern(arguments_: Cons): LispValue;
+  gQuadCurveTo(arguments_: Cons): LispValue;
   gSaveJpeg(): LispValue;
   gSavePng(): LispValue;
-  gScale(args: Cons): LispValue;
-  gShadowBlur(args: Cons): LispValue;
-  gShadowColor(args: Cons): LispValue;
-  gShadowOffsetX(args: Cons): LispValue;
-  gShadowOffsetY(args: Cons): LispValue;
-  gSleep(args: Cons): LispValue;
+  gScale(arguments_: Cons): LispValue;
+  gShadowBlur(arguments_: Cons): LispValue;
+  gShadowColor(arguments_: Cons): LispValue;
+  gShadowOffsetX(arguments_: Cons): LispValue;
+  gShadowOffsetY(arguments_: Cons): LispValue;
+  gSleep(arguments_: Cons): LispValue;
   gStartPath(): LispValue;
   gStroke(): LispValue;
-  gStrokeColor(args: Cons): LispValue;
-  gStrokeRect(args: Cons): LispValue;
-  gStrokeText(args: Cons): LispValue;
-  gStrokeTri(args: Cons): LispValue;
-  gTextAlign(args: Cons): LispValue;
-  gTextBaseline(args: Cons): LispValue;
-  gTextDirection(args: Cons): LispValue;
-  gTextFont(args: Cons): LispValue;
-  gTranslate(args: Cons): LispValue;
-  gRect(args: Cons): LispValue;
-  gRotate(args: Cons): LispValue;
+  gStrokeColor(arguments_: Cons): LispValue;
+  gStrokeRect(arguments_: Cons): LispValue;
+  gStrokeText(arguments_: Cons): LispValue;
+  gStrokeTri(arguments_: Cons): LispValue;
+  gTextAlign(arguments_: Cons): LispValue;
+  gTextBaseline(arguments_: Cons): LispValue;
+  gTextDirection(arguments_: Cons): LispValue;
+  gTextFont(arguments_: Cons): LispValue;
+  gTranslate(arguments_: Cons): LispValue;
+  gRect(arguments_: Cons): LispValue;
+  gRotate(arguments_: Cons): LispValue;
+  /**
+   * Pushes the current drawing state (styles, transform, clip) onto the
+   * context's state stack. Pairs with `gRestore` to let Lisp callers manage
+   * state explicitly. Replaces the legacy per-method `ctx.save()` calls, which
+   * pushed state on every draw with no matching `restore()` and grew the stack
+   * unbounded.
+   * @return `t` on success, `Cons.nil` otherwise
+   */
+  gSave(): LispValue;
+  /**
+   * Pops the most recently saved drawing state off the context's state stack.
+   * Pairs with `gSave`. Popping an empty stack is a no-op per the Canvas spec.
+   * @return `t` on success, `Cons.nil` otherwise
+   */
+  gRestore(): LispValue;
   /**
    * Parses a color spec from the head of the argument Cons. Accepts
    * (1 string), (3 numbers — rgb), or (4 numbers — rgba); falls back to
    * `'black'` on anything else (legacy behavior).
-   * @param args - the argument Cons to parse
+   * @param arguments_ - the argument Cons to parse
    * @return CSS color string
    */
-  selectColor(args: Cons): string;
-  /**
-   * Builds the dispatch table.
-   * @return the dispatch table
-   */
-  static setup(): Map<InterpretedSymbol, string>;
+  selectColor(arguments_: Cons): string;
 }
 //#endregion
 //#region src/index.d.ts