@cogitator-ai/neuro-symbolic 0.1.0

package/dist/logic/resolver.js

@@ -0,0 +1,382 @@
+import { nanoid } from 'nanoid';
+import { unify, applySubstitution, renameVariables, getVariables, termToString, } from './unification';
+import { isBuiltin, executeBuiltin } from './builtins';
+import { parseQuery } from './parser';
+function importParser() {
+    return { parseQuery };
+}
+function createProofNode(goal, subst, depth) {
+    return {
+        id: nanoid(8),
+        goal,
+        substitution: subst,
+        children: [],
+        status: 'pending',
+        depth,
+    };
+}
+function getDefaultConfig() {
+    return {
+        maxDepth: 50,
+        maxSolutions: 10,
+        timeout: 5000,
+        enableCut: true,
+        enableNegation: true,
+        traceExecution: false,
+    };
+}
+function checkTimeout(ctx) {
+    return Date.now() - ctx.startTime > ctx.config.timeout;
+}
+function resolve(state, ctx) {
+    ctx.exploredNodes++;
+    if (ctx.maxDepth < state.depth) {
+        ctx.maxDepth = state.depth;
+    }
+    if (checkTimeout(ctx)) {
+        state.proofNode.status = 'failure';
+        return { success: false };
+    }
+    if (state.depth > ctx.config.maxDepth) {
+        state.proofNode.status = 'failure';
+        return { success: false };
+    }
+    if (state.goals.length === 0) {
+        state.proofNode.status = 'success';
+        const solution = new Map();
+        for (const varName of ctx.queryVariables) {
+            const bound = state.substitution.get(varName);
+            if (bound) {
+                solution.set(varName, applySubstitution(bound, state.substitution));
+            }
+        }
+        ctx.solutions.push(solution);
+        return { success: true };
+    }
+    const [currentGoal, ...remainingGoals] = state.goals;
+    const resolvedGoal = applySubstitution(currentGoal, state.substitution);
+    if (ctx.config.enableCut && resolvedGoal.functor === '!' && resolvedGoal.args.length === 0) {
+        state.proofNode.status = 'cut';
+        const childNode = createProofNode(resolvedGoal, state.substitution, state.depth + 1);
+        childNode.status = 'cut';
+        state.proofNode.children.push(childNode);
+        const result = resolve({
+            goals: remainingGoals,
+            substitution: state.substitution,
+            depth: state.depth + 1,
+            proofNode: childNode,
+            cut: false,
+        }, ctx);
+        return { success: result.success, cut: true };
+    }
+    if (ctx.config.enableNegation &&
+        resolvedGoal.functor === '\\+' &&
+        resolvedGoal.args.length === 1 &&
+        resolvedGoal.args[0].type === 'compound') {
+        const negatedGoal = resolvedGoal.args[0];
+        const childNode = createProofNode(resolvedGoal, state.substitution, state.depth + 1);
+        state.proofNode.children.push(childNode);
+        const savedSolutions = ctx.solutions.length;
+        const testNode = createProofNode(negatedGoal, state.substitution, state.depth + 1);
+        const testResult = resolve({
+            goals: [negatedGoal],
+            substitution: state.substitution,
+            depth: state.depth + 1,
+            proofNode: testNode,
+            cut: false,
+        }, ctx);
+        ctx.solutions.length = savedSolutions;
+        if (!testResult.success) {
+            childNode.status = 'success';
+            return resolve({
+                goals: remainingGoals,
+                substitution: state.substitution,
+                depth: state.depth + 1,
+                proofNode: childNode,
+                cut: false,
+            }, ctx);
+        }
+        childNode.status = 'failure';
+        return { success: false };
+    }
+    if (resolvedGoal.functor === ',' && resolvedGoal.args.length === 2) {
+        const [first, second] = resolvedGoal.args;
+        if (first.type === 'compound' && second.type === 'compound') {
+            const newGoals = [first, second, ...remainingGoals];
+            return resolve({
+                goals: newGoals,
+                substitution: state.substitution,
+                depth: state.depth,
+                proofNode: state.proofNode,
+                cut: false,
+            }, ctx);
+        }
+    }
+    if (resolvedGoal.functor === ';' && resolvedGoal.args.length === 2) {
+        const [first, second] = resolvedGoal.args;
+        if (first.type === 'compound') {
+            const firstNode = createProofNode(first, state.substitution, state.depth + 1);
+            state.proofNode.children.push(firstNode);
+            const firstResult = resolve({
+                goals: [first, ...remainingGoals],
+                substitution: state.substitution,
+                depth: state.depth + 1,
+                proofNode: firstNode,
+                cut: false,
+            }, ctx);
+            if (firstResult.cut) {
+                return firstResult;
+            }
+        }
+        if (second.type === 'compound') {
+            const secondNode = createProofNode(second, state.substitution, state.depth + 1);
+            state.proofNode.children.push(secondNode);
+            return resolve({
+                goals: [second, ...remainingGoals],
+                substitution: state.substitution,
+                depth: state.depth + 1,
+                proofNode: secondNode,
+                cut: false,
+            }, ctx);
+        }
+        return { success: false };
+    }
+    if (resolvedGoal.functor === '->' && resolvedGoal.args.length === 2) {
+        const [condition, thenBranch] = resolvedGoal.args;
+        if (condition.type === 'compound' && thenBranch.type === 'compound') {
+            const condNode = createProofNode(condition, state.substitution, state.depth + 1);
+            state.proofNode.children.push(condNode);
+            const savedSolutions = ctx.solutions.length;
+            const condResult = resolve({
+                goals: [condition],
+                substitution: state.substitution,
+                depth: state.depth + 1,
+                proofNode: condNode,
+                cut: false,
+            }, ctx);
+            if (condResult.success && ctx.solutions.length > savedSolutions) {
+                const condSolution = ctx.solutions[savedSolutions];
+                ctx.solutions.length = savedSolutions;
+                const merged = new Map(state.substitution);
+                for (const [k, v] of condSolution) {
+                    merged.set(k, v);
+                }
+                return resolve({
+                    goals: [thenBranch, ...remainingGoals],
+                    substitution: merged,
+                    depth: state.depth + 1,
+                    proofNode: condNode,
+                    cut: false,
+                }, ctx);
+            }
+            ctx.solutions.length = savedSolutions;
+            return { success: false };
+        }
+    }
+    if (isBuiltin(resolvedGoal.functor, resolvedGoal.args.length)) {
+        const childNode = createProofNode(resolvedGoal, state.substitution, state.depth + 1);
+        state.proofNode.children.push(childNode);
+        const builtinResult = executeBuiltin(resolvedGoal, state.substitution);
+        if (builtinResult.cut) {
+            childNode.status = 'cut';
+            if (builtinResult.substitutions.length > 0) {
+                const result = resolve({
+                    goals: remainingGoals,
+                    substitution: builtinResult.substitutions[0],
+                    depth: state.depth + 1,
+                    proofNode: childNode,
+                    cut: false,
+                }, ctx);
+                return { success: result.success, cut: true };
+            }
+            return { success: false, cut: true };
+        }
+        if (!builtinResult.success) {
+            childNode.status = 'failure';
+            return { success: false };
+        }
+        let anySuccess = false;
+        for (const newSubst of builtinResult.substitutions) {
+            if (ctx.solutions.length >= ctx.config.maxSolutions) {
+                break;
+            }
+            const branchNode = createProofNode(resolvedGoal, newSubst, state.depth + 1);
+            childNode.children.push(branchNode);
+            const result = resolve({
+                goals: remainingGoals,
+                substitution: newSubst,
+                depth: state.depth + 1,
+                proofNode: branchNode,
+                cut: false,
+            }, ctx);
+            if (result.success) {
+                anySuccess = true;
+                branchNode.status = 'success';
+            }
+            if (result.cut) {
+                childNode.status = anySuccess ? 'success' : 'failure';
+                return { success: anySuccess, cut: true };
+            }
+        }
+        childNode.status = anySuccess ? 'success' : 'failure';
+        return { success: anySuccess };
+    }
+    const clauses = ctx.kb.getClauses(resolvedGoal.functor, resolvedGoal.args.length);
+    if (clauses.length === 0) {
+        state.proofNode.status = 'failure';
+        return { success: false };
+    }
+    let anySuccess = false;
+    for (const clause of clauses) {
+        if (ctx.solutions.length >= ctx.config.maxSolutions) {
+            break;
+        }
+        ctx.clauseCounter++;
+        const renamedClause = renameClause(clause, `_${ctx.clauseCounter}`);
+        const unifyResult = unify(resolvedGoal, renamedClause.head, state.substitution);
+        if (unifyResult === null) {
+            continue;
+        }
+        const childNode = createProofNode(resolvedGoal, unifyResult, state.depth + 1);
+        childNode.clause = renamedClause;
+        state.proofNode.children.push(childNode);
+        const newGoals = [...renamedClause.body, ...remainingGoals];
+        const result = resolve({
+            goals: newGoals,
+            substitution: unifyResult,
+            depth: state.depth + 1,
+            proofNode: childNode,
+            cut: false,
+        }, ctx);
+        if (result.success) {
+            anySuccess = true;
+            childNode.status = 'success';
+        }
+        else {
+            childNode.status = 'failure';
+        }
+        if (result.cut && ctx.config.enableCut) {
+            break;
+        }
+    }
+    state.proofNode.status = anySuccess ? 'success' : 'failure';
+    return { success: anySuccess };
+}
+function renameClause(clause, suffix) {
+    return {
+        head: renameVariables(clause.head, suffix),
+        body: clause.body.map((g) => renameVariables(g, suffix)),
+        metadata: clause.metadata,
+    };
+}
+export class SLDResolver {
+    kb;
+    config;
+    constructor(kb, config = {}) {
+        this.kb = kb;
+        this.config = { ...getDefaultConfig(), ...config };
+    }
+    query(goals) {
+        const startTime = Date.now();
+        const queryVars = new Set();
+        for (const goal of goals) {
+            for (const v of getVariables(goal)) {
+                queryVars.add(v);
+            }
+        }
+        const rootNode = createProofNode({ type: 'compound', functor: '?-', args: goals }, new Map(), 0);
+        const ctx = {
+            kb: this.kb,
+            config: this.config,
+            startTime,
+            exploredNodes: 0,
+            maxDepth: 0,
+            solutions: [],
+            queryVariables: queryVars,
+            clauseCounter: 0,
+        };
+        const state = {
+            goals,
+            substitution: new Map(),
+            depth: 0,
+            proofNode: rootNode,
+            cut: false,
+        };
+        resolve(state, ctx);
+        const duration = Date.now() - startTime;
+        const proofTree = {
+            root: rootNode,
+            solutions: ctx.solutions,
+            exploredNodes: ctx.exploredNodes,
+            maxDepth: ctx.maxDepth,
+            duration,
+        };
+        return {
+            success: ctx.solutions.length > 0,
+            solutions: ctx.solutions,
+            proofTree: this.config.traceExecution ? proofTree : undefined,
+            confidence: 1.0,
+        };
+    }
+    prove(goal) {
+        const result = this.query([goal]);
+        return result.success;
+    }
+    findAll(goal, template) {
+        const result = this.query([goal]);
+        return result.solutions.map((subst) => applySubstitution(template, subst));
+    }
+    updateConfig(config) {
+        this.config = { ...this.config, ...config };
+    }
+    getKnowledgeBase() {
+        return this.kb;
+    }
+}
+export function createResolver(kb, config) {
+    return new SLDResolver(kb, config);
+}
+export function queryKnowledgeBase(kb, queryString, config) {
+    const { parseQuery: parseQueryFn } = importParser();
+    const result = parseQueryFn(queryString);
+    if (!result.success || !result.value) {
+        return {
+            success: false,
+            solutions: [],
+            explanation: result.error?.message || 'Parse error',
+            confidence: 0,
+        };
+    }
+    const resolver = new SLDResolver(kb, config);
+    return resolver.query(result.value);
+}
+export function formatSolutions(result) {
+    if (!result.success) {
+        return 'false.';
+    }
+    if (result.solutions.length === 0) {
+        return 'true.';
+    }
+    const lines = [];
+    for (const solution of result.solutions) {
+        if (solution.size === 0) {
+            lines.push('true');
+        }
+        else {
+            const bindings = [];
+            for (const [varName, term] of solution) {
+                if (!varName.startsWith('_')) {
+                    bindings.push(`${varName} = ${termToString(term)}`);
+                }
+            }
+            if (bindings.length > 0) {
+                lines.push(bindings.join(', '));
+            }
+            else {
+                lines.push('true');
+            }
+        }
+    }
+    return lines.join(' ;\n') + '.';
+}
+//# sourceMappingURL=resolver.js.map

package/dist/logic/resolver.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"resolver.js","sourceRoot":"","sources":["../../src/logic/resolver.ts"],"names":[],"mappings":"AAUA,OAAO,EAAE,MAAM,EAAE,MAAM,QAAQ,CAAC;AAEhC,OAAO,EACL,KAAK,EACL,iBAAiB,EACjB,eAAe,EACf,YAAY,EACZ,YAAY,GACb,MAAM,eAAe,CAAC;AACvB,OAAO,EAAE,SAAS,EAAE,cAAc,EAAE,MAAM,YAAY,CAAC;AACvD,OAAO,EAAE,UAAU,EAAE,MAAM,UAAU,CAAC;AAEtC,SAAS,YAAY;IACnB,OAAO,EAAE,UAAU,EAAE,CAAC;AACxB,CAAC;AAqBD,SAAS,eAAe,CAAC,IAAkB,EAAE,KAAmB,EAAE,KAAa;IAC7E,OAAO;QACL,EAAE,EAAE,MAAM,CAAC,CAAC,CAAC;QACb,IAAI;QACJ,YAAY,EAAE,KAAK;QACnB,QAAQ,EAAE,EAAE;QACZ,MAAM,EAAE,SAAS;QACjB,KAAK;KACN,CAAC;AACJ,CAAC;AAED,SAAS,gBAAgB;IACvB,OAAO;QACL,QAAQ,EAAE,EAAE;QACZ,YAAY,EAAE,EAAE;QAChB,OAAO,EAAE,IAAI;QACb,SAAS,EAAE,IAAI;QACf,cAAc,EAAE,IAAI;QACpB,cAAc,EAAE,KAAK;KACtB,CAAC;AACJ,CAAC;AAED,SAAS,YAAY,CAAC,GAAoB;IACxC,OAAO,IAAI,CAAC,GAAG,EAAE,GAAG,GAAG,CAAC,SAAS,GAAG,GAAG,CAAC,MAAM,CAAC,OAAO,CAAC;AACzD,CAAC;AAED,SAAS,OAAO,CAAC,KAAoB,EAAE,GAAoB;IACzD,GAAG,CAAC,aAAa,EAAE,CAAC;IAEpB,IAAI,GAAG,CAAC,QAAQ,GAAG,KAAK,CAAC,KAAK,EAAE,CAAC;QAC/B,GAAG,CAAC,QAAQ,GAAG,KAAK,CAAC,KAAK,CAAC;IAC7B,CAAC;IAED,IAAI,YAAY,CAAC,GAAG,CAAC,EAAE,CAAC;QACtB,KAAK,CAAC,SAAS,CAAC,MAAM,GAAG,SAAS,CAAC;QACnC,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,CAAC;IAC5B,CAAC;IAED,IAAI,KAAK,CAAC,KAAK,GAAG,GAAG,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC;QACtC,KAAK,CAAC,SAAS,CAAC,MAAM,GAAG,SAAS,CAAC;QACnC,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,CAAC;IAC5B,CAAC;IAED,IAAI,KAAK,CAAC,KAAK,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;QAC7B,KAAK,CAAC,SAAS,CAAC,MAAM,GAAG,SAAS,CAAC;QAEnC,MAAM,QAAQ,GAAG,IAAI,GAAG,EAAgB,CAAC;QACzC,KAAK,MAAM,OAAO,IAAI,GAAG,CAAC,cAAc,EAAE,CAAC;YACzC,MAAM,KAAK,GAAG,KAAK,CAAC,YAAY,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC;YAC9C,IAAI,KAAK,EAAE,CAAC;gBACV,QAAQ,CAAC,GAAG,CAAC,OAAO,EAAE,iBAAiB,CAAC,KAAK,EAAE,KAAK,CAAC,YAAY,CAAC,CAAC,CAAC;YACtE,CAAC;QACH,CAAC;QAED,GAAG,CAAC,SAAS,CAAC,IAAI,CAAC,QAAQ,CAAC,CAAC;QAC7B,OAAO,EAAE,OAAO,EAAE,IAAI,EAAE,CAAC;IAC3B,CAAC;IAED,MAAM,CAAC,WAAW,EAAE,GAAG,cAAc,CAAC,GAAG,KAAK,CAAC,KAAK,CAAC;IACrD,MAAM,YAAY,GAAG,iBAAiB,CAAC,WAAW,EAAE,KAAK,CAAC,YAAY,CAAiB,CAAC;IAExF,IAAI,GAAG,CAAC,MAAM,CAAC,SAAS,IAAI,YAAY,CAAC,OAAO,KAAK,GAAG,IAAI,YAAY,CAAC,IAAI,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;QAC3F,KAAK,CAAC,SAAS,CAAC,MAAM,GAAG,KAAK,CAAC;QAC/B,MAAM,SAAS,GAAG,eAAe,CAAC,YAAY,EAAE,KAAK,CAAC,YAAY,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC;QACrF,SAAS,CAAC,MAAM,GAAG,KAAK,CAAC;QACzB,KAAK,CAAC,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;QAEzC,MAAM,MAAM,GAAG,OAAO,CACpB;YACE,KAAK,EAAE,cAAc;YACrB,YAAY,EAAE,KAAK,CAAC,YAAY;YAChC,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;YACtB,SAAS,EAAE,SAAS;YACpB,GAAG,EAAE,KAAK;SACX,EACD,GAAG,CACJ,CAAC;QAEF,OAAO,EAAE,OAAO,EAAE,MAAM,CAAC,OAAO,EAAE,GAAG,EAAE,IAAI,EAAE,CAAC;IAChD,CAAC;IAED,IACE,GAAG,CAAC,MAAM,CAAC,cAAc;QACzB,YAAY,CAAC,OAAO,KAAK,KAAK;QAC9B,YAAY,CAAC,IAAI,CAAC,MAAM,KAAK,CAAC;QAC9B,YAAY,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,KAAK,UAAU,EACxC,CAAC;QACD,MAAM,WAAW,GAAG,YAAY,CAAC,IAAI,CAAC,CAAC,CAAiB,CAAC;QACzD,MAAM,SAAS,GAAG,eAAe,CAAC,YAAY,EAAE,KAAK,CAAC,YAAY,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC;QACrF,KAAK,CAAC,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;QAEzC,MAAM,cAAc,GAAG,GAAG,CAAC,SAAS,CAAC,MAAM,CAAC;QAE5C,MAAM,QAAQ,GAAG,eAAe,CAAC,WAAW,EAAE,KAAK,CAAC,YAAY,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC;QACnF,MAAM,UAAU,GAAG,OAAO,CACxB;YACE,KAAK,EAAE,CAAC,WAAW,CAAC;YACpB,YAAY,EAAE,KAAK,CAAC,YAAY;YAChC,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;YACtB,SAAS,EAAE,QAAQ;YACnB,GAAG,EAAE,KAAK;SACX,EACD,GAAG,CACJ,CAAC;QAEF,GAAG,CAAC,SAAS,CAAC,MAAM,GAAG,cAAc,CAAC;QAEtC,IAAI,CAAC,UAAU,CAAC,OAAO,EAAE,CAAC;YACxB,SAAS,CAAC,MAAM,GAAG,SAAS,CAAC;YAE7B,OAAO,OAAO,CACZ;gBACE,KAAK,EAAE,cAAc;gBACrB,YAAY,EAAE,KAAK,CAAC,YAAY;gBAChC,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;gBACtB,SAAS,EAAE,SAAS;gBACpB,GAAG,EAAE,KAAK;aACX,EACD,GAAG,CACJ,CAAC;QACJ,CAAC;QAED,SAAS,CAAC,MAAM,GAAG,SAAS,CAAC;QAC7B,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,CAAC;IAC5B,CAAC;IAED,IAAI,YAAY,CAAC,OAAO,KAAK,GAAG,IAAI,YAAY,CAAC,IAAI,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;QACnE,MAAM,CAAC,KAAK,EAAE,MAAM,CAAC,GAAG,YAAY,CAAC,IAAI,CAAC;QAC1C,IAAI,KAAK,CAAC,IAAI,KAAK,UAAU,IAAI,MAAM,CAAC,IAAI,KAAK,UAAU,EAAE,CAAC;YAC5D,MAAM,QAAQ,GAAG,CAAC,KAAqB,EAAE,MAAsB,EAAE,GAAG,cAAc,CAAC,CAAC;YACpF,OAAO,OAAO,CACZ;gBACE,KAAK,EAAE,QAAQ;gBACf,YAAY,EAAE,KAAK,CAAC,YAAY;gBAChC,KAAK,EAAE,KAAK,CAAC,KAAK;gBAClB,SAAS,EAAE,KAAK,CAAC,SAAS;gBAC1B,GAAG,EAAE,KAAK;aACX,EACD,GAAG,CACJ,CAAC;QACJ,CAAC;IACH,CAAC;IAED,IAAI,YAAY,CAAC,OAAO,KAAK,GAAG,IAAI,YAAY,CAAC,IAAI,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;QACnE,MAAM,CAAC,KAAK,EAAE,MAAM,CAAC,GAAG,YAAY,CAAC,IAAI,CAAC;QAE1C,IAAI,KAAK,CAAC,IAAI,KAAK,UAAU,EAAE,CAAC;YAC9B,MAAM,SAAS,GAAG,eAAe,CAAC,KAAqB,EAAE,KAAK,CAAC,YAAY,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC;YAC9F,KAAK,CAAC,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;YAEzC,MAAM,WAAW,GAAG,OAAO,CACzB;gBACE,KAAK,EAAE,CAAC,KAAqB,EAAE,GAAG,cAAc,CAAC;gBACjD,YAAY,EAAE,KAAK,CAAC,YAAY;gBAChC,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;gBACtB,SAAS,EAAE,SAAS;gBACpB,GAAG,EAAE,KAAK;aACX,EACD,GAAG,CACJ,CAAC;YAEF,IAAI,WAAW,CAAC,GAAG,EAAE,CAAC;gBACpB,OAAO,WAAW,CAAC;YACrB,CAAC;QACH,CAAC;QAED,IAAI,MAAM,CAAC,IAAI,KAAK,UAAU,EAAE,CAAC;YAC/B,MAAM,UAAU,GAAG,eAAe,CAChC,MAAsB,EACtB,KAAK,CAAC,YAAY,EAClB,KAAK,CAAC,KAAK,GAAG,CAAC,CAChB,CAAC;YACF,KAAK,CAAC,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAC,UAAU,CAAC,CAAC;YAE1C,OAAO,OAAO,CACZ;gBACE,KAAK,EAAE,CAAC,MAAsB,EAAE,GAAG,cAAc,CAAC;gBAClD,YAAY,EAAE,KAAK,CAAC,YAAY;gBAChC,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;gBACtB,SAAS,EAAE,UAAU;gBACrB,GAAG,EAAE,KAAK;aACX,EACD,GAAG,CACJ,CAAC;QACJ,CAAC;QAED,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,CAAC;IAC5B,CAAC;IAED,IAAI,YAAY,CAAC,OAAO,KAAK,IAAI,IAAI,YAAY,CAAC,IAAI,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;QACpE,MAAM,CAAC,SAAS,EAAE,UAAU,CAAC,GAAG,YAAY,CAAC,IAAI,CAAC;QAElD,IAAI,SAAS,CAAC,IAAI,KAAK,UAAU,IAAI,UAAU,CAAC,IAAI,KAAK,UAAU,EAAE,CAAC;YACpE,MAAM,QAAQ,GAAG,eAAe,CAC9B,SAAyB,EACzB,KAAK,CAAC,YAAY,EAClB,KAAK,CAAC,KAAK,GAAG,CAAC,CAChB,CAAC;YACF,KAAK,CAAC,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAC,QAAQ,CAAC,CAAC;YAExC,MAAM,cAAc,GAAG,GAAG,CAAC,SAAS,CAAC,MAAM,CAAC;YAE5C,MAAM,UAAU,GAAG,OAAO,CACxB;gBACE,KAAK,EAAE,CAAC,SAAyB,CAAC;gBAClC,YAAY,EAAE,KAAK,CAAC,YAAY;gBAChC,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;gBACtB,SAAS,EAAE,QAAQ;gBACnB,GAAG,EAAE,KAAK;aACX,EACD,GAAG,CACJ,CAAC;YAEF,IAAI,UAAU,CAAC,OAAO,IAAI,GAAG,CAAC,SAAS,CAAC,MAAM,GAAG,cAAc,EAAE,CAAC;gBAChE,MAAM,YAAY,GAAG,GAAG,CAAC,SAAS,CAAC,cAAc,CAAC,CAAC;gBACnD,GAAG,CAAC,SAAS,CAAC,MAAM,GAAG,cAAc,CAAC;gBAEtC,MAAM,MAAM,GAAG,IAAI,GAAG,CAAC,KAAK,CAAC,YAAY,CAAC,CAAC;gBAC3C,KAAK,MAAM,CAAC,CAAC,EAAE,CAAC,CAAC,IAAI,YAAY,EAAE,CAAC;oBAClC,MAAM,CAAC,GAAG,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;gBACnB,CAAC;gBAED,OAAO,OAAO,CACZ;oBACE,KAAK,EAAE,CAAC,UAA0B,EAAE,GAAG,cAAc,CAAC;oBACtD,YAAY,EAAE,MAAM;oBACpB,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;oBACtB,SAAS,EAAE,QAAQ;oBACnB,GAAG,EAAE,KAAK;iBACX,EACD,GAAG,CACJ,CAAC;YACJ,CAAC;YAED,GAAG,CAAC,SAAS,CAAC,MAAM,GAAG,cAAc,CAAC;YACtC,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,CAAC;QAC5B,CAAC;IACH,CAAC;IAED,IAAI,SAAS,CAAC,YAAY,CAAC,OAAO,EAAE,YAAY,CAAC,IAAI,CAAC,MAAM,CAAC,EAAE,CAAC;QAC9D,MAAM,SAAS,GAAG,eAAe,CAAC,YAAY,EAAE,KAAK,CAAC,YAAY,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC;QACrF,KAAK,CAAC,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;QAEzC,MAAM,aAAa,GAAG,cAAc,CAAC,YAAY,EAAE,KAAK,CAAC,YAAY,CAAC,CAAC;QAEvE,IAAI,aAAa,CAAC,GAAG,EAAE,CAAC;YACtB,SAAS,CAAC,MAAM,GAAG,KAAK,CAAC;YACzB,IAAI,aAAa,CAAC,aAAa,CAAC,MAAM,GAAG,CAAC,EAAE,CAAC;gBAC3C,MAAM,MAAM,GAAG,OAAO,CACpB;oBACE,KAAK,EAAE,cAAc;oBACrB,YAAY,EAAE,aAAa,CAAC,aAAa,CAAC,CAAC,CAAC;oBAC5C,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;oBACtB,SAAS,EAAE,SAAS;oBACpB,GAAG,EAAE,KAAK;iBACX,EACD,GAAG,CACJ,CAAC;gBACF,OAAO,EAAE,OAAO,EAAE,MAAM,CAAC,OAAO,EAAE,GAAG,EAAE,IAAI,EAAE,CAAC;YAChD,CAAC;YACD,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,GAAG,EAAE,IAAI,EAAE,CAAC;QACvC,CAAC;QAED,IAAI,CAAC,aAAa,CAAC,OAAO,EAAE,CAAC;YAC3B,SAAS,CAAC,MAAM,GAAG,SAAS,CAAC;YAC7B,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,CAAC;QAC5B,CAAC;QAED,IAAI,UAAU,GAAG,KAAK,CAAC;QAEvB,KAAK,MAAM,QAAQ,IAAI,aAAa,CAAC,aAAa,EAAE,CAAC;YACnD,IAAI,GAAG,CAAC,SAAS,CAAC,MAAM,IAAI,GAAG,CAAC,MAAM,CAAC,YAAY,EAAE,CAAC;gBACpD,MAAM;YACR,CAAC;YAED,MAAM,UAAU,GAAG,eAAe,CAAC,YAAY,EAAE,QAAQ,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC;YAC5E,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAC,UAAU,CAAC,CAAC;YAEpC,MAAM,MAAM,GAAG,OAAO,CACpB;gBACE,KAAK,EAAE,cAAc;gBACrB,YAAY,EAAE,QAAQ;gBACtB,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;gBACtB,SAAS,EAAE,UAAU;gBACrB,GAAG,EAAE,KAAK;aACX,EACD,GAAG,CACJ,CAAC;YAEF,IAAI,MAAM,CAAC,OAAO,EAAE,CAAC;gBACnB,UAAU,GAAG,IAAI,CAAC;gBAClB,UAAU,CAAC,MAAM,GAAG,SAAS,CAAC;YAChC,CAAC;YAED,IAAI,MAAM,CAAC,GAAG,EAAE,CAAC;gBACf,SAAS,CAAC,MAAM,GAAG,UAAU,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,SAAS,CAAC;gBACtD,OAAO,EAAE,OAAO,EAAE,UAAU,EAAE,GAAG,EAAE,IAAI,EAAE,CAAC;YAC5C,CAAC;QACH,CAAC;QAED,SAAS,CAAC,MAAM,GAAG,UAAU,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,SAAS,CAAC;QACtD,OAAO,EAAE,OAAO,EAAE,UAAU,EAAE,CAAC;IACjC,CAAC;IAED,MAAM,OAAO,GAAG,GAAG,CAAC,EAAE,CAAC,UAAU,CAAC,YAAY,CAAC,OAAO,EAAE,YAAY,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC;IAElF,IAAI,OAAO,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;QACzB,KAAK,CAAC,SAAS,CAAC,MAAM,GAAG,SAAS,CAAC;QACnC,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,CAAC;IAC5B,CAAC;IAED,IAAI,UAAU,GAAG,KAAK,CAAC;IAEvB,KAAK,MAAM,MAAM,IAAI,OAAO,EAAE,CAAC;QAC7B,IAAI,GAAG,CAAC,SAAS,CAAC,MAAM,IAAI,GAAG,CAAC,MAAM,CAAC,YAAY,EAAE,CAAC;YACpD,MAAM;QACR,CAAC;QAED,GAAG,CAAC,aAAa,EAAE,CAAC;QACpB,MAAM,aAAa,GAAG,YAAY,CAAC,MAAM,EAAE,IAAI,GAAG,CAAC,aAAa,EAAE,CAAC,CAAC;QAEpE,MAAM,WAAW,GAAG,KAAK,CAAC,YAAY,EAAE,aAAa,CAAC,IAAI,EAAE,KAAK,CAAC,YAAY,CAAC,CAAC;QAEhF,IAAI,WAAW,KAAK,IAAI,EAAE,CAAC;YACzB,SAAS;QACX,CAAC;QAED,MAAM,SAAS,GAAG,eAAe,CAAC,YAAY,EAAE,WAAW,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC;QAC9E,SAAS,CAAC,MAAM,GAAG,aAAa,CAAC;QACjC,KAAK,CAAC,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;QAEzC,MAAM,QAAQ,GAAG,CAAC,GAAG,aAAa,CAAC,IAAI,EAAE,GAAG,cAAc,CAAC,CAAC;QAE5D,MAAM,MAAM,GAAG,OAAO,CACpB;YACE,KAAK,EAAE,QAAQ;YACf,YAAY,EAAE,WAAW;YACzB,KAAK,EAAE,KAAK,CAAC,KAAK,GAAG,CAAC;YACtB,SAAS,EAAE,SAAS;YACpB,GAAG,EAAE,KAAK;SACX,EACD,GAAG,CACJ,CAAC;QAEF,IAAI,MAAM,CAAC,OAAO,EAAE,CAAC;YACnB,UAAU,GAAG,IAAI,CAAC;YAClB,SAAS,CAAC,MAAM,GAAG,SAAS,CAAC;QAC/B,CAAC;aAAM,CAAC;YACN,SAAS,CAAC,MAAM,GAAG,SAAS,CAAC;QAC/B,CAAC;QAED,IAAI,MAAM,CAAC,GAAG,IAAI,GAAG,CAAC,MAAM,CAAC,SAAS,EAAE,CAAC;YACvC,MAAM;QACR,CAAC;IACH,CAAC;IAED,KAAK,CAAC,SAAS,CAAC,MAAM,GAAG,UAAU,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,SAAS,CAAC;IAC5D,OAAO,EAAE,OAAO,EAAE,UAAU,EAAE,CAAC;AACjC,CAAC;AAED,SAAS,YAAY,CAAC,MAAc,EAAE,MAAc;IAClD,OAAO;QACL,IAAI,EAAE,eAAe,CAAC,MAAM,CAAC,IAAI,EAAE,MAAM,CAAiB;QAC1D,IAAI,EAAE,MAAM,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,eAAe,CAAC,CAAC,EAAE,MAAM,CAAiB,CAAC;QACxE,QAAQ,EAAE,MAAM,CAAC,QAAQ;KAC1B,CAAC;AACJ,CAAC;AAED,MAAM,OAAO,WAAW;IACd,EAAE,CAAgB;IAClB,MAAM,CAAmC;IAEjD,YAAY,EAAiB,EAAE,SAA0C,EAAE;QACzE,IAAI,CAAC,EAAE,GAAG,EAAE,CAAC;QACb,IAAI,CAAC,MAAM,GAAG,EAAE,GAAG,gBAAgB,EAAE,EAAE,GAAG,MAAM,EAAE,CAAC;IACrD,CAAC;IAED,KAAK,CAAC,KAAqB;QACzB,MAAM,SAAS,GAAG,IAAI,CAAC,GAAG,EAAE,CAAC;QAE7B,MAAM,SAAS,GAAG,IAAI,GAAG,EAAU,CAAC;QACpC,KAAK,MAAM,IAAI,IAAI,KAAK,EAAE,CAAC;YACzB,KAAK,MAAM,CAAC,IAAI,YAAY,CAAC,IAAI,CAAC,EAAE,CAAC;gBACnC,SAAS,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC;YACnB,CAAC;QACH,CAAC;QAED,MAAM,QAAQ,GAAG,eAAe,CAC9B,EAAE,IAAI,EAAE,UAAU,EAAE,OAAO,EAAE,IAAI,EAAE,IAAI,EAAE,KAAK,EAAE,EAChD,IAAI,GAAG,EAAE,EACT,CAAC,CACF,CAAC;QAEF,MAAM,GAAG,GAAoB;YAC3B,EAAE,EAAE,IAAI,CAAC,EAAE;YACX,MAAM,EAAE,IAAI,CAAC,MAAM;YACnB,SAAS;YACT,aAAa,EAAE,CAAC;YAChB,QAAQ,EAAE,CAAC;YACX,SAAS,EAAE,EAAE;YACb,cAAc,EAAE,SAAS;YACzB,aAAa,EAAE,CAAC;SACjB,CAAC;QAEF,MAAM,KAAK,GAAkB;YAC3B,KAAK;YACL,YAAY,EAAE,IAAI,GAAG,EAAE;YACvB,KAAK,EAAE,CAAC;YACR,SAAS,EAAE,QAAQ;YACnB,GAAG,EAAE,KAAK;SACX,CAAC;QAEF,OAAO,CAAC,KAAK,EAAE,GAAG,CAAC,CAAC;QAEpB,MAAM,QAAQ,GAAG,IAAI,CAAC,GAAG,EAAE,GAAG,SAAS,CAAC;QAExC,MAAM,SAAS,GAAc;YAC3B,IAAI,EAAE,QAAQ;YACd,SAAS,EAAE,GAAG,CAAC,SAAS;YACxB,aAAa,EAAE,GAAG,CAAC,aAAa;YAChC,QAAQ,EAAE,GAAG,CAAC,QAAQ;YACtB,QAAQ;SACT,CAAC;QAEF,OAAO;YACL,OAAO,EAAE,GAAG,CAAC,SAAS,CAAC,MAAM,GAAG,CAAC;YACjC,SAAS,EAAE,GAAG,CAAC,SAAS;YACxB,SAAS,EAAE,IAAI,CAAC,MAAM,CAAC,cAAc,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,SAAS;YAC7D,UAAU,EAAE,GAAG;SAChB,CAAC;IACJ,CAAC;IAED,KAAK,CAAC,IAAkB;QACtB,MAAM,MAAM,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC;QAClC,OAAO,MAAM,CAAC,OAAO,CAAC;IACxB,CAAC;IAED,OAAO,CAAC,IAAkB,EAAE,QAAc;QACxC,MAAM,MAAM,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC;QAClC,OAAO,MAAM,CAAC,SAAS,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,iBAAiB,CAAC,QAAQ,EAAE,KAAK,CAAC,CAAC,CAAC;IAC7E,CAAC;IAED,YAAY,CAAC,MAAuC;QAClD,IAAI,CAAC,MAAM,GAAG,EAAE,GAAG,IAAI,CAAC,MAAM,EAAE,GAAG,MAAM,EAAE,CAAC;IAC9C,CAAC;IAED,gBAAgB;QACd,OAAO,IAAI,CAAC,EAAE,CAAC;IACjB,CAAC;CACF;AAED,MAAM,UAAU,cAAc,CAC5B,EAAiB,EACjB,MAAwC;IAExC,OAAO,IAAI,WAAW,CAAC,EAAE,EAAE,MAAM,CAAC,CAAC;AACrC,CAAC;AAED,MAAM,UAAU,kBAAkB,CAChC,EAAiB,EACjB,WAAmB,EACnB,MAAwC;IAExC,MAAM,EAAE,UAAU,EAAE,YAAY,EAAE,GAAG,YAAY,EAAE,CAAC;IACpD,MAAM,MAAM,GAAG,YAAY,CAAC,WAAW,CAAC,CAAC;IAEzC,IAAI,CAAC,MAAM,CAAC,OAAO,IAAI,CAAC,MAAM,CAAC,KAAK,EAAE,CAAC;QACrC,OAAO;YACL,OAAO,EAAE,KAAK;YACd,SAAS,EAAE,EAAE;YACb,WAAW,EAAE,MAAM,CAAC,KAAK,EAAE,OAAO,IAAI,aAAa;YACnD,UAAU,EAAE,CAAC;SACd,CAAC;IACJ,CAAC;IAED,MAAM,QAAQ,GAAG,IAAI,WAAW,CAAC,EAAE,EAAE,MAAM,CAAC,CAAC;IAC7C,OAAO,QAAQ,CAAC,KAAK,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC;AACtC,CAAC;AAED,MAAM,UAAU,eAAe,CAAC,MAAwB;IACtD,IAAI,CAAC,MAAM,CAAC,OAAO,EAAE,CAAC;QACpB,OAAO,QAAQ,CAAC;IAClB,CAAC;IAED,IAAI,MAAM,CAAC,SAAS,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;QAClC,OAAO,OAAO,CAAC;IACjB,CAAC;IAED,MAAM,KAAK,GAAa,EAAE,CAAC;IAE3B,KAAK,MAAM,QAAQ,IAAI,MAAM,CAAC,SAAS,EAAE,CAAC;QACxC,IAAI,QAAQ,CAAC,IAAI,KAAK,CAAC,EAAE,CAAC;YACxB,KAAK,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC;QACrB,CAAC;aAAM,CAAC;YACN,MAAM,QAAQ,GAAa,EAAE,CAAC;YAC9B,KAAK,MAAM,CAAC,OAAO,EAAE,IAAI,CAAC,IAAI,QAAQ,EAAE,CAAC;gBACvC,IAAI,CAAC,OAAO,CAAC,UAAU,CAAC,GAAG,CAAC,EAAE,CAAC;oBAC7B,QAAQ,CAAC,IAAI,CAAC,GAAG,OAAO,MAAM,YAAY,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;gBACtD,CAAC;YACH,CAAC;YAED,IAAI,QAAQ,CAAC,MAAM,GAAG,CAAC,EAAE,CAAC;gBACxB,KAAK,CAAC,IAAI,CAAC,QAAQ,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC;YAClC,CAAC;iBAAM,CAAC;gBACN,KAAK,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC;YACrB,CAAC;QACH,CAAC;IACH,CAAC;IAED,OAAO,KAAK,CAAC,IAAI,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC;AAClC,CAAC"}

package/dist/logic/unification.d.ts

@@ -0,0 +1,17 @@
+import type { Term, AtomTerm, VariableTerm, NumberTerm, StringTerm, CompoundTerm, ListTerm, Substitution } from '@cogitator-ai/types';
+export declare function isAtom(term: Term): term is AtomTerm;
+export declare function isVariable(term: Term): term is VariableTerm;
+export declare function isNumber(term: Term): term is NumberTerm;
+export declare function isString(term: Term): term is StringTerm;
+export declare function isCompound(term: Term): term is CompoundTerm;
+export declare function isList(term: Term): term is ListTerm;
+export declare function termsEqual(t1: Term, t2: Term): boolean;
+export declare function occursIn(variable: VariableTerm, term: Term): boolean;
+export declare function applySubstitution(term: Term, subst: Substitution): Term;
+export declare function composeSubstitutions(s1: Substitution, s2: Substitution): Substitution;
+export declare function unify(term1: Term, term2: Term, subst?: Substitution): Substitution | null;
+export declare function getVariables(term: Term): Set<string>;
+export declare function renameVariables(term: Term, suffix: string): Term;
+export declare function substitutionToString(subst: Substitution): string;
+export declare function termToString(term: Term): string;
+//# sourceMappingURL=unification.d.ts.map

package/dist/logic/unification.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"unification.d.ts","sourceRoot":"","sources":["../../src/logic/unification.ts"],"names":[],"mappings":"AAAA,OAAO,KAAK,EACV,IAAI,EACJ,QAAQ,EACR,YAAY,EACZ,UAAU,EACV,UAAU,EACV,YAAY,EACZ,QAAQ,EACR,YAAY,EACb,MAAM,qBAAqB,CAAC;AAE7B,wBAAgB,MAAM,CAAC,IAAI,EAAE,IAAI,GAAG,IAAI,IAAI,QAAQ,CAEnD;AAED,wBAAgB,UAAU,CAAC,IAAI,EAAE,IAAI,GAAG,IAAI,IAAI,YAAY,CAE3D;AAED,wBAAgB,QAAQ,CAAC,IAAI,EAAE,IAAI,GAAG,IAAI,IAAI,UAAU,CAEvD;AAED,wBAAgB,QAAQ,CAAC,IAAI,EAAE,IAAI,GAAG,IAAI,IAAI,UAAU,CAEvD;AAED,wBAAgB,UAAU,CAAC,IAAI,EAAE,IAAI,GAAG,IAAI,IAAI,YAAY,CAE3D;AAED,wBAAgB,MAAM,CAAC,IAAI,EAAE,IAAI,GAAG,IAAI,IAAI,QAAQ,CAEnD;AAED,wBAAgB,UAAU,CAAC,EAAE,EAAE,IAAI,EAAE,EAAE,EAAE,IAAI,GAAG,OAAO,CA0BtD;AAED,wBAAgB,QAAQ,CAAC,QAAQ,EAAE,YAAY,EAAE,IAAI,EAAE,IAAI,GAAG,OAAO,CAYpE;AAED,wBAAgB,iBAAiB,CAAC,IAAI,EAAE,IAAI,EAAE,KAAK,EAAE,YAAY,GAAG,IAAI,CA0BvE;AAED,wBAAgB,oBAAoB,CAAC,EAAE,EAAE,YAAY,EAAE,EAAE,EAAE,YAAY,GAAG,YAAY,CAcrF;AA0BD,wBAAgB,KAAK,CACnB,KAAK,EAAE,IAAI,EACX,KAAK,EAAE,IAAI,EACX,KAAK,GAAE,YAAwB,GAC9B,YAAY,GAAG,IAAI,CA2ErB;AAED,wBAAgB,YAAY,CAAC,IAAI,EAAE,IAAI,GAAG,GAAG,CAAC,MAAM,CAAC,CAgBpD;AAED,wBAAgB,eAAe,CAAC,IAAI,EAAE,IAAI,EAAE,MAAM,EAAE,MAAM,GAAG,IAAI,CAsBhE;AAED,wBAAgB,oBAAoB,CAAC,KAAK,EAAE,YAAY,GAAG,MAAM,CAMhE;AAED,wBAAgB,YAAY,CAAC,IAAI,EAAE,IAAI,GAAG,MAAM,CA0B/C"}

package/dist/logic/unification.js

@@ -0,0 +1,257 @@
+export function isAtom(term) {
+    return term.type === 'atom';
+}
+export function isVariable(term) {
+    return term.type === 'variable';
+}
+export function isNumber(term) {
+    return term.type === 'number';
+}
+export function isString(term) {
+    return term.type === 'string';
+}
+export function isCompound(term) {
+    return term.type === 'compound';
+}
+export function isList(term) {
+    return term.type === 'list';
+}
+export function termsEqual(t1, t2) {
+    if (t1.type !== t2.type)
+        return false;
+    switch (t1.type) {
+        case 'atom':
+            return t2.value === t1.value;
+        case 'variable':
+            return t2.name === t1.name;
+        case 'number':
+            return t2.value === t1.value;
+        case 'string':
+            return t2.value === t1.value;
+        case 'compound': {
+            const c2 = t2;
+            if (t1.functor !== c2.functor)
+                return false;
+            if (t1.args.length !== c2.args.length)
+                return false;
+            return t1.args.every((arg, i) => termsEqual(arg, c2.args[i]));
+        }
+        case 'list': {
+            const l2 = t2;
+            if (t1.elements.length !== l2.elements.length)
+                return false;
+            if (!t1.elements.every((el, i) => termsEqual(el, l2.elements[i])))
+                return false;
+            if (t1.tail && l2.tail)
+                return termsEqual(t1.tail, l2.tail);
+            return !t1.tail && !l2.tail;
+        }
+    }
+}
+export function occursIn(variable, term) {
+    if (isVariable(term)) {
+        return term.name === variable.name;
+    }
+    if (isCompound(term)) {
+        return term.args.some((arg) => occursIn(variable, arg));
+    }
+    if (isList(term)) {
+        if (term.elements.some((el) => occursIn(variable, el)))
+            return true;
+        if (term.tail)
+            return occursIn(variable, term.tail);
+    }
+    return false;
+}
+export function applySubstitution(term, subst) {
+    if (isVariable(term)) {
+        const bound = subst.get(term.name);
+        if (bound) {
+            return applySubstitution(bound, subst);
+        }
+        return term;
+    }
+    if (isCompound(term)) {
+        return {
+            type: 'compound',
+            functor: term.functor,
+            args: term.args.map((arg) => applySubstitution(arg, subst)),
+        };
+    }
+    if (isList(term)) {
+        return {
+            type: 'list',
+            elements: term.elements.map((el) => applySubstitution(el, subst)),
+            tail: term.tail ? applySubstitution(term.tail, subst) : undefined,
+        };
+    }
+    return term;
+}
+export function composeSubstitutions(s1, s2) {
+    const result = new Map();
+    for (const [varName, term] of s1) {
+        result.set(varName, applySubstitution(term, s2));
+    }
+    for (const [varName, term] of s2) {
+        if (!result.has(varName)) {
+            result.set(varName, term);
+        }
+    }
+    return result;
+}
+function unifyVariable(variable, term, subst) {
+    const varName = variable.name;
+    if (subst.has(varName)) {
+        return unify(subst.get(varName), term, subst);
+    }
+    if (isVariable(term) && subst.has(term.name)) {
+        return unify(variable, subst.get(term.name), subst);
+    }
+    if (occursIn(variable, term)) {
+        return null;
+    }
+    const newSubst = new Map(subst);
+    newSubst.set(varName, term);
+    return newSubst;
+}
+export function unify(term1, term2, subst = new Map()) {
+    const t1 = applySubstitution(term1, subst);
+    const t2 = applySubstitution(term2, subst);
+    if (termsEqual(t1, t2)) {
+        return subst;
+    }
+    if (isVariable(t1)) {
+        return unifyVariable(t1, t2, subst);
+    }
+    if (isVariable(t2)) {
+        return unifyVariable(t2, t1, subst);
+    }
+    if (isCompound(t1) && isCompound(t2)) {
+        if (t1.functor !== t2.functor)
+            return null;
+        if (t1.args.length !== t2.args.length)
+            return null;
+        let currentSubst = subst;
+        for (let i = 0; i < t1.args.length; i++) {
+            const result = unify(t1.args[i], t2.args[i], currentSubst);
+            if (result === null)
+                return null;
+            currentSubst = result;
+        }
+        return currentSubst;
+    }
+    if (isList(t1) && isList(t2)) {
+        if (t1.elements.length === 0 && t2.elements.length === 0) {
+            if (t1.tail && t2.tail) {
+                return unify(t1.tail, t2.tail, subst);
+            }
+            if (!t1.tail && !t2.tail) {
+                return subst;
+            }
+            if (t1.tail && !t2.tail) {
+                return unify(t1.tail, { type: 'list', elements: [] }, subst);
+            }
+            if (!t1.tail && t2.tail) {
+                return unify({ type: 'list', elements: [] }, t2.tail, subst);
+            }
+        }
+        if (t1.elements.length > 0 && t2.elements.length > 0) {
+            const headResult = unify(t1.elements[0], t2.elements[0], subst);
+            if (headResult === null)
+                return null;
+            const tail1 = {
+                type: 'list',
+                elements: t1.elements.slice(1),
+                tail: t1.tail,
+            };
+            const tail2 = {
+                type: 'list',
+                elements: t2.elements.slice(1),
+                tail: t2.tail,
+            };
+            return unify(tail1, tail2, headResult);
+        }
+        if (t1.elements.length === 0 && t2.elements.length > 0 && t1.tail) {
+            return unify(t1.tail, t2, subst);
+        }
+        if (t2.elements.length === 0 && t1.elements.length > 0 && t2.tail) {
+            return unify(t1, t2.tail, subst);
+        }
+        return null;
+    }
+    return null;
+}
+export function getVariables(term) {
+    const vars = new Set();
+    function collect(t) {
+        if (isVariable(t)) {
+            vars.add(t.name);
+        }
+        else if (isCompound(t)) {
+            t.args.forEach(collect);
+        }
+        else if (isList(t)) {
+            t.elements.forEach(collect);
+            if (t.tail)
+                collect(t.tail);
+        }
+    }
+    collect(term);
+    return vars;
+}
+export function renameVariables(term, suffix) {
+    if (isVariable(term)) {
+        return { type: 'variable', name: `${term.name}_${suffix}` };
+    }
+    if (isCompound(term)) {
+        return {
+            type: 'compound',
+            functor: term.functor,
+            args: term.args.map((arg) => renameVariables(arg, suffix)),
+        };
+    }
+    if (isList(term)) {
+        return {
+            type: 'list',
+            elements: term.elements.map((el) => renameVariables(el, suffix)),
+            tail: term.tail ? renameVariables(term.tail, suffix) : undefined,
+        };
+    }
+    return term;
+}
+export function substitutionToString(subst) {
+    if (subst.size === 0)
+        return '{}';
+    const entries = Array.from(subst.entries())
+        .map(([name, term]) => `${name} = ${termToString(term)}`)
+        .join(', ');
+    return `{${entries}}`;
+}
+export function termToString(term) {
+    switch (term.type) {
+        case 'atom':
+            return term.value;
+        case 'variable':
+            return term.name;
+        case 'number':
+            return term.value.toString();
+        case 'string':
+            return `"${term.value}"`;
+        case 'compound':
+            if (term.args.length === 0) {
+                return term.functor;
+            }
+            return `${term.functor}(${term.args.map(termToString).join(', ')})`;
+        case 'list': {
+            if (term.elements.length === 0 && !term.tail) {
+                return '[]';
+            }
+            const elements = term.elements.map(termToString).join(', ');
+            if (term.tail) {
+                return `[${elements}|${termToString(term.tail)}]`;
+            }
+            return `[${elements}]`;
+        }
+    }
+}
+//# sourceMappingURL=unification.js.map