chaffjs 0.28.0 → 0.30.0

package/dist/commands/cite.js

@@ -1,39 +1,25 @@
-import { checkCitations } from "../structure/cite.js";
+import { dirname, isAbsolute, join } from "node:path";
+import { checkCitations, isAnywhere } from "../structure/cite.js";
+import { bySource, parseCitations, sourceOf, sourceProblem } from "./cite-claims.js";
+import { runScaffold } from "./cite-scaffold.js";
+import { isWebSource, readPageTree } from "./cite-page.js";
 import { readSource, readTree } from "./tree.js";
 const FORMATS = new Set(["text", "json"]);
 const QUOTE_WIDTH = 40;
-const VALUED = new Set(["--format", "--language", "--genre"]);
+const VALUED = new Set(["--format", "--language", "--genre", "--url"]);
 export const citeTargets = (argv) => argv.slice(1).filter((arg, index, all) => !arg.startsWith("--") && !VALUED.has(all[index - 1] ?? ""));
-const isRecord = (value) => typeof value === "object" && value !== null && !Array.isArray(value);
-const isCitation = (value) => isRecord(value) && typeof value["address"] === "string" && typeof value["quote"] === "string";
-const parseJson = (text, ui) => {
-    try {
-        return { value: JSON.parse(text) };
-    }
-    catch (err) {
-        return { error: TEXT[ui].notJson(err instanceof Error ? err.message : String(err)) };
-    }
-};
-/** 引用の一覧。[{ address, quote }] の配列だけを受け取る。形が違えば理由を返す。 */
-export const parseCitations = (text, ui = "ja") => {
-    const parsed = parseJson(text, ui);
-    if ("error" in parsed)
-        return parsed;
-    if (!Array.isArray(parsed.value))
-        return { error: TEXT[ui].notArray };
-    const entries = parsed.value;
-    const bad = entries.findIndex((entry) => !isCitation(entry));
-    if (bad !== -1)
-        return { error: TEXT[ui].badEntry(bad + 1) };
-    return { citations: entries.filter(isCitation).map((entry) => ({ address: entry.address, quote: entry.quote })) };
-};
 const TEXT = {
     ja: {
         quoted: (text) => `「${text}」`,
-        usage: "使い方: chaff cite <原文> <引用.json> [--format text|json] [--language ja|en|…]",
-        notJson: (why) => `JSON として読めません: ${why}`,
-        notArray: '引用は配列で渡してください: [{ "address": "3.2", "quote": "…" }]',
-        badEntry: (n) => `${String(n)} 件目に address（文字列）と quote（文字列）がありません`,
+        usage: [
+            "使い方: chaff cite <原文> <引用.json> [--format text|json] [--language ja|en|…]",
+            "        chaff cite --url <URL> <引用.json> （原文が Web のページのとき）",
+            "        chaff cite <引用.json>            （引用ごとに source で原文のファイルか URL を書いたとき）",
+            "        chaff cite --scaffold <文書>      （出典の無い引用から引用.json のひな形を作る）",
+        ].join("\n"),
+        anywhere: "（番地なし）",
+        foundAt: (parts) => `（${parts.join("、")}）`,
+        line: (line) => `${String(line)} 行目`,
         results: {
             ok: () => "一致",
             "missing-address": (result) => `番地 ${result.citation.address} は原文にありません`,
@@ -43,10 +29,15 @@ const TEXT = {
     },
     en: {
         quoted: (text) => ` "${text}"`,
-        usage: "usage: chaff cite <source> <quotes.json> [--format text|json] [--language ja|en|…]",
-        notJson: (why) => `Not valid JSON: ${why}`,
-        notArray: 'Give the quotations as an array: [{ "address": "3.2", "quote": "…" }]',
-        badEntry: (n) => `Entry ${String(n)} needs address (a string) and quote (a string)`,
+        usage: [
+            "usage: chaff cite <source> <quotes.json> [--format text|json] [--language ja|en|…]",
+            "       chaff cite --url <URL> <quotes.json> (the source is a web page)",
+            "       chaff cite <quotes.json>             (each quotation names its source, a file or a URL)",
+            "       chaff cite --scaffold <document>     (a quotes.json to fill in, from the quotations with no source)",
+        ].join("\n"),
+        anywhere: "(anywhere)",
+        foundAt: (parts) => ` (${parts.join(", ")})`,
+        line: (line) => `line ${String(line)}`,
         results: {
             ok: () => "matches",
             "missing-address": (result) => `address ${result.citation.address} is not in the source`,
@@ -55,36 +46,104 @@ const TEXT = {
         },
     },
 };
+/** Where a quote given no address was found, so the reader can write the address in. */
+const whereFound = (result, text) => {
+    if (result.status !== "ok" || !isAnywhere(result.citation) || result.line === undefined)
+        return "";
+    return text.foundAt([...(result.foundAt === undefined ? [] : [result.foundAt]), text.line(result.line)]);
+};
+/** A claim that names its own source says which, before its address. */
+const sourcePrefix = (result) => {
+    const source = sourceOf(result.citation);
+    return source === undefined ? "" : `${source} `;
+};
 const describe = (result, text) => {
     const mark = result.status === "ok" ? "✓" : "✗";
     const oneLine = result.citation.quote.replace(/\s+/gu, " ").trim();
     const quote = oneLine.length > QUOTE_WIDTH ? `${oneLine.slice(0, QUOTE_WIDTH)}…` : oneLine;
-    return `${mark} ${result.citation.address}${text.quoted(quote)}: ${text.results[result.status](result)}`;
+    const address = isAnywhere(result.citation) ? text.anywhere : result.citation.address;
+    return `${mark} ${sourcePrefix(result)}${address}${text.quoted(quote)}: ${text.results[result.status](result)}${whereFound(result, text)}`;
+};
+/** Each claim checked against one source, a file or a web page. undefined when it cannot be read as a tree (already said why). */
+const checkAgainst = async (location, claims, argv, context) => {
+    const read = isWebSource(location) ? await readPageTree(location, argv, context) : await readTree(location, argv, context);
+    return read === undefined ? undefined : checkCitations(read.source, read.tree, claims);
+};
+/** A claim's source, read from where the claims file is: a scaffold sits next to the document that quotes. A URL is a URL. */
+const sourcePath = (claimsPath, source) => {
+    if (isWebSource(source))
+        return source;
+    // A claims file written on Windows says sources\talk.md; it names the same file everywhere.
+    const portable = source.replaceAll("\\", "/");
+    return isAbsolute(portable) ? portable : join(dirname(claimsPath), portable);
+};
+/**
+ * Each claim checked against the source it names, in the claims file's order. Sources are read one at a time, so what
+ * an unreadable one prints comes in the same order every run; any unreadable source fails the run.
+ */
+const checkEachSource = async (claimsPath, claims, argv, context) => {
+    const groups = bySource(claims);
+    const checked = await groups.reduce(async (previous, group) => {
+        const done = await previous;
+        return [...done, await checkAgainst(sourcePath(claimsPath, group.source), group.claims, argv, context)];
+    }, Promise.resolve([]));
+    const byClaim = new Map();
+    const unread = groups.some((group, index) => {
+        const results = checked[index];
+        results?.forEach((result, at) => byClaim.set(group.claims[at] ?? result.citation, result));
+        return results === undefined;
+    });
+    return unread ? undefined : claims.flatMap((claim) => byClaim.get(claim) ?? []);
+};
+const readClaims = async (claimsPath, sourceGiven, context) => {
+    const text = await readSource(claimsPath, context);
+    if (text === undefined)
+        return undefined;
+    const ui = context.ui ?? "ja";
+    const parsed = parseCitations(text, ui);
+    const problem = "error" in parsed ? parsed.error : sourceProblem(parsed.citations, sourceGiven, ui);
+    if (problem === undefined && "citations" in parsed)
+        return parsed.citations;
+    console.error(`${claimsPath}: ${problem ?? ""}`);
+    return undefined;
+};
+const usageError = (text) => {
+    console.error(text.usage);
+    return 1;
+};
+/** What the arguments ask to check, or undefined when they do not fit any usage. */
+const runOf = (targets, argv, context) => {
+    const url = context.flag(argv, "--url");
+    if (argv.includes("--url") && (url === undefined || !isWebSource(url)))
+        return undefined;
+    const claimsPath = targets.at(-1);
+    if (claimsPath === undefined || targets.length > (url === undefined ? 2 : 1))
+        return undefined;
+    return { claimsPath, sourceGiven: url ?? (targets.length === 2 ? targets[0] : undefined) };
 };
 /**
- * 回答の引用が原文にあるかを確かめる。書き換えはしない。
+ * 回答の引用が原文にあるかを確かめる。書き換えはしない。原文は引数で一つ渡すか、引用ごとに source で書く。
  * 一つでも外れていれば 1 で終わるので、AI の回答を単体試験のように検査できる。
  */
 export const runCite = async (targets, argv, context) => {
-    const [sourcePath, citationsPath] = targets;
+    const text = TEXT[context.ui ?? "ja"];
     const format = context.flag(argv, "--format") ?? "text";
-    if (sourcePath === undefined || citationsPath === undefined || targets.length !== 2 || !FORMATS.has(format)) {
-        console.error(TEXT[context.ui ?? "ja"].usage);
-        return 1;
-    }
-    const citationsText = await readSource(citationsPath, context);
-    if (citationsText === undefined)
-        return 1;
-    const parsed = parseCitations(citationsText, context.ui ?? "ja");
-    if ("error" in parsed) {
-        console.error(`${citationsPath}: ${parsed.error}`);
+    if (!FORMATS.has(format))
+        return usageError(text);
+    // The scaffold is always JSON: it is a file to fill in.
+    if (argv.includes("--scaffold"))
+        return argv.includes("--url") ? usageError(text) : runScaffold(targets, argv, context, text.usage);
+    const run = runOf(targets, argv, context);
+    if (run === undefined)
+        return usageError(text);
+    const { claimsPath, sourceGiven } = run;
+    const claims = await readClaims(claimsPath, sourceGiven !== undefined, context);
+    if (claims === undefined)
         return 1;
-    }
-    const read = await readTree(sourcePath, argv, context);
-    if (read === undefined)
+    const results = sourceGiven === undefined ? await checkEachSource(claimsPath, claims, argv, context) : await checkAgainst(sourceGiven, claims, argv, context);
+    if (results === undefined)
         return 1;
-    const results = checkCitations(read.source, read.tree, parsed.citations);
-    console.log(format === "json" ? JSON.stringify(results, null, 2) : results.map((result) => describe(result, TEXT[context.ui ?? "ja"])).join("\n"));
+    console.log(format === "json" ? JSON.stringify(results, null, 2) : results.map((result) => describe(result, text)).join("\n"));
     return results.every((result) => result.status === "ok") ? 0 : 1;
 };
 //# sourceMappingURL=cite.js.map

package/dist/commands/cite.js.map

@@ -1 +1 @@
-{"version":3,"file":"cite.js","sourceRoot":"","sources":["../../src/commands/cite.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,cAAc,EAAsC,MAAM,sBAAsB,CAAC;AAC1F,OAAO,EAAE,UAAU,EAAE,QAAQ,EAAoB,MAAM,WAAW,CAAC;AAGnE,MAAM,OAAO,GAAwB,IAAI,GAAG,CAAC,CAAC,MAAM,EAAE,MAAM,CAAC,CAAC,CAAC;AAC/D,MAAM,WAAW,GAAG,EAAE,CAAC;AACvB,MAAM,MAAM,GAAwB,IAAI,GAAG,CAAC,CAAC,UAAU,EAAE,YAAY,EAAE,SAAS,CAAC,CAAC,CAAC;AAEnF,MAAM,CAAC,MAAM,WAAW,GAAG,CAAC,IAAuB,EAAY,EAAE,CAC/D,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,GAAG,EAAE,KAAK,EAAE,GAAG,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,MAAM,CAAC,GAAG,CAAC,GAAG,CAAC,KAAK,GAAG,CAAC,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;AAExG,MAAM,QAAQ,GAAG,CAAC,KAAc,EAAoC,EAAE,CAAC,OAAO,KAAK,KAAK,QAAQ,IAAI,KAAK,KAAK,IAAI,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,CAAC;AAE5I,MAAM,UAAU,GAAG,CAAC,KAAc,EAAqB,EAAE,CAAC,QAAQ,CAAC,KAAK,CAAC,IAAI,OAAO,KAAK,CAAC,SAAS,CAAC,KAAK,QAAQ,IAAI,OAAO,KAAK,CAAC,OAAO,CAAC,KAAK,QAAQ,CAAC;AAIxJ,MAAM,SAAS,GAAG,CAAC,IAAY,EAAE,EAAc,EAA4D,EAAE;IAC3G,IAAI,CAAC;QACH,OAAO,EAAE,KAAK,EAAE,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,EAAE,CAAC;IACrC,CAAC;IAAC,OAAO,GAAG,EAAE,CAAC;QACb,OAAO,EAAE,KAAK,EAAE,IAAI,CAAC,EAAE,CAAC,CAAC,OAAO,CAAC,GAAG,YAAY,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,EAAE,CAAC;IACvF,CAAC;AACH,CAAC,CAAC;AAEF,wDAAwD;AACxD,MAAM,CAAC,MAAM,cAAc,GAAG,CAAC,IAAY,EAAE,KAAiB,IAAI,EAAmB,EAAE;IACrF,MAAM,MAAM,GAAG,SAAS,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC;IACnC,IAAI,OAAO,IAAI,MAAM;QAAE,OAAO,MAAM,CAAC;IACrC,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,KAAK,CAAC;QAAE,OAAO,EAAE,KAAK,EAAE,IAAI,CAAC,EAAE,CAAC,CAAC,QAAQ,EAAE,CAAC;IACtE,MAAM,OAAO,GAAuB,MAAM,CAAC,KAAK,CAAC;IACjD,MAAM,GAAG,GAAG,OAAO,CAAC,SAAS,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,CAAC,UAAU,CAAC,KAAK,CAAC,CAAC,CAAC;IAC7D,IAAI,GAAG,KAAK,CAAC,CAAC;QAAE,OAAO,EAAE,KAAK,EAAE,IAAI,CAAC,EAAE,CAAC,CAAC,QAAQ,CAAC,GAAG,GAAG,CAAC,CAAC,EAAE,CAAC;IAC7D,OAAO,EAAE,SAAS,EAAE,OAAO,CAAC,MAAM,CAAC,UAAU,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,CAAC,EAAE,OAAO,EAAE,KAAK,CAAC,OAAO,EAAE,KAAK,EAAE,KAAK,CAAC,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC;AACpH,CAAC,CAAC;AAWF,MAAM,IAAI,GAAoB;IAC5B,EAAE,EAAE;QACF,MAAM,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,IAAI,GAAG;QAC7B,KAAK,EAAE,0EAA0E;QACjF,OAAO,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,kBAAkB,GAAG,EAAE;QACzC,QAAQ,EAAE,qDAAqD;QAC/D,QAAQ,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,GAAG,MAAM,CAAC,CAAC,CAAC,qCAAqC;QAClE,OAAO,EAAE;YACP,EAAE,EAAE,GAAG,EAAE,CAAC,IAAI;YACd,iBAAiB,EAAE,CAAC,MAAM,EAAE,EAAE,CAAC,MAAM,MAAM,CAAC,QAAQ,CAAC,OAAO,YAAY;YACxE,iBAAiB,EAAE,CAAC,MAAM,EAAE,EAAE,CAC5B,QAAQ,MAAM,CAAC,QAAQ,CAAC,OAAO,SAAS,MAAM,CAAC,OAAO,IAAI,MAAM,IAAI,MAAM,CAAC,MAAM,CAAC,IAAI,IAAI,GAAG,CAAC,WAAW;YAC3G,iBAAiB,EAAE,GAAG,EAAE,CAAC,kBAAkB;SAC5C;KACF;IACD,EAAE,EAAE;QACF,MAAM,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,KAAK,IAAI,GAAG;QAC9B,KAAK,EAAE,oFAAoF;QAC3F,OAAO,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,mBAAmB,GAAG,EAAE;QAC1C,QAAQ,EAAE,uEAAuE;QACjF,QAAQ,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,SAAS,MAAM,CAAC,CAAC,CAAC,gDAAgD;QACnF,OAAO,EAAE;YACP,EAAE,EAAE,GAAG,EAAE,CAAC,SAAS;YACnB,iBAAiB,EAAE,CAAC,MAAM,EAAE,EAAE,CAAC,WAAW,MAAM,CAAC,QAAQ,CAAC,OAAO,uBAAuB;YACxF,iBAAiB,EAAE,CAAC,MAAM,EAAE,EAAE,CAC5B,2BAA2B,MAAM,CAAC,QAAQ,CAAC,OAAO,WAAW,MAAM,CAAC,OAAO,IAAI,YAAY,UAAU,MAAM,CAAC,MAAM,CAAC,IAAI,IAAI,GAAG,CAAC,GAAG;YACpI,iBAAiB,EAAE,GAAG,EAAE,CAAC,wCAAwC;SAClE;KACF;CACF,CAAC;AAEF,MAAM,QAAQ,GAAG,CAAC,MAAsB,EAAE,IAAc,EAAU,EAAE;IAClE,MAAM,IAAI,GAAG,MAAM,CAAC,MAAM,KAAK,IAAI,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC;IAChD,MAAM,OAAO,GAAG,MAAM,CAAC,QAAQ,CAAC,KAAK,CAAC,OAAO,CAAC,OAAO,EAAE,GAAG,CAAC,CAAC,IAAI,EAAE,CAAC;IACnE,MAAM,KAAK,GAAG,OAAO,CAAC,MAAM,GAAG,WAAW,CAAC,CAAC,CAAC,GAAG,OAAO,CAAC,KAAK,CAAC,CAAC,EAAE,WAAW,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,CAAC;IAC3F,OAAO,GAAG,IAAI,IAAI,MAAM,CAAC,QAAQ,CAAC,OAAO,GAAG,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,KAAK,IAAI,CAAC,OAAO,CAAC,MAAM,CAAC,MAAM,CAAC,CAAC,MAAM,CAAC,EAAE,CAAC;AAC3G,CAAC,CAAC;AAEF;;;GAGG;AACH,MAAM,CAAC,MAAM,OAAO,GAAG,KAAK,EAAE,OAA0B,EAAE,IAAuB,EAAE,OAAoB,EAAmB,EAAE;IAC1H,MAAM,CAAC,UAAU,EAAE,aAAa,CAAC,GAAG,OAAO,CAAC;IAC5C,MAAM,MAAM,GAAG,OAAO,CAAC,IAAI,CAAC,IAAI,EAAE,UAAU,CAAC,IAAI,MAAM,CAAC;IACxD,IAAI,UAAU,KAAK,SAAS,IAAI,aAAa,KAAK,SAAS,IAAI,OAAO,CAAC,MAAM,KAAK,CAAC,IAAI,CAAC,OAAO,CAAC,GAAG,CAAC,MAAM,CAAC,EAAE,CAAC;QAC5G,OAAO,CAAC,KAAK,CAAC,IAAI,CAAC,OAAO,CAAC,EAAE,IAAI,IAAI,CAAC,CAAC,KAAK,CAAC,CAAC;QAC9C,OAAO,CAAC,CAAC;IACX,CAAC;IACD,MAAM,aAAa,GAAG,MAAM,UAAU,CAAC,aAAa,EAAE,OAAO,CAAC,CAAC;IAC/D,IAAI,aAAa,KAAK,SAAS;QAAE,OAAO,CAAC,CAAC;IAC1C,MAAM,MAAM,GAAG,cAAc,CAAC,aAAa,EAAE,OAAO,CAAC,EAAE,IAAI,IAAI,CAAC,CAAC;IACjE,IAAI,OAAO,IAAI,MAAM,EAAE,CAAC;QACtB,OAAO,CAAC,KAAK,CAAC,GAAG,aAAa,KAAK,MAAM,CAAC,KAAK,EAAE,CAAC,CAAC;QACnD,OAAO,CAAC,CAAC;IACX,CAAC;IACD,MAAM,IAAI,GAAG,MAAM,QAAQ,CAAC,UAAU,EAAE,IAAI,EAAE,OAAO,CAAC,CAAC;IACvD,IAAI,IAAI,KAAK,SAAS;QAAE,OAAO,CAAC,CAAC;IACjC,MAAM,OAAO,GAAG,cAAc,CAAC,IAAI,CAAC,MAAM,EAAE,IAAI,CAAC,IAAI,EAAE,MAAM,CAAC,SAAS,CAAC,CAAC;IACzE,OAAO,CAAC,GAAG,CAAC,MAAM,KAAK,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,SAAS,CAAC,OAAO,EAAE,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,GAAG,CAAC,CAAC,MAAM,EAAE,EAAE,CAAC,QAAQ,CAAC,MAAM,EAAE,IAAI,CAAC,OAAO,CAAC,EAAE,IAAI,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC;IACnJ,OAAO,OAAO,CAAC,KAAK,CAAC,CAAC,MAAM,EAAE,EAAE,CAAC,MAAM,CAAC,MAAM,KAAK,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;AACnE,CAAC,CAAC"}
+{"version":3,"file":"cite.js","sourceRoot":"","sources":["../../src/commands/cite.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,OAAO,EAAE,UAAU,EAAE,IAAI,EAAE,MAAM,WAAW,CAAC;AACtD,OAAO,EAAE,cAAc,EAAE,UAAU,EAAuB,MAAM,sBAAsB,CAAC;AACvF,OAAO,EAAE,QAAQ,EAAE,cAAc,EAAE,QAAQ,EAAE,aAAa,EAAc,MAAM,kBAAkB,CAAC;AACjG,OAAO,EAAE,WAAW,EAAE,MAAM,oBAAoB,CAAC;AACjD,OAAO,EAAE,WAAW,EAAE,YAAY,EAAoB,MAAM,gBAAgB,CAAC;AAC7E,OAAO,EAAE,UAAU,EAAE,QAAQ,EAAoB,MAAM,WAAW,CAAC;AAGnE,MAAM,OAAO,GAAwB,IAAI,GAAG,CAAC,CAAC,MAAM,EAAE,MAAM,CAAC,CAAC,CAAC;AAC/D,MAAM,WAAW,GAAG,EAAE,CAAC;AACvB,MAAM,MAAM,GAAwB,IAAI,GAAG,CAAC,CAAC,UAAU,EAAE,YAAY,EAAE,SAAS,EAAE,OAAO,CAAC,CAAC,CAAC;AAE5F,MAAM,CAAC,MAAM,WAAW,GAAG,CAAC,IAAuB,EAAY,EAAE,CAC/D,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,GAAG,EAAE,KAAK,EAAE,GAAG,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,MAAM,CAAC,GAAG,CAAC,GAAG,CAAC,KAAK,GAAG,CAAC,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;AAWxG,MAAM,IAAI,GAAoB;IAC5B,EAAE,EAAE;QACF,MAAM,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,IAAI,GAAG;QAC7B,KAAK,EAAE;YACL,0EAA0E;YAC1E,4DAA4D;YAC5D,6EAA6E;YAC7E,oEAAoE;SACrE,CAAC,IAAI,CAAC,IAAI,CAAC;QACZ,QAAQ,EAAE,QAAQ;QAClB,OAAO,EAAE,CAAC,KAAK,EAAE,EAAE,CAAC,IAAI,KAAK,CAAC,IAAI,CAAC,GAAG,CAAC,GAAG;QAC1C,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,GAAG,MAAM,CAAC,IAAI,CAAC,KAAK;QACpC,OAAO,EAAE;YACP,EAAE,EAAE,GAAG,EAAE,CAAC,IAAI;YACd,iBAAiB,EAAE,CAAC,MAAM,EAAE,EAAE,CAAC,MAAM,MAAM,CAAC,QAAQ,CAAC,OAAO,YAAY;YACxE,iBAAiB,EAAE,CAAC,MAAM,EAAE,EAAE,CAC5B,QAAQ,MAAM,CAAC,QAAQ,CAAC,OAAO,SAAS,MAAM,CAAC,OAAO,IAAI,MAAM,IAAI,MAAM,CAAC,MAAM,CAAC,IAAI,IAAI,GAAG,CAAC,WAAW;YAC3G,iBAAiB,EAAE,GAAG,EAAE,CAAC,kBAAkB;SAC5C;KACF;IACD,EAAE,EAAE;QACF,MAAM,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,KAAK,IAAI,GAAG;QAC9B,KAAK,EAAE;YACL,oFAAoF;YACpF,wEAAwE;YACxE,gGAAgG;YAChG,4GAA4G;SAC7G,CAAC,IAAI,CAAC,IAAI,CAAC;QACZ,QAAQ,EAAE,YAAY;QACtB,OAAO,EAAE,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG;QAC5C,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,QAAQ,MAAM,CAAC,IAAI,CAAC,EAAE;QACtC,OAAO,EAAE;YACP,EAAE,EAAE,GAAG,EAAE,CAAC,SAAS;YACnB,iBAAiB,EAAE,CAAC,MAAM,EAAE,EAAE,CAAC,WAAW,MAAM,CAAC,QAAQ,CAAC,OAAO,uBAAuB;YACxF,iBAAiB,EAAE,CAAC,MAAM,EAAE,EAAE,CAC5B,2BAA2B,MAAM,CAAC,QAAQ,CAAC,OAAO,WAAW,MAAM,CAAC,OAAO,IAAI,YAAY,UAAU,MAAM,CAAC,MAAM,CAAC,IAAI,IAAI,GAAG,CAAC,GAAG;YACpI,iBAAiB,EAAE,GAAG,EAAE,CAAC,wCAAwC;SAClE;KACF;CACF,CAAC;AAEF,wFAAwF;AACxF,MAAM,UAAU,GAAG,CAAC,MAAsB,EAAE,IAAc,EAAU,EAAE;IACpE,IAAI,MAAM,CAAC,MAAM,KAAK,IAAI,IAAI,CAAC,UAAU,CAAC,MAAM,CAAC,QAAQ,CAAC,IAAI,MAAM,CAAC,IAAI,KAAK,SAAS;QAAE,OAAO,EAAE,CAAC;IACnG,OAAO,IAAI,CAAC,OAAO,CAAC,CAAC,GAAG,CAAC,MAAM,CAAC,OAAO,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,EAAE,IAAI,CAAC,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;AAC3G,CAAC,CAAC;AAEF,wEAAwE;AACxE,MAAM,YAAY,GAAG,CAAC,MAAsB,EAAU,EAAE;IACtD,MAAM,MAAM,GAAG,QAAQ,CAAC,MAAM,CAAC,QAAQ,CAAC,CAAC;IACzC,OAAO,MAAM,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,GAAG,MAAM,GAAG,CAAC;AAClD,CAAC,CAAC;AAEF,MAAM,QAAQ,GAAG,CAAC,MAAsB,EAAE,IAAc,EAAU,EAAE;IAClE,MAAM,IAAI,GAAG,MAAM,CAAC,MAAM,KAAK,IAAI,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC;IAChD,MAAM,OAAO,GAAG,MAAM,CAAC,QAAQ,CAAC,KAAK,CAAC,OAAO,CAAC,OAAO,EAAE,GAAG,CAAC,CAAC,IAAI,EAAE,CAAC;IACnE,MAAM,KAAK,GAAG,OAAO,CAAC,MAAM,GAAG,WAAW,CAAC,CAAC,CAAC,GAAG,OAAO,CAAC,KAAK,CAAC,CAAC,EAAE,WAAW,CAAC,GAAG,CAAC,CAAC,CAAC,OAAO,CAAC;IAC3F,MAAM,OAAO,GAAG,UAAU,CAAC,MAAM,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,QAAQ,CAAC,CAAC,CAAC,MAAM,CAAC,QAAQ,CAAC,OAAO,CAAC;IACtF,OAAO,GAAG,IAAI,IAAI,YAAY,CAAC,MAAM,CAAC,GAAG,OAAO,GAAG,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,KAAK,IAAI,CAAC,OAAO,CAAC,MAAM,CAAC,MAAM,CAAC,CAAC,MAAM,CAAC,GAAG,UAAU,CAAC,MAAM,EAAE,IAAI,CAAC,EAAE,CAAC;AAC7I,CAAC,CAAC;AAEF,kIAAkI;AAClI,MAAM,YAAY,GAAG,KAAK,EACxB,QAAgB,EAChB,MAAwB,EACxB,IAAuB,EACvB,OAAoB,EACmB,EAAE;IACzC,MAAM,IAAI,GAAG,WAAW,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,MAAM,YAAY,CAAC,QAAQ,EAAE,IAAI,EAAE,OAAO,CAAC,CAAC,CAAC,CAAC,MAAM,QAAQ,CAAC,QAAQ,EAAE,IAAI,EAAE,OAAO,CAAC,CAAC;IAC3H,OAAO,IAAI,KAAK,SAAS,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,cAAc,CAAC,IAAI,CAAC,MAAM,EAAE,IAAI,CAAC,IAAI,EAAE,MAAM,CAAC,CAAC;AACzF,CAAC,CAAC;AAEF,8HAA8H;AAC9H,MAAM,UAAU,GAAG,CAAC,UAAkB,EAAE,MAAc,EAAU,EAAE;IAChE,IAAI,WAAW,CAAC,MAAM,CAAC;QAAE,OAAO,MAAM,CAAC;IACvC,4FAA4F;IAC5F,MAAM,QAAQ,GAAG,MAAM,CAAC,UAAU,CAAC,IAAI,EAAE,GAAG,CAAC,CAAC;IAC9C,OAAO,UAAU,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,OAAO,CAAC,UAAU,CAAC,EAAE,QAAQ,CAAC,CAAC;AAC/E,CAAC,CAAC;AAEF;;;GAGG;AACH,MAAM,eAAe,GAAG,KAAK,EAC3B,UAAkB,EAClB,MAAwB,EACxB,IAAuB,EACvB,OAAoB,EACmB,EAAE;IACzC,MAAM,MAAM,GAAG,QAAQ,CAAC,MAAM,CAAC,CAAC;IAChC,MAAM,OAAO,GAAG,MAAM,MAAM,CAAC,MAAM,CAA4C,KAAK,EAAE,QAAQ,EAAE,KAAK,EAAE,EAAE;QACvG,MAAM,IAAI,GAAG,MAAM,QAAQ,CAAC;QAC5B,OAAO,CAAC,GAAG,IAAI,EAAE,MAAM,YAAY,CAAC,UAAU,CAAC,UAAU,EAAE,KAAK,CAAC,MAAM,CAAC,EAAE,KAAK,CAAC,MAAM,EAAE,IAAI,EAAE,OAAO,CAAC,CAAC,CAAC;IAC1G,CAAC,EAAE,OAAO,CAAC,OAAO,CAAC,EAAE,CAAC,CAAC,CAAC;IACxB,MAAM,OAAO,GAAG,IAAI,GAAG,EAAyB,CAAC;IACjD,MAAM,MAAM,GAAG,MAAM,CAAC,IAAI,CAAC,CAAC,KAAK,EAAE,KAAK,EAAE,EAAE;QAC1C,MAAM,OAAO,GAAG,OAAO,CAAC,KAAK,CAAC,CAAC;QAC/B,OAAO,EAAE,OAAO,CAAC,CAAC,MAAM,EAAE,EAAE,EAAE,EAAE,CAAC,OAAO,CAAC,GAAG,CAAC,KAAK,CAAC,MAAM,CAAC,EAAE,CAAC,IAAI,MAAM,CAAC,QAAQ,EAAE,MAAM,CAAC,CAAC,CAAC;QAC3F,OAAO,OAAO,KAAK,SAAS,CAAC;IAC/B,CAAC,CAAC,CAAC;IACH,OAAO,MAAM,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,OAAO,CAAC,GAAG,CAAC,KAAK,CAAC,IAAI,EAAE,CAAC,CAAC;AAClF,CAAC,CAAC;AAEF,MAAM,UAAU,GAAG,KAAK,EAAE,UAAkB,EAAE,WAAoB,EAAE,OAAoB,EAAyC,EAAE;IACjI,MAAM,IAAI,GAAG,MAAM,UAAU,CAAC,UAAU,EAAE,OAAO,CAAC,CAAC;IACnD,IAAI,IAAI,KAAK,SAAS;QAAE,OAAO,SAAS,CAAC;IACzC,MAAM,EAAE,GAAG,OAAO,CAAC,EAAE,IAAI,IAAI,CAAC;IAC9B,MAAM,MAAM,GAAG,cAAc,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC;IACxC,MAAM,OAAO,GAAG,OAAO,IAAI,MAAM,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC,aAAa,CAAC,MAAM,CAAC,SAAS,EAAE,WAAW,EAAE,EAAE,CAAC,CAAC;IACpG,IAAI,OAAO,KAAK,SAAS,IAAI,WAAW,IAAI,MAAM;QAAE,OAAO,MAAM,CAAC,SAAS,CAAC;IAC5E,OAAO,CAAC,KAAK,CAAC,GAAG,UAAU,KAAK,OAAO,IAAI,EAAE,EAAE,CAAC,CAAC;IACjD,OAAO,SAAS,CAAC;AACnB,CAAC,CAAC;AAEF,MAAM,UAAU,GAAG,CAAC,IAAc,EAAU,EAAE;IAC5C,OAAO,CAAC,KAAK,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IAC1B,OAAO,CAAC,CAAC;AACX,CAAC,CAAC;AAKF,oFAAoF;AACpF,MAAM,KAAK,GAAG,CAAC,OAA0B,EAAE,IAAuB,EAAE,OAAoB,EAAmB,EAAE;IAC3G,MAAM,GAAG,GAAG,OAAO,CAAC,IAAI,CAAC,IAAI,EAAE,OAAO,CAAC,CAAC;IACxC,IAAI,IAAI,CAAC,QAAQ,CAAC,OAAO,CAAC,IAAI,CAAC,GAAG,KAAK,SAAS,IAAI,CAAC,WAAW,CAAC,GAAG,CAAC,CAAC;QAAE,OAAO,SAAS,CAAC;IACzF,MAAM,UAAU,GAAG,OAAO,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC;IAClC,IAAI,UAAU,KAAK,SAAS,IAAI,OAAO,CAAC,MAAM,GAAG,CAAC,GAAG,KAAK,SAAS,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;QAAE,OAAO,SAAS,CAAC;IAC/F,OAAO,EAAE,UAAU,EAAE,WAAW,EAAE,GAAG,IAAI,CAAC,OAAO,CAAC,MAAM,KAAK,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC,EAAE,CAAC;AAC7F,CAAC,CAAC;AAEF;;;GAGG;AACH,MAAM,CAAC,MAAM,OAAO,GAAG,KAAK,EAAE,OAA0B,EAAE,IAAuB,EAAE,OAAoB,EAAmB,EAAE;IAC1H,MAAM,IAAI,GAAG,IAAI,CAAC,OAAO,CAAC,EAAE,IAAI,IAAI,CAAC,CAAC;IACtC,MAAM,MAAM,GAAG,OAAO,CAAC,IAAI,CAAC,IAAI,EAAE,UAAU,CAAC,IAAI,MAAM,CAAC;IACxD,IAAI,CAAC,OAAO,CAAC,GAAG,CAAC,MAAM,CAAC;QAAE,OAAO,UAAU,CAAC,IAAI,CAAC,CAAC;IAClD,wDAAwD;IACxD,IAAI,IAAI,CAAC,QAAQ,CAAC,YAAY,CAAC;QAAE,OAAO,IAAI,CAAC,QAAQ,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,WAAW,CAAC,OAAO,EAAE,IAAI,EAAE,OAAO,EAAE,IAAI,CAAC,KAAK,CAAC,CAAC;IACpI,MAAM,GAAG,GAAG,KAAK,CAAC,OAAO,EAAE,IAAI,EAAE,OAAO,CAAC,CAAC;IAC1C,IAAI,GAAG,KAAK,SAAS;QAAE,OAAO,UAAU,CAAC,IAAI,CAAC,CAAC;IAC/C,MAAM,EAAE,UAAU,EAAE,WAAW,EAAE,GAAG,GAAG,CAAC;IACxC,MAAM,MAAM,GAAG,MAAM,UAAU,CAAC,UAAU,EAAE,WAAW,KAAK,SAAS,EAAE,OAAO,CAAC,CAAC;IAChF,IAAI,MAAM,KAAK,SAAS;QAAE,OAAO,CAAC,CAAC;IACnC,MAAM,OAAO,GAAG,WAAW,KAAK,SAAS,CAAC,CAAC,CAAC,MAAM,eAAe,CAAC,UAAU,EAAE,MAAM,EAAE,IAAI,EAAE,OAAO,CAAC,CAAC,CAAC,CAAC,MAAM,YAAY,CAAC,WAAW,EAAE,MAAM,EAAE,IAAI,EAAE,OAAO,CAAC,CAAC;IAC9J,IAAI,OAAO,KAAK,SAAS;QAAE,OAAO,CAAC,CAAC;IACpC,OAAO,CAAC,GAAG,CAAC,MAAM,KAAK,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,SAAS,CAAC,OAAO,EAAE,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,GAAG,CAAC,CAAC,MAAM,EAAE,EAAE,CAAC,QAAQ,CAAC,MAAM,EAAE,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC;IAC/H,OAAO,OAAO,CAAC,KAAK,CAAC,CAAC,MAAM,EAAE,EAAE,CAAC,MAAM,CAAC,MAAM,KAAK,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;AACnE,CAAC,CAAC"}

package/dist/company-names.d.ts

@@ -0,0 +1,34 @@
+export type CompanyForm = {
+    readonly pattern: string;
+    readonly group: string;
+    readonly position?: "before" | "after" | undefined;
+};
+/** surface は形の語も含めた書いたまま。base は名前の部分、form は形の組、position は形の語が名前のどちら側にあるか。 */
+export type CompanyMention = {
+    readonly surface: string;
+    readonly offset: number;
+    readonly base: string;
+    readonly form: string;
+    readonly position: "before" | "after";
+};
+/** 二つの書き方の違い。spelling は記号・幅・大小だけ、form は会社の形、position は形の語の側、near は名前の一字違い。 */
+type CompanyRelation = "spelling" | "form" | "position" | "near";
+type CompanyVariant = {
+    readonly mention: CompanyMention;
+    readonly usual: string;
+    readonly kind: CompanyRelation;
+};
+/** 名前の部分が、品詞解析が固有名詞と読んだ語に掛かるか。漢字だけの名前（清算、当該）は、ふつうの語と区別がつかない。 */
+export type IsProper = (start: number, end: number) => boolean;
+/** 文書の中の会社の名前の現れ。長い形の語（Co., Ltd）を先に取り、その中の短い語（Ltd）は数えない。 */
+export declare const companyMentionsIn: (source: string, forms: readonly CompanyForm[], isProper: IsProper) => CompanyMention[];
+/**
+ * 二つの書き方が、同じ会社を二通りに書いたものか。名前の部分が同じ（記号・幅・大小を除いて）なら、形の組か形の語の側の違い、
+ * どちらも同じなら記号・幅・大小だけの違い。名前の部分が違うのは、形も側も同じで、漢字でない字の一字違いのときだけ（Aoba Systems と
+ * Aoba System）。名前の違う会社（親会社と子会社、別の取引先）は、名前の部分が一字より多く違うので同じと見ない。
+ */
+export declare const companyRelation: (left: CompanyMention, right: CompanyMention) => CompanyRelation | undefined;
+/** 同じ会社の、少ないほうの書き方。同じ会社と言える相手のうち一番多いものと比べる。書き方ごとに最初の現れを一つ。 */
+export declare const companyVariants: (mentions: readonly CompanyMention[]) => CompanyVariant[];
+export {};
+//# sourceMappingURL=company-names.d.ts.map

package/dist/company-names.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"company-names.d.ts","sourceRoot":"","sources":["../src/company-names.ts"],"names":[],"mappings":"AAOA,MAAM,MAAM,WAAW,GAAG;IAAE,QAAQ,CAAC,OAAO,EAAE,MAAM,CAAC;IAAC,QAAQ,CAAC,KAAK,EAAE,MAAM,CAAC;IAAC,QAAQ,CAAC,QAAQ,CAAC,EAAE,QAAQ,GAAG,OAAO,GAAG,SAAS,CAAA;CAAE,CAAC;AAEnI,6EAA6E;AAC7E,MAAM,MAAM,cAAc,GAAG;IAC3B,QAAQ,CAAC,OAAO,EAAE,MAAM,CAAC;IACzB,QAAQ,CAAC,MAAM,EAAE,MAAM,CAAC;IACxB,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAC;IACtB,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAC;IACtB,QAAQ,CAAC,QAAQ,EAAE,QAAQ,GAAG,OAAO,CAAC;CACvC,CAAC;AAEF,8EAA8E;AAC9E,KAAK,eAAe,GAAG,UAAU,GAAG,MAAM,GAAG,UAAU,GAAG,MAAM,CAAC;AAEjE,KAAK,cAAc,GAAG;IAAE,QAAQ,CAAC,OAAO,EAAE,cAAc,CAAC;IAAC,QAAQ,CAAC,KAAK,EAAE,MAAM,CAAC;IAAC,QAAQ,CAAC,IAAI,EAAE,eAAe,CAAA;CAAE,CAAC;AAEnH,gEAAgE;AAChE,MAAM,MAAM,QAAQ,GAAG,CAAC,KAAK,EAAE,MAAM,EAAE,GAAG,EAAE,MAAM,KAAK,OAAO,CAAC;AAsF/D,4DAA4D;AAC5D,eAAO,MAAM,iBAAiB,GAAI,QAAQ,MAAM,EAAE,OAAO,SAAS,WAAW,EAAE,EAAE,UAAU,QAAQ,KAAG,cAAc,EAcnH,CAAC;AA0CF;;;;GAIG;AACH,eAAO,MAAM,eAAe,GAAI,MAAM,cAAc,EAAE,OAAO,cAAc,KAAG,eAAe,GAAG,SAK/F,CAAC;AAgBF,8DAA8D;AAC9D,eAAO,MAAM,eAAe,GAAI,UAAU,SAAS,cAAc,EAAE,KAAG,cAAc,EAOnF,CAAC"}

package/dist/company-names.js

@@ -0,0 +1,158 @@
+import { nameKey } from "./name-variants.js";
+import { escapeRegExp } from "./orthography.js";
+const LATIN = /\p{Script=Latin}/u;
+const LETTER = /\p{L}/u;
+/** 漢字・かなの名前に使う字。ひらがなは名前の外（の、は、まで）。 */
+const CJK_NAME = /[\p{Script=Katakana}\p{Script=Han}\p{Script=Latin}\p{N}ー・&＆]/u;
+const NOT_HAN_LETTER = /(?!\p{Script=Han})\p{L}/u;
+/** 英字の名前の一語。大文字か数字で始まる。 */
+const LATIN_WORD = /^[\p{Lu}\p{N}][\p{L}\p{N}&'’.-]*$/u;
+const AMPERSAND = "&";
+/** 形の語のすぐあとに空白一つで大文字の語が続けば、形の語は長い名前の一部（Limited Partnership、Corporation Tax）。Inc. のあとの文や行は続きでない。 */
+const CONTINUED = /^ \p{Lu}/u;
+const occurrencesOf = (source, pattern) => [...source.matchAll(new RegExp(escapeRegExp(pattern), "gu"))].map((match) => match.index);
+/** 英字の語の続き。ハイフンでつないだ語（Limited-time）も一つの語。 */
+const WORD_CONTINUES = /[\p{L}\p{N}-]/u;
+/** 英字の形の語は、語の続き（Including の Inc、Limited-time の Limited）では形の語と読まない。 */
+const standsAsWord = (source, pattern, at) => !LATIN.test(pattern) || (!LETTER.test(source.charAt(at - 1)) && !WORD_CONTINUES.test(source.charAt(at + pattern.length)));
+/** 英字の名前: 形の語の前の、大文字で始まる語の続き。頭の、固有名詞と読めない語（文頭の Contact）は外す。 */
+const latinBaseBefore = (source, end, isProper) => {
+    const before = source.slice(0, end).replace(/,?\s$/u, "");
+    const words = [...before.matchAll(/\S+/gu)].map((match) => ({ start: match.index, end: match.index + match[0].length }));
+    const isNameWord = (span) => {
+        const word = source.slice(span.start, span.end);
+        return LATIN_WORD.test(word) || word === AMPERSAND;
+    };
+    const run = words.slice(words.findLastIndex((span, index) => !isNameWord(span) || before.slice(span.end, words[index + 1]?.start ?? before.length).includes("\n")) + 1);
+    const first = run.find((span) => isProper(span.start, span.end));
+    return first === undefined ? undefined : { start: first.start, end: before.length };
+};
+const CJK_BEFORE = new RegExp(`${CJK_NAME.source}+$`, "u");
+const CJK_AFTER = new RegExp(`^${CJK_NAME.source}+`, "u");
+const SPACES = new Set([" ", "\u3000"]);
+/** 漢字・かなの名前: 形の語の隣の、名前に使う字の続き。形の語との間の空白一つは名前の外。 */
+const cjkBaseBefore = (source, end) => {
+    const stop = SPACES.has(source.charAt(end - 1)) ? end - 1 : end;
+    const match = CJK_BEFORE.exec(source.slice(0, stop));
+    return match === null ? undefined : { start: match.index, end: stop };
+};
+const cjkBaseAfter = (source, start) => {
+    const from = SPACES.has(source.charAt(start)) ? start + 1 : start;
+    const match = CJK_AFTER.exec(source.slice(from));
+    return match === null ? undefined : { start: from, end: from + match[0].length };
+};
+/** 名前の部分の字数。一字（法令の項目の印 イ、ロ）は名前と読まない。 */
+const MIN_BASE_LENGTH = 2;
+/** 名前と読めるか。二字以上で、記号で始まり終わらず、漢字だけなら固有名詞と読めるもの。 */
+const isNameBase = (source, span, isProper) => {
+    const base = source.slice(span.start, span.end);
+    if ([...base].length < MIN_BASE_LENGTH || /^[・&＆]|[・&＆]$/u.test(base))
+        return false;
+    return NOT_HAN_LETTER.test(base) || isProper(span.start, span.end);
+};
+const mentionOf = (source, base, form, group) => {
+    const position = form.start < base.start ? "before" : "after";
+    const [start, end] = [Math.min(base.start, form.start), Math.max(base.end, form.end)];
+    return { surface: source.slice(start, end), offset: start, base: source.slice(base.start, base.end), form: group, position };
+};
+const baseBefore = (source, at, latin, isProper) => latin ? latinBaseBefore(source, at, isProper) : cjkBaseBefore(source, at);
+/** 形の語の一つの現れから、会社の名前の現れ。名前が前にあればそれを、無ければ後ろを取る。 */
+const mentionAt = (source, form, at, isProper) => {
+    const formSpan = { start: at, end: at + form.pattern.length };
+    const latin = LATIN.test(form.pattern);
+    if (latin && CONTINUED.test(source.slice(formSpan.end)))
+        return undefined;
+    const before = form.position === "before" ? undefined : baseBefore(source, at, latin, isProper);
+    if (before !== undefined && isNameBase(source, before, isProper))
+        return mentionOf(source, before, formSpan, form.group);
+    const after = form.position === "after" || latin ? undefined : cjkBaseAfter(source, formSpan.end);
+    return after !== undefined && isNameBase(source, after, isProper) ? mentionOf(source, after, formSpan, form.group) : undefined;
+};
+/** 文書の中の会社の名前の現れ。長い形の語（Co., Ltd）を先に取り、その中の短い語（Ltd）は数えない。 */
+export const companyMentionsIn = (source, forms, isProper) => {
+    const taken = [];
+    return forms
+        .toSorted((left, right) => right.pattern.length - left.pattern.length)
+        .flatMap((form) => occurrencesOf(source, form.pattern).flatMap((at) => {
+        const end = at + form.pattern.length;
+        if (!standsAsWord(source, form.pattern, at) || taken.some((span) => span.start < end && at < span.end))
+            return [];
+        taken.push({ start: at, end });
+        const mention = mentionAt(source, form, at, isProper);
+        return mention === undefined ? [] : [mention];
+    }))
+        .toSorted((left, right) => left.offset - right.offset);
+};
+const MIN_SLIP_LENGTH = 7;
+const spliced = (chars, at, count) => chars.toSpliced(at, count).join("");
+const firstDifference = (left, right) => left.findIndex((char, index) => char !== right[index]);
+/** 一字の抜けなら、その字。 */
+const droppedChars = (longer, shorter) => {
+    if (longer.length !== shorter.length + 1)
+        return undefined;
+    const at = firstDifference(longer, shorter);
+    return spliced(longer, at, 1) === shorter.join("") ? [longer[at] ?? ""] : undefined;
+};
+/** 一字の置き換えか、隣どうしの入れ替えなら、その字。 */
+const replacedChars = (left, right) => {
+    const at = firstDifference(left, right);
+    const changed = [left[at] ?? "", right[at] ?? ""];
+    if (left.length !== right.length || at < 0)
+        return undefined;
+    if (spliced(left, at, 1) === spliced(right, at, 1))
+        return changed;
+    const swapped = left[at] === right[at + 1] && left[at + 1] === right[at] && spliced(left, at, 2) === spliced(right, at, 2);
+    return swapped ? changed : undefined;
+};
+/**
+ * 名前の部分が一字違いか（置き換え・抜け・隣どうしの入れ替え）。違う字が漢字なら見ない。漢字の一字違い（日本電気 と 日本電機）
+ * は別の会社のことがある。短い名前（Alpha と Alpho）も別の会社のことが多い。
+ */
+const isSlip = (left, right) => {
+    const [leftChars, rightChars] = [[...left], [...right]];
+    if (Math.min(leftChars.length, rightChars.length) < MIN_SLIP_LENGTH)
+        return false;
+    const changed = replacedChars(leftChars, rightChars) ?? droppedChars(leftChars, rightChars) ?? droppedChars(rightChars, leftChars);
+    return changed !== undefined && changed.every((char) => NOT_HAN_LETTER.test(char));
+};
+/** 名前の部分が同じ二つ。同じ形の短い書き方と長い書き方（株式会社 と (株)、Inc と Incorporated）は書き分けと見ない。 */
+const sameNameRelation = (left, right) => {
+    if (left.form !== right.form)
+        return "form";
+    if (left.position !== right.position)
+        return "position";
+    return nameKey(left.surface) === nameKey(right.surface) ? "spelling" : undefined;
+};
+/**
+ * 二つの書き方が、同じ会社を二通りに書いたものか。名前の部分が同じ（記号・幅・大小を除いて）なら、形の組か形の語の側の違い、
+ * どちらも同じなら記号・幅・大小だけの違い。名前の部分が違うのは、形も側も同じで、漢字でない字の一字違いのときだけ（Aoba Systems と
+ * Aoba System）。名前の違う会社（親会社と子会社、別の取引先）は、名前の部分が一字より多く違うので同じと見ない。
+ */
+export const companyRelation = (left, right) => {
+    if (left.surface === right.surface)
+        return undefined;
+    const [leftKey, rightKey] = [nameKey(left.base), nameKey(right.base)];
+    if (leftKey === rightKey)
+        return sameNameRelation(left, right);
+    return left.form === right.form && left.position === right.position && isSlip(leftKey, rightKey) ? "near" : undefined;
+};
+const talliesOf = (mentions) => {
+    const tallies = new Map();
+    mentions.forEach((mention) => {
+        const tally = tallies.get(mention.surface);
+        tallies.set(mention.surface, { first: tally?.first ?? mention, count: (tally?.count ?? 0) + 1 });
+    });
+    return [...tallies.values()];
+};
+/** 多いほうが先。同数なら先に書いたほう。 */
+const byUsage = (left, right) => right.count - left.count || left.first.offset - right.first.offset;
+/** 同じ会社の、少ないほうの書き方。同じ会社と言える相手のうち一番多いものと比べる。書き方ごとに最初の現れを一つ。 */
+export const companyVariants = (mentions) => {
+    const tallies = talliesOf(mentions);
+    return tallies.flatMap((tally) => {
+        const [usual] = tallies.filter((other) => other === tally || companyRelation(tally.first, other.first) !== undefined).toSorted(byUsage);
+        const kind = usual === undefined || usual === tally ? undefined : companyRelation(tally.first, usual.first);
+        return usual === undefined || kind === undefined ? [] : [{ mention: tally.first, usual: usual.first.surface, kind }];
+    });
+};
+//# sourceMappingURL=company-names.js.map

package/dist/company-names.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"company-names.js","sourceRoot":"","sources":["../src/company-names.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,OAAO,EAAE,MAAM,oBAAoB,CAAC;AAC7C,OAAO,EAAE,YAAY,EAAE,MAAM,kBAAkB,CAAC;AAyBhD,MAAM,KAAK,GAAG,mBAAmB,CAAC;AAClC,MAAM,MAAM,GAAG,QAAQ,CAAC;AACxB,sCAAsC;AACtC,MAAM,QAAQ,GAAG,+DAA+D,CAAC;AACjF,MAAM,cAAc,GAAG,0BAA0B,CAAC;AAClD,2BAA2B;AAC3B,MAAM,UAAU,GAAG,oCAAoC,CAAC;AACxD,MAAM,SAAS,GAAG,GAAG,CAAC;AACtB,mGAAmG;AACnG,MAAM,SAAS,GAAG,WAAW,CAAC;AAE9B,MAAM,aAAa,GAAG,CAAC,MAAc,EAAE,OAAe,EAAY,EAAE,CAAC,CAAC,GAAG,MAAM,CAAC,QAAQ,CAAC,IAAI,MAAM,CAAC,YAAY,CAAC,OAAO,CAAC,EAAE,IAAI,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC;AAE/J,6CAA6C;AAC7C,MAAM,cAAc,GAAG,gBAAgB,CAAC;AAExC,sEAAsE;AACtE,MAAM,YAAY,GAAG,CAAC,MAAc,EAAE,OAAe,EAAE,EAAU,EAAW,EAAE,CAC5E,CAAC,KAAK,CAAC,IAAI,CAAC,OAAO,CAAC,IAAI,CAAC,CAAC,MAAM,CAAC,IAAI,CAAC,MAAM,CAAC,MAAM,CAAC,EAAE,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,cAAc,CAAC,IAAI,CAAC,MAAM,CAAC,MAAM,CAAC,EAAE,GAAG,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC;AAI5H,+DAA+D;AAC/D,MAAM,eAAe,GAAG,CAAC,MAAc,EAAE,GAAW,EAAE,QAAkB,EAAoB,EAAE;IAC5F,MAAM,MAAM,GAAG,MAAM,CAAC,KAAK,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,OAAO,CAAC,QAAQ,EAAE,EAAE,CAAC,CAAC;IAC1D,MAAM,KAAK,GAAG,CAAC,GAAG,MAAM,CAAC,QAAQ,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,EAAQ,EAAE,CAAC,CAAC,EAAE,KAAK,EAAE,KAAK,CAAC,KAAK,EAAE,GAAG,EAAE,KAAK,CAAC,KAAK,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,EAAE,CAAC,CAAC,CAAC;IAC/H,MAAM,UAAU,GAAG,CAAC,IAAU,EAAW,EAAE;QACzC,MAAM,IAAI,GAAG,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,GAAG,CAAC,CAAC;QAChD,OAAO,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,IAAI,IAAI,KAAK,SAAS,CAAC;IACrD,CAAC,CAAC;IACF,MAAM,GAAG,GAAG,KAAK,CAAC,KAAK,CACrB,KAAK,CAAC,aAAa,CAAC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,CAAC,UAAU,CAAC,IAAI,CAAC,IAAI,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,GAAG,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC,CAAC,EAAE,KAAK,IAAI,MAAM,CAAC,MAAM,CAAC,CAAC,QAAQ,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAC/I,CAAC;IACF,MAAM,KAAK,GAAG,GAAG,CAAC,IAAI,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,QAAQ,CAAC,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC;IACjE,OAAO,KAAK,KAAK,SAAS,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,KAAK,CAAC,KAAK,EAAE,GAAG,EAAE,MAAM,CAAC,MAAM,EAAE,CAAC;AACtF,CAAC,CAAC;AAEF,MAAM,UAAU,GAAG,IAAI,MAAM,CAAC,GAAG,QAAQ,CAAC,MAAM,IAAI,EAAE,GAAG,CAAC,CAAC;AAC3D,MAAM,SAAS,GAAG,IAAI,MAAM,CAAC,IAAI,QAAQ,CAAC,MAAM,GAAG,EAAE,GAAG,CAAC,CAAC;AAC1D,MAAM,MAAM,GAAwB,IAAI,GAAG,CAAC,CAAC,GAAG,EAAE,QAAQ,CAAC,CAAC,CAAC;AAE7D,mDAAmD;AACnD,MAAM,aAAa,GAAG,CAAC,MAAc,EAAE,GAAW,EAAoB,EAAE;IACtE,MAAM,IAAI,GAAG,MAAM,CAAC,GAAG,CAAC,MAAM,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,GAAG,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC;IAChE,MAAM,KAAK,GAAG,UAAU,CAAC,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC,CAAC;IACrD,OAAO,KAAK,KAAK,IAAI,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,KAAK,CAAC,KAAK,EAAE,GAAG,EAAE,IAAI,EAAE,CAAC;AACxE,CAAC,CAAC;AAEF,MAAM,YAAY,GAAG,CAAC,MAAc,EAAE,KAAa,EAAoB,EAAE;IACvE,MAAM,IAAI,GAAG,MAAM,CAAC,GAAG,CAAC,MAAM,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC;IAClE,MAAM,KAAK,GAAG,SAAS,CAAC,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC;IACjD,OAAO,KAAK,KAAK,IAAI,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,IAAI,EAAE,GAAG,EAAE,IAAI,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,EAAE,CAAC;AACnF,CAAC,CAAC;AAEF,wCAAwC;AACxC,MAAM,eAAe,GAAG,CAAC,CAAC;AAE1B,iDAAiD;AACjD,MAAM,UAAU,GAAG,CAAC,MAAc,EAAE,IAAU,EAAE,QAAkB,EAAW,EAAE;IAC7E,MAAM,IAAI,GAAG,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,GAAG,CAAC,CAAC;IAChD,IAAI,CAAC,GAAG,IAAI,CAAC,CAAC,MAAM,GAAG,eAAe,IAAI,gBAAgB,CAAC,IAAI,CAAC,IAAI,CAAC;QAAE,OAAO,KAAK,CAAC;IACpF,OAAO,cAAc,CAAC,IAAI,CAAC,IAAI,CAAC,IAAI,QAAQ,CAAC,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,GAAG,CAAC,CAAC;AACrE,CAAC,CAAC;AAEF,MAAM,SAAS,GAAG,CAAC,MAAc,EAAE,IAAU,EAAE,IAAU,EAAE,KAAa,EAAkB,EAAE;IAC1F,MAAM,QAAQ,GAAG,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,QAAQ,CAAC,CAAC,CAAC,OAAO,CAAC;IAC9D,MAAM,CAAC,KAAK,EAAE,GAAG,CAAC,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,KAAK,CAAC,EAAE,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,GAAG,EAAE,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC;IACtF,OAAO,EAAE,OAAO,EAAE,MAAM,CAAC,KAAK,CAAC,KAAK,EAAE,GAAG,CAAC,EAAE,MAAM,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,GAAG,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE,QAAQ,EAAE,CAAC;AAC/H,CAAC,CAAC;AAEF,MAAM,UAAU,GAAG,CAAC,MAAc,EAAE,EAAU,EAAE,KAAc,EAAE,QAAkB,EAAoB,EAAE,CACtG,KAAK,CAAC,CAAC,CAAC,eAAe,CAAC,MAAM,EAAE,EAAE,EAAE,QAAQ,CAAC,CAAC,CAAC,CAAC,aAAa,CAAC,MAAM,EAAE,EAAE,CAAC,CAAC;AAE5E,kDAAkD;AAClD,MAAM,SAAS,GAAG,CAAC,MAAc,EAAE,IAAiB,EAAE,EAAU,EAAE,QAAkB,EAA8B,EAAE;IAClH,MAAM,QAAQ,GAAG,EAAE,KAAK,EAAE,EAAE,EAAE,GAAG,EAAE,EAAE,GAAG,IAAI,CAAC,OAAO,CAAC,MAAM,EAAE,CAAC;IAC9D,MAAM,KAAK,GAAG,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,OAAO,CAAC,CAAC;IACvC,IAAI,KAAK,IAAI,SAAS,CAAC,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,QAAQ,CAAC,GAAG,CAAC,CAAC;QAAE,OAAO,SAAS,CAAC;IAC1E,MAAM,MAAM,GAAG,IAAI,CAAC,QAAQ,KAAK,QAAQ,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,UAAU,CAAC,MAAM,EAAE,EAAE,EAAE,KAAK,EAAE,QAAQ,CAAC,CAAC;IAChG,IAAI,MAAM,KAAK,SAAS,IAAI,UAAU,CAAC,MAAM,EAAE,MAAM,EAAE,QAAQ,CAAC;QAAE,OAAO,SAAS,CAAC,MAAM,EAAE,MAAM,EAAE,QAAQ,EAAE,IAAI,CAAC,KAAK,CAAC,CAAC;IACzH,MAAM,KAAK,GAAG,IAAI,CAAC,QAAQ,KAAK,OAAO,IAAI,KAAK,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,YAAY,CAAC,MAAM,EAAE,QAAQ,CAAC,GAAG,CAAC,CAAC;IAClG,OAAO,KAAK,KAAK,SAAS,IAAI,UAAU,CAAC,MAAM,EAAE,KAAK,EAAE,QAAQ,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC,MAAM,EAAE,KAAK,EAAE,QAAQ,EAAE,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC;AACjI,CAAC,CAAC;AAEF,4DAA4D;AAC5D,MAAM,CAAC,MAAM,iBAAiB,GAAG,CAAC,MAAc,EAAE,KAA6B,EAAE,QAAkB,EAAoB,EAAE;IACvH,MAAM,KAAK,GAAW,EAAE,CAAC;IACzB,OAAO,KAAK;SACT,QAAQ,CAAC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,OAAO,CAAC,MAAM,GAAG,IAAI,CAAC,OAAO,CAAC,MAAM,CAAC;SACrE,OAAO,CAAC,CAAC,IAAI,EAAE,EAAE,CAChB,aAAa,CAAC,MAAM,EAAE,IAAI,CAAC,OAAO,CAAC,CAAC,OAAO,CAAC,CAAC,EAAE,EAAE,EAAE;QACjD,MAAM,GAAG,GAAG,EAAE,GAAG,IAAI,CAAC,OAAO,CAAC,MAAM,CAAC;QACrC,IAAI,CAAC,YAAY,CAAC,MAAM,EAAE,IAAI,CAAC,OAAO,EAAE,EAAE,CAAC,IAAI,KAAK,CAAC,IAAI,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,CAAC,KAAK,GAAG,GAAG,IAAI,EAAE,GAAG,IAAI,CAAC,GAAG,CAAC;YAAE,OAAO,EAAE,CAAC;QAClH,KAAK,CAAC,IAAI,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,GAAG,EAAE,CAAC,CAAC;QAC/B,MAAM,OAAO,GAAG,SAAS,CAAC,MAAM,EAAE,IAAI,EAAE,EAAE,EAAE,QAAQ,CAAC,CAAC;QACtD,OAAO,OAAO,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC;IAChD,CAAC,CAAC,CACH;SACA,QAAQ,CAAC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,IAAI,CAAC,MAAM,GAAG,KAAK,CAAC,MAAM,CAAC,CAAC;AAC3D,CAAC,CAAC;AAEF,MAAM,eAAe,GAAG,CAAC,CAAC;AAE1B,MAAM,OAAO,GAAG,CAAC,KAAwB,EAAE,EAAU,EAAE,KAAa,EAAU,EAAE,CAAC,KAAK,CAAC,SAAS,CAAC,EAAE,EAAE,KAAK,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;AACrH,MAAM,eAAe,GAAG,CAAC,IAAuB,EAAE,KAAwB,EAAU,EAAE,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,IAAI,KAAK,KAAK,CAAC,KAAK,CAAC,CAAC,CAAC;AAE9I,mBAAmB;AACnB,MAAM,YAAY,GAAG,CAAC,MAAyB,EAAE,OAA0B,EAAwB,EAAE;IACnG,IAAI,MAAM,CAAC,MAAM,KAAK,OAAO,CAAC,MAAM,GAAG,CAAC;QAAE,OAAO,SAAS,CAAC;IAC3D,MAAM,EAAE,GAAG,eAAe,CAAC,MAAM,EAAE,OAAO,CAAC,CAAC;IAC5C,OAAO,OAAO,CAAC,MAAM,EAAE,EAAE,EAAE,CAAC,CAAC,KAAK,OAAO,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,EAAE,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC;AACtF,CAAC,CAAC;AAEF,gCAAgC;AAChC,MAAM,aAAa,GAAG,CAAC,IAAuB,EAAE,KAAwB,EAAwB,EAAE;IAChG,MAAM,EAAE,GAAG,eAAe,CAAC,IAAI,EAAE,KAAK,CAAC,CAAC;IACxC,MAAM,OAAO,GAAG,CAAC,IAAI,CAAC,EAAE,CAAC,IAAI,EAAE,EAAE,KAAK,CAAC,EAAE,CAAC,IAAI,EAAE,CAAC,CAAC;IAClD,IAAI,IAAI,CAAC,MAAM,KAAK,KAAK,CAAC,MAAM,IAAI,EAAE,GAAG,CAAC;QAAE,OAAO,SAAS,CAAC;IAC7D,IAAI,OAAO,CAAC,IAAI,EAAE,EAAE,EAAE,CAAC,CAAC,KAAK,OAAO,CAAC,KAAK,EAAE,EAAE,EAAE,CAAC,CAAC;QAAE,OAAO,OAAO,CAAC;IACnE,MAAM,OAAO,GAAG,IAAI,CAAC,EAAE,CAAC,KAAK,KAAK,CAAC,EAAE,GAAG,CAAC,CAAC,IAAI,IAAI,CAAC,EAAE,GAAG,CAAC,CAAC,KAAK,KAAK,CAAC,EAAE,CAAC,IAAI,OAAO,CAAC,IAAI,EAAE,EAAE,EAAE,CAAC,CAAC,KAAK,OAAO,CAAC,KAAK,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC;IAC3H,OAAO,OAAO,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,SAAS,CAAC;AACvC,CAAC,CAAC;AAEF;;;GAGG;AACH,MAAM,MAAM,GAAG,CAAC,IAAY,EAAE,KAAa,EAAW,EAAE;IACtD,MAAM,CAAC,SAAS,EAAE,UAAU,CAAC,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,EAAE,CAAC,GAAG,KAAK,CAAC,CAAC,CAAC;IACxD,IAAI,IAAI,CAAC,GAAG,CAAC,SAAS,CAAC,MAAM,EAAE,UAAU,CAAC,MAAM,CAAC,GAAG,eAAe;QAAE,OAAO,KAAK,CAAC;IAClF,MAAM,OAAO,GAAG,aAAa,CAAC,SAAS,EAAE,UAAU,CAAC,IAAI,YAAY,CAAC,SAAS,EAAE,UAAU,CAAC,IAAI,YAAY,CAAC,UAAU,EAAE,SAAS,CAAC,CAAC;IACnI,OAAO,OAAO,KAAK,SAAS,IAAI,OAAO,CAAC,KAAK,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,cAAc,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC;AACrF,CAAC,CAAC;AAEF,0EAA0E;AAC1E,MAAM,gBAAgB,GAAG,CAAC,IAAoB,EAAE,KAAqB,EAA+B,EAAE;IACpG,IAAI,IAAI,CAAC,IAAI,KAAK,KAAK,CAAC,IAAI;QAAE,OAAO,MAAM,CAAC;IAC5C,IAAI,IAAI,CAAC,QAAQ,KAAK,KAAK,CAAC,QAAQ;QAAE,OAAO,UAAU,CAAC;IACxD,OAAO,OAAO,CAAC,IAAI,CAAC,OAAO,CAAC,KAAK,OAAO,CAAC,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,CAAC,SAAS,CAAC;AACnF,CAAC,CAAC;AAEF;;;;GAIG;AACH,MAAM,CAAC,MAAM,eAAe,GAAG,CAAC,IAAoB,EAAE,KAAqB,EAA+B,EAAE;IAC1G,IAAI,IAAI,CAAC,OAAO,KAAK,KAAK,CAAC,OAAO;QAAE,OAAO,SAAS,CAAC;IACrD,MAAM,CAAC,OAAO,EAAE,QAAQ,CAAC,GAAG,CAAC,OAAO,CAAC,IAAI,CAAC,IAAI,CAAC,EAAE,OAAO,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC;IACtE,IAAI,OAAO,KAAK,QAAQ;QAAE,OAAO,gBAAgB,CAAC,IAAI,EAAE,KAAK,CAAC,CAAC;IAC/D,OAAO,IAAI,CAAC,IAAI,KAAK,KAAK,CAAC,IAAI,IAAI,IAAI,CAAC,QAAQ,KAAK,KAAK,CAAC,QAAQ,IAAI,MAAM,CAAC,OAAO,EAAE,QAAQ,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,SAAS,CAAC;AACxH,CAAC,CAAC;AAIF,MAAM,SAAS,GAAG,CAAC,QAAmC,EAAW,EAAE;IACjE,MAAM,OAAO,GAAG,IAAI,GAAG,EAAiB,CAAC;IACzC,QAAQ,CAAC,OAAO,CAAC,CAAC,OAAO,EAAE,EAAE;QAC3B,MAAM,KAAK,GAAG,OAAO,CAAC,GAAG,CAAC,OAAO,CAAC,OAAO,CAAC,CAAC;QAC3C,OAAO,CAAC,GAAG,CAAC,OAAO,CAAC,OAAO,EAAE,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,IAAI,OAAO,EAAE,KAAK,EAAE,CAAC,KAAK,EAAE,KAAK,IAAI,CAAC,CAAC,GAAG,CAAC,EAAE,CAAC,CAAC;IACnG,CAAC,CAAC,CAAC;IACH,OAAO,CAAC,GAAG,OAAO,CAAC,MAAM,EAAE,CAAC,CAAC;AAC/B,CAAC,CAAC;AAEF,0BAA0B;AAC1B,MAAM,OAAO,GAAG,CAAC,IAAW,EAAE,KAAY,EAAU,EAAE,CAAC,KAAK,CAAC,KAAK,GAAG,IAAI,CAAC,KAAK,IAAI,IAAI,CAAC,KAAK,CAAC,MAAM,GAAG,KAAK,CAAC,KAAK,CAAC,MAAM,CAAC;AAE1H,8DAA8D;AAC9D,MAAM,CAAC,MAAM,eAAe,GAAG,CAAC,QAAmC,EAAoB,EAAE;IACvF,MAAM,OAAO,GAAG,SAAS,CAAC,QAAQ,CAAC,CAAC;IACpC,OAAO,OAAO,CAAC,OAAO,CAAC,CAAC,KAAK,EAAE,EAAE;QAC/B,MAAM,CAAC,KAAK,CAAC,GAAG,OAAO,CAAC,MAAM,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,KAAK,KAAK,IAAI,eAAe,CAAC,KAAK,CAAC,KAAK,EAAE,KAAK,CAAC,KAAK,CAAC,KAAK,SAAS,CAAC,CAAC,QAAQ,CAAC,OAAO,CAAC,CAAC;QACxI,MAAM,IAAI,GAAG,KAAK,KAAK,SAAS,IAAI,KAAK,KAAK,KAAK,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,eAAe,CAAC,KAAK,CAAC,KAAK,EAAE,KAAK,CAAC,KAAK,CAAC,CAAC;QAC5G,OAAO,KAAK,KAAK,SAAS,IAAI,IAAI,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,EAAE,OAAO,EAAE,KAAK,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC,KAAK,CAAC,OAAO,EAAE,IAAI,EAAE,CAAC,CAAC;IACvH,CAAC,CAAC,CAAC;AACL,CAAC,CAAC"}

package/dist/default-values.d.ts

@@ -0,0 +1,17 @@
+/** A default that disagrees with the one the code (or else a table) states. */
+export type DefaultSlip = {
+    readonly name: string;
+    readonly value: string;
+    readonly offset: number;
+    readonly expected: string;
+};
+export type DefaultWords = {
+    readonly headers: readonly string[];
+    readonly phrases: readonly string[];
+};
+/**
+ * Every stated default that differs from the name's most authoritative statement (the code, else a table). Two
+ * sentences that disagree with no code or table to settle it are left alone.
+ */
+export declare const defaultSlips: (source: string, words: DefaultWords) => DefaultSlip[];
+//# sourceMappingURL=default-values.d.ts.map

package/dist/default-values.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"default-values.d.ts","sourceRoot":"","sources":["../src/default-values.ts"],"names":[],"mappings":"AASA,+EAA+E;AAC/E,MAAM,MAAM,WAAW,GAAG;IAAE,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAC;IAAC,QAAQ,CAAC,KAAK,EAAE,MAAM,CAAC;IAAC,QAAQ,CAAC,MAAM,EAAE,MAAM,CAAC;IAAC,QAAQ,CAAC,QAAQ,EAAE,MAAM,CAAA;CAAE,CAAC;AAEhI,MAAM,MAAM,YAAY,GAAG;IAAE,QAAQ,CAAC,OAAO,EAAE,SAAS,MAAM,EAAE,CAAC;IAAC,QAAQ,CAAC,OAAO,EAAE,SAAS,MAAM,EAAE,CAAA;CAAE,CAAC;AA+HxG;;;GAGG;AACH,eAAO,MAAM,YAAY,GAAI,QAAQ,MAAM,EAAE,OAAO,YAAY,KAAG,WAAW,EAc7E,CAAC"}