@stevenvo780/st-lang 3.2.2 → 4.0.0

package/dist/fol-prover/resolve.js

@@ -0,0 +1,234 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.resolve = resolve;
+exports.resolveWithRecord = resolveWithRecord;
+exports.runResolutionLoop = runResolutionLoop;
+const unify_1 = require("./unify");
+let GLOBAL_RENAME_COUNTER = 0;
+function freshenClause(c) {
+    const suffix = `_${GLOBAL_RENAME_COUNTER++}`;
+    const seen = new Map();
+    const renameTerm = (t) => {
+        if (t.kind === 'var') {
+            let nn = seen.get(t.name);
+            if (nn === undefined) {
+                nn = `${t.name}${suffix}`;
+                seen.set(t.name, nn);
+            }
+            return { kind: 'var', name: nn };
+        }
+        if (t.kind === 'const')
+            return t;
+        return { kind: 'func', name: t.name, args: (t.args ?? []).map(renameTerm) };
+    };
+    return c.map((l) => ({
+        negated: l.negated,
+        predicate: l.predicate,
+        args: l.args.map(renameTerm),
+    }));
+}
+function resolve(c1Raw, c2Raw) {
+    const c1 = freshenClause(c1Raw);
+    const c2 = freshenClause(c2Raw);
+    const out = [];
+    for (let i = 0; i < c1.length; i++) {
+        for (let j = 0; j < c2.length; j++) {
+            const l1 = c1[i];
+            const l2 = c2[j];
+            if (l1 === undefined || l2 === undefined)
+                continue;
+            if (l1.negated === l2.negated)
+                continue;
+            if (l1.predicate !== l2.predicate)
+                continue;
+            if (l1.args.length !== l2.args.length)
+                continue;
+            const s = new Map();
+            let ok = true;
+            for (let k = 0; k < l1.args.length; k++) {
+                const a = l1.args[k];
+                const b = l2.args[k];
+                if (a === undefined || b === undefined) {
+                    ok = false;
+                    break;
+                }
+                const r = (0, unify_1.unify)(a, b, s);
+                if (r === null) {
+                    ok = false;
+                    break;
+                }
+            }
+            if (!ok)
+                continue;
+            const rest1 = c1.filter((_, k) => k !== i).map((l) => (0, unify_1.applyLiteral)(l, s));
+            const rest2 = c2.filter((_, k) => k !== j).map((l) => (0, unify_1.applyLiteral)(l, s));
+            const merged = factor([...rest1, ...rest2]);
+            out.push(merged);
+        }
+    }
+    return out;
+}
+function factor(c) {
+    const seen = new Set();
+    const out = [];
+    for (const lit of c) {
+        const key = literalKey(lit);
+        if (seen.has(key))
+            continue;
+        seen.add(key);
+        out.push(lit);
+    }
+    return out;
+}
+function termKey(t) {
+    if (t.kind === 'var')
+        return `?${t.name}`;
+    if (t.kind === 'const')
+        return `#${t.name}`;
+    return `${t.name}(${(t.args ?? []).map(termKey).join(',')})`;
+}
+function literalKey(lit) {
+    const args = lit.args.map(termKey).join(',');
+    return `${lit.negated ? '!' : ''}${lit.predicate}(${args})`;
+}
+function clauseKey(c) {
+    return c.map(literalKey).sort().join('|');
+}
+function isTautology(c) {
+    for (let i = 0; i < c.length; i++) {
+        for (let j = i + 1; j < c.length; j++) {
+            const li = c[i];
+            const lj = c[j];
+            if (li === undefined || lj === undefined)
+                continue;
+            if (li.negated === lj.negated)
+                continue;
+            if (li.predicate !== lj.predicate)
+                continue;
+            if (li.args.length !== lj.args.length)
+                continue;
+            let same = true;
+            for (let k = 0; k < li.args.length; k++) {
+                const a = li.args[k];
+                const b = lj.args[k];
+                if (a === undefined || b === undefined) {
+                    same = false;
+                    break;
+                }
+                if (termKey(a) !== termKey(b)) {
+                    same = false;
+                    break;
+                }
+            }
+            if (same)
+                return true;
+        }
+    }
+    return false;
+}
+function resolveWithRecord(input) {
+    const c1 = freshenClause(input.c1);
+    const c2 = freshenClause(input.c2);
+    const out = [];
+    for (let i = 0; i < c1.length; i++) {
+        for (let j = 0; j < c2.length; j++) {
+            const l1 = c1[i];
+            const l2 = c2[j];
+            if (l1 === undefined || l2 === undefined)
+                continue;
+            if (l1.negated === l2.negated)
+                continue;
+            if (l1.predicate !== l2.predicate)
+                continue;
+            if (l1.args.length !== l2.args.length)
+                continue;
+            const s = new Map();
+            let ok = true;
+            for (let k = 0; k < l1.args.length; k++) {
+                const a = l1.args[k];
+                const b = l2.args[k];
+                if (a === undefined || b === undefined) {
+                    ok = false;
+                    break;
+                }
+                const r = (0, unify_1.unify)(a, b, s);
+                if (r === null) {
+                    ok = false;
+                    break;
+                }
+            }
+            if (!ok)
+                continue;
+            const rest1 = c1.filter((_, k) => k !== i).map((l) => (0, unify_1.applyLiteral)(l, s));
+            const rest2 = c2.filter((_, k) => k !== j).map((l) => (0, unify_1.applyLiteral)(l, s));
+            const merged = factor([...rest1, ...rest2]);
+            out.push({
+                from: [input.c1Idx, input.c2Idx],
+                resolvent: merged,
+                substitution: (0, unify_1.substToRecord)(s),
+            });
+        }
+    }
+    return out;
+}
+function runResolutionLoop(params) {
+    const all = [];
+    const seen = new Set();
+    const addClause = (c) => {
+        if (isTautology(c))
+            return -1;
+        const key = clauseKey(c);
+        if (seen.has(key)) {
+            return all.findIndex((existing) => clauseKey(existing) === key);
+        }
+        seen.add(key);
+        all.push(c);
+        return all.length - 1;
+    };
+    for (const p of params.premiseClauses)
+        addClause(p);
+    for (const g of params.negatedGoalClauses)
+        addClause(g);
+    const steps = [];
+    const startedAt = Date.now();
+    let cursor = 0;
+    for (let step = 0; step < params.maxSteps; step++) {
+        if (Date.now() - startedAt > params.timeoutMs) {
+            return { proven: false, steps, timeoutHit: true };
+        }
+        if (cursor >= all.length) {
+            return { proven: false, steps, timeoutHit: false, reason: 'saturated' };
+        }
+        const ci = all[cursor];
+        if (ci === undefined) {
+            cursor++;
+            continue;
+        }
+        for (let j = 0; j < cursor; j++) {
+            if (Date.now() - startedAt > params.timeoutMs) {
+                return { proven: false, steps, timeoutHit: true };
+            }
+            const cj = all[j];
+            if (cj === undefined)
+                continue;
+            const results = resolveWithRecord({ c1Idx: cursor, c2Idx: j, c1: ci, c2: cj });
+            for (const r of results) {
+                if (r.resolvent.length === 0) {
+                    steps.push(r);
+                    return { proven: true, steps, timeoutHit: false };
+                }
+                const before = all.length;
+                const newIdx = addClause(r.resolvent);
+                if (newIdx >= 0 && newIdx >= before) {
+                    steps.push({ from: r.from, resolvent: r.resolvent, substitution: r.substitution });
+                    if (steps.length >= params.maxSteps) {
+                        return { proven: false, steps, timeoutHit: false, reason: 'max-steps' };
+                    }
+                }
+            }
+        }
+        cursor++;
+    }
+    return { proven: false, steps, timeoutHit: false, reason: 'max-steps' };
+}
+//# sourceMappingURL=resolve.js.map

package/dist/fol-prover/resolve.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"resolve.js","sourceRoot":"","sources":["../../src/fol-prover/resolve.ts"],"names":[],"mappings":";;AA2BA,0BAmCC;AAsED,8CAuCC;AAED,8CAoEC;AAhPD,mCAA6D;AAE7D,IAAI,qBAAqB,GAAG,CAAC,CAAC;AAE9B,SAAS,aAAa,CAAC,CAAY;IACjC,MAAM,MAAM,GAAG,IAAI,qBAAqB,EAAE,EAAE,CAAC;IAC7C,MAAM,IAAI,GAAG,IAAI,GAAG,EAAkB,CAAC;IACvC,MAAM,UAAU,GAAG,CAAC,CAAU,EAAW,EAAE;QACzC,IAAI,CAAC,CAAC,IAAI,KAAK,KAAK,EAAE,CAAC;YACrB,IAAI,EAAE,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;YAC1B,IAAI,EAAE,KAAK,SAAS,EAAE,CAAC;gBACrB,EAAE,GAAG,GAAG,CAAC,CAAC,IAAI,GAAG,MAAM,EAAE,CAAC;gBAC1B,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC;YACvB,CAAC;YACD,OAAO,EAAE,IAAI,EAAE,KAAK,EAAE,IAAI,EAAE,EAAE,EAAE,CAAC;QACnC,CAAC;QACD,IAAI,CAAC,CAAC,IAAI,KAAK,OAAO;YAAE,OAAO,CAAC,CAAC;QACjC,OAAO,EAAE,IAAI,EAAE,MAAM,EAAE,IAAI,EAAE,CAAC,CAAC,IAAI,EAAE,IAAI,EAAE,CAAC,CAAC,CAAC,IAAI,IAAI,EAAE,CAAC,CAAC,GAAG,CAAC,UAAU,CAAC,EAAE,CAAC;IAC9E,CAAC,CAAC;IACF,OAAO,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC;QACnB,OAAO,EAAE,CAAC,CAAC,OAAO;QAClB,SAAS,EAAE,CAAC,CAAC,SAAS;QACtB,IAAI,EAAE,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,UAAU,CAAC;KAC7B,CAAC,CAAC,CAAC;AACN,CAAC;AAED,SAAgB,OAAO,CAAC,KAAgB,EAAE,KAAgB;IACxD,MAAM,EAAE,GAAG,aAAa,CAAC,KAAK,CAAC,CAAC;IAChC,MAAM,EAAE,GAAG,aAAa,CAAC,KAAK,CAAC,CAAC;IAChC,MAAM,GAAG,GAAgB,EAAE,CAAC;IAC5B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;QACnC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;YACnC,MAAM,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC;YACjB,MAAM,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC;YACjB,IAAI,EAAE,KAAK,SAAS,IAAI,EAAE,KAAK,SAAS;gBAAE,SAAS;YACnD,IAAI,EAAE,CAAC,OAAO,KAAK,EAAE,CAAC,OAAO;gBAAE,SAAS;YACxC,IAAI,EAAE,CAAC,SAAS,KAAK,EAAE,CAAC,SAAS;gBAAE,SAAS;YAC5C,IAAI,EAAE,CAAC,IAAI,CAAC,MAAM,KAAK,EAAE,CAAC,IAAI,CAAC,MAAM;gBAAE,SAAS;YAChD,MAAM,CAAC,GAAG,IAAI,GAAG,EAAmB,CAAC;YACrC,IAAI,EAAE,GAAG,IAAI,CAAC;YACd,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;gBACxC,MAAM,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;gBACrB,MAAM,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;gBACrB,IAAI,CAAC,KAAK,SAAS,IAAI,CAAC,KAAK,SAAS,EAAE,CAAC;oBACvC,EAAE,GAAG,KAAK,CAAC;oBACX,MAAM;gBACR,CAAC;gBACD,MAAM,CAAC,GAAG,IAAA,aAAK,EAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;gBACzB,IAAI,CAAC,KAAK,IAAI,EAAE,CAAC;oBACf,EAAE,GAAG,KAAK,CAAC;oBACX,MAAM;gBACR,CAAC;YACH,CAAC;YACD,IAAI,CAAC,EAAE;gBAAE,SAAS;YAClB,MAAM,KAAK,GAAG,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,oBAAY,EAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;YAC1E,MAAM,KAAK,GAAG,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,oBAAY,EAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;YAC1E,MAAM,MAAM,GAAG,MAAM,CAAC,CAAC,GAAG,KAAK,EAAE,GAAG,KAAK,CAAC,CAAC,CAAC;YAC5C,GAAG,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC;QACnB,CAAC;IACH,CAAC;IACD,OAAO,GAAG,CAAC;AACb,CAAC;AAED,SAAS,MAAM,CAAC,CAAY;IAC1B,MAAM,IAAI,GAAG,IAAI,GAAG,EAAU,CAAC;IAC/B,MAAM,GAAG,GAAc,EAAE,CAAC;IAC1B,KAAK,MAAM,GAAG,IAAI,CAAC,EAAE,CAAC;QACpB,MAAM,GAAG,GAAG,UAAU,CAAC,GAAG,CAAC,CAAC;QAC5B,IAAI,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC;YAAE,SAAS;QAC5B,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC;QACd,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IAChB,CAAC;IACD,OAAO,GAAG,CAAC;AACb,CAAC;AAED,SAAS,OAAO,CAAC,CAAU;IACzB,IAAI,CAAC,CAAC,IAAI,KAAK,KAAK;QAAE,OAAO,IAAI,CAAC,CAAC,IAAI,EAAE,CAAC;IAC1C,IAAI,CAAC,CAAC,IAAI,KAAK,OAAO;QAAE,OAAO,IAAI,CAAC,CAAC,IAAI,EAAE,CAAC;IAC5C,OAAO,GAAG,CAAC,CAAC,IAAI,IAAI,CAAC,CAAC,CAAC,IAAI,IAAI,EAAE,CAAC,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC;AAC/D,CAAC;AAED,SAAS,UAAU,CAAC,GAAe;IACjC,MAAM,IAAI,GAAG,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IAC7C,OAAO,GAAG,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,GAAG,GAAG,CAAC,SAAS,IAAI,IAAI,GAAG,CAAC;AAC9D,CAAC;AAED,SAAS,SAAS,CAAC,CAAY;IAC7B,OAAO,CAAC,CAAC,GAAG,CAAC,UAAU,CAAC,CAAC,IAAI,EAAE,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;AAC5C,CAAC;AAED,SAAS,WAAW,CAAC,CAAY;IAC/B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;QAClC,KAAK,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;YACtC,MAAM,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;YAChB,MAAM,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;YAChB,IAAI,EAAE,KAAK,SAAS,IAAI,EAAE,KAAK,SAAS;gBAAE,SAAS;YACnD,IAAI,EAAE,CAAC,OAAO,KAAK,EAAE,CAAC,OAAO;gBAAE,SAAS;YACxC,IAAI,EAAE,CAAC,SAAS,KAAK,EAAE,CAAC,SAAS;gBAAE,SAAS;YAC5C,IAAI,EAAE,CAAC,IAAI,CAAC,MAAM,KAAK,EAAE,CAAC,IAAI,CAAC,MAAM;gBAAE,SAAS;YAChD,IAAI,IAAI,GAAG,IAAI,CAAC;YAChB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;gBACxC,MAAM,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;gBACrB,MAAM,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;gBACrB,IAAI,CAAC,KAAK,SAAS,IAAI,CAAC,KAAK,SAAS,EAAE,CAAC;oBACvC,IAAI,GAAG,KAAK,CAAC;oBACb,MAAM;gBACR,CAAC;gBACD,IAAI,OAAO,CAAC,CAAC,CAAC,KAAK,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC;oBAC9B,IAAI,GAAG,KAAK,CAAC;oBACb,MAAM;gBACR,CAAC;YACH,CAAC;YACD,IAAI,IAAI;gBAAE,OAAO,IAAI,CAAC;QACxB,CAAC;IACH,CAAC;IACD,OAAO,KAAK,CAAC;AACf,CAAC;AAeD,SAAgB,iBAAiB,CAAC,KAA6B;IAC7D,MAAM,EAAE,GAAG,aAAa,CAAC,KAAK,CAAC,EAAE,CAAC,CAAC;IACnC,MAAM,EAAE,GAAG,aAAa,CAAC,KAAK,CAAC,EAAE,CAAC,CAAC;IACnC,MAAM,GAAG,GAA6B,EAAE,CAAC;IACzC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;QACnC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;YACnC,MAAM,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC;YACjB,MAAM,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC;YACjB,IAAI,EAAE,KAAK,SAAS,IAAI,EAAE,KAAK,SAAS;gBAAE,SAAS;YACnD,IAAI,EAAE,CAAC,OAAO,KAAK,EAAE,CAAC,OAAO;gBAAE,SAAS;YACxC,IAAI,EAAE,CAAC,SAAS,KAAK,EAAE,CAAC,SAAS;gBAAE,SAAS;YAC5C,IAAI,EAAE,CAAC,IAAI,CAAC,MAAM,KAAK,EAAE,CAAC,IAAI,CAAC,MAAM;gBAAE,SAAS;YAChD,MAAM,CAAC,GAAG,IAAI,GAAG,EAAmB,CAAC;YACrC,IAAI,EAAE,GAAG,IAAI,CAAC;YACd,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;gBACxC,MAAM,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;gBACrB,MAAM,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;gBACrB,IAAI,CAAC,KAAK,SAAS,IAAI,CAAC,KAAK,SAAS,EAAE,CAAC;oBACvC,EAAE,GAAG,KAAK,CAAC;oBACX,MAAM;gBACR,CAAC;gBACD,MAAM,CAAC,GAAG,IAAA,aAAK,EAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;gBACzB,IAAI,CAAC,KAAK,IAAI,EAAE,CAAC;oBACf,EAAE,GAAG,KAAK,CAAC;oBACX,MAAM;gBACR,CAAC;YACH,CAAC;YACD,IAAI,CAAC,EAAE;gBAAE,SAAS;YAClB,MAAM,KAAK,GAAG,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,oBAAY,EAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;YAC1E,MAAM,KAAK,GAAG,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,oBAAY,EAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;YAC1E,MAAM,MAAM,GAAG,MAAM,CAAC,CAAC,GAAG,KAAK,EAAE,GAAG,KAAK,CAAC,CAAC,CAAC;YAC5C,GAAG,CAAC,IAAI,CAAC;gBACP,IAAI,EAAE,CAAC,KAAK,CAAC,KAAK,EAAE,KAAK,CAAC,KAAK,CAAC;gBAChC,SAAS,EAAE,MAAM;gBACjB,YAAY,EAAE,IAAA,qBAAa,EAAC,CAAC,CAAC;aAC/B,CAAC,CAAC;QACL,CAAC;IACH,CAAC;IACD,OAAO,GAAG,CAAC;AACb,CAAC;AAED,SAAgB,iBAAiB,CAAC,MAKjC;IAMC,MAAM,GAAG,GAAgB,EAAE,CAAC;IAC5B,MAAM,IAAI,GAAG,IAAI,GAAG,EAAU,CAAC;IAC/B,MAAM,SAAS,GAAG,CAAC,CAAY,EAAU,EAAE;QACzC,IAAI,WAAW,CAAC,CAAC,CAAC;YAAE,OAAO,CAAC,CAAC,CAAC;QAC9B,MAAM,GAAG,GAAG,SAAS,CAAC,CAAC,CAAC,CAAC;QACzB,IAAI,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,EAAE,CAAC;YAClB,OAAO,GAAG,CAAC,SAAS,CAAC,CAAC,QAAQ,EAAE,EAAE,CAAC,SAAS,CAAC,QAAQ,CAAC,KAAK,GAAG,CAAC,CAAC;QAClE,CAAC;QACD,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC;QACd,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;QACZ,OAAO,GAAG,CAAC,MAAM,GAAG,CAAC,CAAC;IACxB,CAAC,CAAC;IAEF,KAAK,MAAM,CAAC,IAAI,MAAM,CAAC,cAAc;QAAE,SAAS,CAAC,CAAC,CAAC,CAAC;IACpD,KAAK,MAAM,CAAC,IAAI,MAAM,CAAC,kBAAkB;QAAE,SAAS,CAAC,CAAC,CAAC,CAAC;IAExD,MAAM,KAAK,GAA6B,EAAE,CAAC;IAC3C,MAAM,SAAS,GAAG,IAAI,CAAC,GAAG,EAAE,CAAC;IAC7B,IAAI,MAAM,GAAG,CAAC,CAAC;IAEf,KAAK,IAAI,IAAI,GAAG,CAAC,EAAE,IAAI,GAAG,MAAM,CAAC,QAAQ,EAAE,IAAI,EAAE,EAAE,CAAC;QAClD,IAAI,IAAI,CAAC,GAAG,EAAE,GAAG,SAAS,GAAG,MAAM,CAAC,SAAS,EAAE,CAAC;YAC9C,OAAO,EAAE,MAAM,EAAE,KAAK,EAAE,KAAK,EAAE,UAAU,EAAE,IAAI,EAAE,CAAC;QACpD,CAAC;QACD,IAAI,MAAM,IAAI,GAAG,CAAC,MAAM,EAAE,CAAC;YACzB,OAAO,EAAE,MAAM,EAAE,KAAK,EAAE,KAAK,EAAE,UAAU,EAAE,KAAK,EAAE,MAAM,EAAE,WAAW,EAAE,CAAC;QAC1E,CAAC;QACD,MAAM,EAAE,GAAG,GAAG,CAAC,MAAM,CAAC,CAAC;QACvB,IAAI,EAAE,KAAK,SAAS,EAAE,CAAC;YACrB,MAAM,EAAE,CAAC;YACT,SAAS;QACX,CAAC;QACD,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;YAChC,IAAI,IAAI,CAAC,GAAG,EAAE,GAAG,SAAS,GAAG,MAAM,CAAC,SAAS,EAAE,CAAC;gBAC9C,OAAO,EAAE,MAAM,EAAE,KAAK,EAAE,KAAK,EAAE,UAAU,EAAE,IAAI,EAAE,CAAC;YACpD,CAAC;YACD,MAAM,EAAE,GAAG,GAAG,CAAC,CAAC,CAAC,CAAC;YAClB,IAAI,EAAE,KAAK,SAAS;gBAAE,SAAS;YAC/B,MAAM,OAAO,GAAG,iBAAiB,CAAC,EAAE,KAAK,EAAE,MAAM,EAAE,KAAK,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;YAC/E,KAAK,MAAM,CAAC,IAAI,OAAO,EAAE,CAAC;gBACxB,IAAI,CAAC,CAAC,SAAS,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;oBAC7B,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;oBACd,OAAO,EAAE,MAAM,EAAE,IAAI,EAAE,KAAK,EAAE,UAAU,EAAE,KAAK,EAAE,CAAC;gBACpD,CAAC;gBACD,MAAM,MAAM,GAAG,GAAG,CAAC,MAAM,CAAC;gBAC1B,MAAM,MAAM,GAAG,SAAS,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC;gBACtC,IAAI,MAAM,IAAI,CAAC,IAAI,MAAM,IAAI,MAAM,EAAE,CAAC;oBACpC,KAAK,CAAC,IAAI,CAAC,EAAE,IAAI,EAAE,CAAC,CAAC,IAAI,EAAE,SAAS,EAAE,CAAC,CAAC,SAAS,EAAE,YAAY,EAAE,CAAC,CAAC,YAAY,EAAE,CAAC,CAAC;oBACnF,IAAI,KAAK,CAAC,MAAM,IAAI,MAAM,CAAC,QAAQ,EAAE,CAAC;wBACpC,OAAO,EAAE,MAAM,EAAE,KAAK,EAAE,KAAK,EAAE,UAAU,EAAE,KAAK,EAAE,MAAM,EAAE,WAAW,EAAE,CAAC;oBAC1E,CAAC;gBACH,CAAC;YACH,CAAC;QACH,CAAC;QACD,MAAM,EAAE,CAAC;IACX,CAAC;IACD,OAAO,EAAE,MAAM,EAAE,KAAK,EAAE,KAAK,EAAE,UAAU,EAAE,KAAK,EAAE,MAAM,EAAE,WAAW,EAAE,CAAC;AAC1E,CAAC"}

package/dist/fol-prover/types.d.ts

@@ -0,0 +1,34 @@
+export interface FOLTerm {
+    kind: 'var' | 'const' | 'func';
+    name: string;
+    args?: FOLTerm[];
+}
+export interface FOLLiteral {
+    negated: boolean;
+    predicate: string;
+    args: FOLTerm[];
+}
+export type FOLClause = FOLLiteral[];
+export interface FOLResolutionStep {
+    from: [number, number];
+    resolvent: FOLClause;
+    substitution: Record<string, string>;
+}
+export interface FOLProveResult {
+    proven: boolean;
+    steps: FOLResolutionStep[];
+    timeoutHit?: boolean;
+    reason?: string;
+}
+export interface FOLProveOptions {
+    timeoutMs?: number;
+    maxSteps?: number;
+}
+export declare function mkVar(name: string): FOLTerm;
+export declare function mkConst(name: string): FOLTerm;
+export declare function mkFunc(name: string, args: FOLTerm[]): FOLTerm;
+export declare function mkLit(negated: boolean, predicate: string, args: FOLTerm[]): FOLLiteral;
+export declare function termToString(t: FOLTerm): string;
+export declare function literalToString(lit: FOLLiteral): string;
+export declare function clauseToString(c: FOLClause): string;
+//# sourceMappingURL=types.d.ts.map

package/dist/fol-prover/types.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"types.d.ts","sourceRoot":"","sources":["../../src/fol-prover/types.ts"],"names":[],"mappings":"AAAA,MAAM,WAAW,OAAO;IACtB,IAAI,EAAE,KAAK,GAAG,OAAO,GAAG,MAAM,CAAC;IAC/B,IAAI,EAAE,MAAM,CAAC;IACb,IAAI,CAAC,EAAE,OAAO,EAAE,CAAC;CAClB;AAED,MAAM,WAAW,UAAU;IACzB,OAAO,EAAE,OAAO,CAAC;IACjB,SAAS,EAAE,MAAM,CAAC;IAClB,IAAI,EAAE,OAAO,EAAE,CAAC;CACjB;AAED,MAAM,MAAM,SAAS,GAAG,UAAU,EAAE,CAAC;AAErC,MAAM,WAAW,iBAAiB;IAChC,IAAI,EAAE,CAAC,MAAM,EAAE,MAAM,CAAC,CAAC;IACvB,SAAS,EAAE,SAAS,CAAC;IACrB,YAAY,EAAE,MAAM,CAAC,MAAM,EAAE,MAAM,CAAC,CAAC;CACtC;AAED,MAAM,WAAW,cAAc;IAC7B,MAAM,EAAE,OAAO,CAAC;IAChB,KAAK,EAAE,iBAAiB,EAAE,CAAC;IAC3B,UAAU,CAAC,EAAE,OAAO,CAAC;IACrB,MAAM,CAAC,EAAE,MAAM,CAAC;CACjB;AAED,MAAM,WAAW,eAAe;IAC9B,SAAS,CAAC,EAAE,MAAM,CAAC;IACnB,QAAQ,CAAC,EAAE,MAAM,CAAC;CACnB;AAED,wBAAgB,KAAK,CAAC,IAAI,EAAE,MAAM,GAAG,OAAO,CAE3C;AAED,wBAAgB,OAAO,CAAC,IAAI,EAAE,MAAM,GAAG,OAAO,CAE7C;AAED,wBAAgB,MAAM,CAAC,IAAI,EAAE,MAAM,EAAE,IAAI,EAAE,OAAO,EAAE,GAAG,OAAO,CAE7D;AAED,wBAAgB,KAAK,CAAC,OAAO,EAAE,OAAO,EAAE,SAAS,EAAE,MAAM,EAAE,IAAI,EAAE,OAAO,EAAE,GAAG,UAAU,CAEtF;AAED,wBAAgB,YAAY,CAAC,CAAC,EAAE,OAAO,GAAG,MAAM,CAI/C;AAED,wBAAgB,eAAe,CAAC,GAAG,EAAE,UAAU,GAAG,MAAM,CAIvD;AAED,wBAAgB,cAAc,CAAC,CAAC,EAAE,SAAS,GAAG,MAAM,CAGnD"}

package/dist/fol-prover/types.js

@@ -0,0 +1,38 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.mkVar = mkVar;
+exports.mkConst = mkConst;
+exports.mkFunc = mkFunc;
+exports.mkLit = mkLit;
+exports.termToString = termToString;
+exports.literalToString = literalToString;
+exports.clauseToString = clauseToString;
+function mkVar(name) {
+    return { kind: 'var', name };
+}
+function mkConst(name) {
+    return { kind: 'const', name };
+}
+function mkFunc(name, args) {
+    return { kind: 'func', name, args };
+}
+function mkLit(negated, predicate, args) {
+    return { negated, predicate, args };
+}
+function termToString(t) {
+    if (t.kind === 'var' || t.kind === 'const')
+        return t.name;
+    const args = (t.args ?? []).map(termToString).join(',');
+    return `${t.name}(${args})`;
+}
+function literalToString(lit) {
+    const args = lit.args.map(termToString).join(',');
+    const head = `${lit.predicate}(${args})`;
+    return lit.negated ? `¬${head}` : head;
+}
+function clauseToString(c) {
+    if (c.length === 0)
+        return '⊥';
+    return c.map(literalToString).join(' ∨ ');
+}
+//# sourceMappingURL=types.js.map

package/dist/fol-prover/types.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"types.js","sourceRoot":"","sources":["../../src/fol-prover/types.ts"],"names":[],"mappings":";;AAgCA,sBAEC;AAED,0BAEC;AAED,wBAEC;AAED,sBAEC;AAED,oCAIC;AAED,0CAIC;AAED,wCAGC;AA/BD,SAAgB,KAAK,CAAC,IAAY;IAChC,OAAO,EAAE,IAAI,EAAE,KAAK,EAAE,IAAI,EAAE,CAAC;AAC/B,CAAC;AAED,SAAgB,OAAO,CAAC,IAAY;IAClC,OAAO,EAAE,IAAI,EAAE,OAAO,EAAE,IAAI,EAAE,CAAC;AACjC,CAAC;AAED,SAAgB,MAAM,CAAC,IAAY,EAAE,IAAe;IAClD,OAAO,EAAE,IAAI,EAAE,MAAM,EAAE,IAAI,EAAE,IAAI,EAAE,CAAC;AACtC,CAAC;AAED,SAAgB,KAAK,CAAC,OAAgB,EAAE,SAAiB,EAAE,IAAe;IACxE,OAAO,EAAE,OAAO,EAAE,SAAS,EAAE,IAAI,EAAE,CAAC;AACtC,CAAC;AAED,SAAgB,YAAY,CAAC,CAAU;IACrC,IAAI,CAAC,CAAC,IAAI,KAAK,KAAK,IAAI,CAAC,CAAC,IAAI,KAAK,OAAO;QAAE,OAAO,CAAC,CAAC,IAAI,CAAC;IAC1D,MAAM,IAAI,GAAG,CAAC,CAAC,CAAC,IAAI,IAAI,EAAE,CAAC,CAAC,GAAG,CAAC,YAAY,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IACxD,OAAO,GAAG,CAAC,CAAC,IAAI,IAAI,IAAI,GAAG,CAAC;AAC9B,CAAC;AAED,SAAgB,eAAe,CAAC,GAAe;IAC7C,MAAM,IAAI,GAAG,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,YAAY,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IAClD,MAAM,IAAI,GAAG,GAAG,GAAG,CAAC,SAAS,IAAI,IAAI,GAAG,CAAC;IACzC,OAAO,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,IAAI,IAAI,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC;AACzC,CAAC;AAED,SAAgB,cAAc,CAAC,CAAY;IACzC,IAAI,CAAC,CAAC,MAAM,KAAK,CAAC;QAAE,OAAO,GAAG,CAAC;IAC/B,OAAO,CAAC,CAAC,GAAG,CAAC,eAAe,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;AAC5C,CAAC"}

package/dist/fol-prover/unify.d.ts

@@ -0,0 +1,9 @@
+import { FOLTerm, FOLLiteral, FOLClause } from './types';
+type Subst = Map<string, FOLTerm>;
+export declare function unify(t1: FOLTerm, t2: FOLTerm, sigma?: Subst): Subst | null;
+export declare function applyTerm(t: FOLTerm, s: Subst): FOLTerm;
+export declare function applyLiteral(lit: FOLLiteral, s: Subst): FOLLiteral;
+export declare function applyClause(c: FOLClause, s: Subst): FOLClause;
+export declare function substToRecord(s: Subst): Record<string, string>;
+export {};
+//# sourceMappingURL=unify.d.ts.map

package/dist/fol-prover/unify.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"unify.d.ts","sourceRoot":"","sources":["../../src/fol-prover/unify.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,OAAO,EAAE,UAAU,EAAE,SAAS,EAAE,MAAM,SAAS,CAAC;AAEzD,KAAK,KAAK,GAAG,GAAG,CAAC,MAAM,EAAE,OAAO,CAAC,CAAC;AAElC,wBAAgB,KAAK,CAAC,EAAE,EAAE,OAAO,EAAE,EAAE,EAAE,OAAO,EAAE,KAAK,CAAC,EAAE,KAAK,GAAG,KAAK,GAAG,IAAI,CAG3E;AA0DD,wBAAgB,SAAS,CAAC,CAAC,EAAE,OAAO,EAAE,CAAC,EAAE,KAAK,GAAG,OAAO,CAQvD;AAED,wBAAgB,YAAY,CAAC,GAAG,EAAE,UAAU,EAAE,CAAC,EAAE,KAAK,GAAG,UAAU,CAMlE;AAED,wBAAgB,WAAW,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,KAAK,GAAG,SAAS,CAE7D;AAED,wBAAgB,aAAa,CAAC,CAAC,EAAE,KAAK,GAAG,MAAM,CAAC,MAAM,EAAE,MAAM,CAAC,CAM9D"}

package/dist/fol-prover/unify.js

@@ -0,0 +1,110 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.unify = unify;
+exports.applyTerm = applyTerm;
+exports.applyLiteral = applyLiteral;
+exports.applyClause = applyClause;
+exports.substToRecord = substToRecord;
+function unify(t1, t2, sigma) {
+    const s = sigma ?? new Map();
+    return unifyInto(t1, t2, s);
+}
+function unifyInto(t1, t2, s) {
+    const a = walk(t1, s);
+    const b = walk(t2, s);
+    if (a.kind === 'var') {
+        if (b.kind === 'var' && a.name === b.name)
+            return s;
+        if (occursIn(a.name, b, s))
+            return null;
+        s.set(a.name, b);
+        return s;
+    }
+    if (b.kind === 'var') {
+        if (occursIn(b.name, a, s))
+            return null;
+        s.set(b.name, a);
+        return s;
+    }
+    if (a.kind === 'const' && b.kind === 'const') {
+        return a.name === b.name ? s : null;
+    }
+    if (a.kind === 'func' && b.kind === 'func') {
+        if (a.name !== b.name)
+            return null;
+        const aa = a.args ?? [];
+        const bb = b.args ?? [];
+        if (aa.length !== bb.length)
+            return null;
+        for (let i = 0; i < aa.length; i++) {
+            const ai = aa[i];
+            const bi = bb[i];
+            if (ai === undefined || bi === undefined)
+                return null;
+            const r = unifyInto(ai, bi, s);
+            if (r === null)
+                return null;
+        }
+        return s;
+    }
+    return null;
+}
+function walk(t, s) {
+    let cur = t;
+    while (cur.kind === 'var' && s.has(cur.name)) {
+        const nxt = s.get(cur.name);
+        if (nxt === undefined)
+            break;
+        if (nxt === cur)
+            break;
+        cur = nxt;
+    }
+    return cur;
+}
+function occursIn(name, t, s) {
+    const w = walk(t, s);
+    if (w.kind === 'var')
+        return w.name === name;
+    if (w.kind === 'const')
+        return false;
+    for (const a of w.args ?? []) {
+        if (occursIn(name, a, s))
+            return true;
+    }
+    return false;
+}
+function applyTerm(t, s) {
+    if (t.kind === 'var') {
+        const v = s.get(t.name);
+        if (v === undefined)
+            return t;
+        return applyTerm(v, s);
+    }
+    if (t.kind === 'const')
+        return t;
+    return { kind: 'func', name: t.name, args: (t.args ?? []).map((a) => applyTerm(a, s)) };
+}
+function applyLiteral(lit, s) {
+    return {
+        negated: lit.negated,
+        predicate: lit.predicate,
+        args: lit.args.map((a) => applyTerm(a, s)),
+    };
+}
+function applyClause(c, s) {
+    return c.map((l) => applyLiteral(l, s));
+}
+function substToRecord(s) {
+    const out = {};
+    for (const [k, v] of s.entries()) {
+        out[k] = termToShortString(v);
+    }
+    return out;
+}
+function termToShortString(t) {
+    if (t.kind === 'var' || t.kind === 'const')
+        return t.name;
+    const args = (t.args ?? []).map(termToShortString).join(',');
+    return `${t.name}(${args})`;
+}
+//# sourceMappingURL=unify.js.map

package/dist/fol-prover/unify.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"unify.js","sourceRoot":"","sources":["../../src/fol-prover/unify.ts"],"names":[],"mappings":";;AAIA,sBAGC;AA0DD,8BAQC;AAED,oCAMC;AAED,kCAEC;AAED,sCAMC;AAzFD,SAAgB,KAAK,CAAC,EAAW,EAAE,EAAW,EAAE,KAAa;IAC3D,MAAM,CAAC,GAAU,KAAK,IAAI,IAAI,GAAG,EAAmB,CAAC;IACrD,OAAO,SAAS,CAAC,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC;AAC9B,CAAC;AAED,SAAS,SAAS,CAAC,EAAW,EAAE,EAAW,EAAE,CAAQ;IACnD,MAAM,CAAC,GAAG,IAAI,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC;IACtB,MAAM,CAAC,GAAG,IAAI,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC;IAEtB,IAAI,CAAC,CAAC,IAAI,KAAK,KAAK,EAAE,CAAC;QACrB,IAAI,CAAC,CAAC,IAAI,KAAK,KAAK,IAAI,CAAC,CAAC,IAAI,KAAK,CAAC,CAAC,IAAI;YAAE,OAAO,CAAC,CAAC;QACpD,IAAI,QAAQ,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC,EAAE,CAAC,CAAC;YAAE,OAAO,IAAI,CAAC;QACxC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;QACjB,OAAO,CAAC,CAAC;IACX,CAAC;IACD,IAAI,CAAC,CAAC,IAAI,KAAK,KAAK,EAAE,CAAC;QACrB,IAAI,QAAQ,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC,EAAE,CAAC,CAAC;YAAE,OAAO,IAAI,CAAC;QACxC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;QACjB,OAAO,CAAC,CAAC;IACX,CAAC;IACD,IAAI,CAAC,CAAC,IAAI,KAAK,OAAO,IAAI,CAAC,CAAC,IAAI,KAAK,OAAO,EAAE,CAAC;QAC7C,OAAO,CAAC,CAAC,IAAI,KAAK,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;IACtC,CAAC;IACD,IAAI,CAAC,CAAC,IAAI,KAAK,MAAM,IAAI,CAAC,CAAC,IAAI,KAAK,MAAM,EAAE,CAAC;QAC3C,IAAI,CAAC,CAAC,IAAI,KAAK,CAAC,CAAC,IAAI;YAAE,OAAO,IAAI,CAAC;QACnC,MAAM,EAAE,GAAG,CAAC,CAAC,IAAI,IAAI,EAAE,CAAC;QACxB,MAAM,EAAE,GAAG,CAAC,CAAC,IAAI,IAAI,EAAE,CAAC;QACxB,IAAI,EAAE,CAAC,MAAM,KAAK,EAAE,CAAC,MAAM;YAAE,OAAO,IAAI,CAAC;QACzC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;YACnC,MAAM,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC;YACjB,MAAM,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC;YACjB,IAAI,EAAE,KAAK,SAAS,IAAI,EAAE,KAAK,SAAS;gBAAE,OAAO,IAAI,CAAC;YACtD,MAAM,CAAC,GAAG,SAAS,CAAC,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC;YAC/B,IAAI,CAAC,KAAK,IAAI;gBAAE,OAAO,IAAI,CAAC;QAC9B,CAAC;QACD,OAAO,CAAC,CAAC;IACX,CAAC;IACD,OAAO,IAAI,CAAC;AACd,CAAC;AAED,SAAS,IAAI,CAAC,CAAU,EAAE,CAAQ;IAChC,IAAI,GAAG,GAAG,CAAC,CAAC;IACZ,OAAO,GAAG,CAAC,IAAI,KAAK,KAAK,IAAI,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,IAAI,CAAC,EAAE,CAAC;QAC7C,MAAM,GAAG,GAAG,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,IAAI,CAAC,CAAC;QAC5B,IAAI,GAAG,KAAK,SAAS;YAAE,MAAM;QAC7B,IAAI,GAAG,KAAK,GAAG;YAAE,MAAM;QACvB,GAAG,GAAG,GAAG,CAAC;IACZ,CAAC;IACD,OAAO,GAAG,CAAC;AACb,CAAC;AAED,SAAS,QAAQ,CAAC,IAAY,EAAE,CAAU,EAAE,CAAQ;IAClD,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;IACrB,IAAI,CAAC,CAAC,IAAI,KAAK,KAAK;QAAE,OAAO,CAAC,CAAC,IAAI,KAAK,IAAI,CAAC;IAC7C,IAAI,CAAC,CAAC,IAAI,KAAK,OAAO;QAAE,OAAO,KAAK,CAAC;IACrC,KAAK,MAAM,CAAC,IAAI,CAAC,CAAC,IAAI,IAAI,EAAE,EAAE,CAAC;QAC7B,IAAI,QAAQ,CAAC,IAAI,EAAE,CAAC,EAAE,CAAC,CAAC;YAAE,OAAO,IAAI,CAAC;IACxC,CAAC;IACD,OAAO,KAAK,CAAC;AACf,CAAC;AAED,SAAgB,SAAS,CAAC,CAAU,EAAE,CAAQ;IAC5C,IAAI,CAAC,CAAC,IAAI,KAAK,KAAK,EAAE,CAAC;QACrB,MAAM,CAAC,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;QACxB,IAAI,CAAC,KAAK,SAAS;YAAE,OAAO,CAAC,CAAC;QAC9B,OAAO,SAAS,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;IACzB,CAAC;IACD,IAAI,CAAC,CAAC,IAAI,KAAK,OAAO;QAAE,OAAO,CAAC,CAAC;IACjC,OAAO,EAAE,IAAI,EAAE,MAAM,EAAE,IAAI,EAAE,CAAC,CAAC,IAAI,EAAE,IAAI,EAAE,CAAC,CAAC,CAAC,IAAI,IAAI,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,SAAS,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC;AAC1F,CAAC;AAED,SAAgB,YAAY,CAAC,GAAe,EAAE,CAAQ;IACpD,OAAO;QACL,OAAO,EAAE,GAAG,CAAC,OAAO;QACpB,SAAS,EAAE,GAAG,CAAC,SAAS;QACxB,IAAI,EAAE,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,SAAS,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;KAC3C,CAAC;AACJ,CAAC;AAED,SAAgB,WAAW,CAAC,CAAY,EAAE,CAAQ;IAChD,OAAO,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,YAAY,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;AAC1C,CAAC;AAED,SAAgB,aAAa,CAAC,CAAQ;IACpC,MAAM,GAAG,GAA2B,EAAE,CAAC;IACvC,KAAK,MAAM,CAAC,CAAC,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC;QACjC,GAAG,CAAC,CAAC,CAAC,GAAG,iBAAiB,CAAC,CAAC,CAAC,CAAC;IAChC,CAAC;IACD,OAAO,GAAG,CAAC;AACb,CAAC;AAED,SAAS,iBAAiB,CAAC,CAAU;IACnC,IAAI,CAAC,CAAC,IAAI,KAAK,KAAK,IAAI,CAAC,CAAC,IAAI,KAAK,OAAO;QAAE,OAAO,CAAC,CAAC,IAAI,CAAC;IAC1D,MAAM,IAAI,GAAG,CAAC,CAAC,CAAC,IAAI,IAAI,EAAE,CAAC,CAAC,GAAG,CAAC,iBAAiB,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IAC7D,OAAO,GAAG,CAAC,CAAC,IAAI,IAAI,IAAI,GAAG,CAAC;AAC9B,CAAC"}

package/dist/hyperreal/index.d.ts

@@ -0,0 +1,45 @@
+export interface Hyperreal {
+    readonly standard: number;
+    readonly infinitesimal: number;
+}
+export declare function hr(standard: number, infinitesimal?: number): Hyperreal;
+export declare const HR_ZERO: Hyperreal;
+export declare const HR_ONE: Hyperreal;
+export declare const HR_EPSILON: Hyperreal;
+export declare function add(a: Hyperreal, b: Hyperreal): Hyperreal;
+export declare function sub(a: Hyperreal, b: Hyperreal): Hyperreal;
+export declare function mul(a: Hyperreal, b: Hyperreal): Hyperreal;
+/**
+ * Compara dos hiperreales lexicográficamente: primero la parte estándar,
+ * luego la infinitesimal. Devuelve -1, 0 o 1.
+ *
+ * Usa una tolerancia ínfima sobre las componentes para absorber el ruido
+ * de coma flotante; los infinitesimales formales no se ven afectados
+ * porque su magnitud es de orden O(1) en el coeficiente.
+ */
+export declare function compare(a: Hyperreal, b: Hyperreal): -1 | 0 | 1;
+export declare function eq(a: Hyperreal, b: Hyperreal): boolean;
+export declare function lt(a: Hyperreal, b: Hyperreal): boolean;
+export declare function gt(a: Hyperreal, b: Hyperreal): boolean;
+export declare function hrAnd(p: Hyperreal, q: Hyperreal): Hyperreal;
+export declare function hrOr(p: Hyperreal, q: Hyperreal): Hyperreal;
+export declare function hrNot(p: Hyperreal): Hyperreal;
+export declare function hrImplies(p: Hyperreal, q: Hyperreal): Hyperreal;
+export interface UncertaintyBound {
+    readonly lower: Hyperreal;
+    readonly upper: Hyperreal;
+}
+export declare function bound(lower: Hyperreal, upper: Hyperreal): UncertaintyBound;
+/**
+ * Propaga una operación lógica sobre cotas de incertidumbre.
+ *
+ * - `and`/`or` requieren `other`; ambas operaciones son monótonas en
+ *   sus dos argumentos, por lo que la cota se obtiene aplicando la
+ *   operación a (lower, lower) y (upper, upper) respectivamente.
+ * - `not` invierte la cota: ¬[a, b] = [1 − b, 1 − a].
+ * - `implies` requiere `other`. p → q es decreciente en p y creciente
+ *   en q ⇒ lower = (upper_p → lower_q), upper = (lower_p → upper_q).
+ */
+export declare function propagate(b: UncertaintyBound, op: 'and' | 'or' | 'not' | 'implies', other?: UncertaintyBound): UncertaintyBound;
+export declare function hrToString(x: Hyperreal): string;
+//# sourceMappingURL=index.d.ts.map

package/dist/hyperreal/index.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.d.ts","sourceRoot":"","sources":["../../src/hyperreal/index.ts"],"names":[],"mappings":"AAoCA,MAAM,WAAW,SAAS;IACxB,QAAQ,CAAC,QAAQ,EAAE,MAAM,CAAC;IAC1B,QAAQ,CAAC,aAAa,EAAE,MAAM,CAAC;CAChC;AAED,wBAAgB,EAAE,CAAC,QAAQ,EAAE,MAAM,EAAE,aAAa,GAAE,MAAU,GAAG,SAAS,CAEzE;AAED,eAAO,MAAM,OAAO,EAAE,SAA6C,CAAC;AACpE,eAAO,MAAM,MAAM,EAAE,SAA6C,CAAC;AACnE,eAAO,MAAM,UAAU,EAAE,SAA6C,CAAC;AAIvE,wBAAgB,GAAG,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,SAAS,CAKzD;AAED,wBAAgB,GAAG,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,SAAS,CAKzD;AAED,wBAAgB,GAAG,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,SAAS,CAMzD;AAED;;;;;;;GAOG;AACH,wBAAgB,OAAO,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,CAS9D;AAED,wBAAgB,EAAE,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,OAAO,CAEtD;AAED,wBAAgB,EAAE,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,OAAO,CAEtD;AAED,wBAAgB,EAAE,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,OAAO,CAEtD;AAID,wBAAgB,KAAK,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,SAAS,CAE3D;AAED,wBAAgB,IAAI,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,SAAS,CAE1D;AAED,wBAAgB,KAAK,CAAC,CAAC,EAAE,SAAS,GAAG,SAAS,CAE7C;AAED,wBAAgB,SAAS,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,EAAE,SAAS,GAAG,SAAS,CAG/D;AAID,MAAM,WAAW,gBAAgB;IAC/B,QAAQ,CAAC,KAAK,EAAE,SAAS,CAAC;IAC1B,QAAQ,CAAC,KAAK,EAAE,SAAS,CAAC;CAC3B;AAED,wBAAgB,KAAK,CAAC,KAAK,EAAE,SAAS,EAAE,KAAK,EAAE,SAAS,GAAG,gBAAgB,CAO1E;AAED;;;;;;;;;GASG;AACH,wBAAgB,SAAS,CACvB,CAAC,EAAE,gBAAgB,EACnB,EAAE,EAAE,KAAK,GAAG,IAAI,GAAG,KAAK,GAAG,SAAS,EACpC,KAAK,CAAC,EAAE,gBAAgB,GACvB,gBAAgB,CA8BlB;AAID,wBAAgB,UAAU,CAAC,CAAC,EAAE,SAAS,GAAG,MAAM,CAK/C"}