modality-ts 0.0.8 → 0.0.10

package/dist/check/properties/checked-state.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"checked-state.d.ts","sourceRoot":"","sources":["../../../src/check/properties/checked-state.ts"],"names":[],"mappings":"AAAA,OAAO,KAAK,EAAE,KAAK,EAAE,UAAU,EAAE,QAAQ,EAAE,MAAM,kBAAkB,CAAC;AAGpE,wBAAgB,YAAY,CAC1B,KAAK,EAAE,KAAK,EACZ,QAAQ,EAAE,QAAQ,EAClB,KAAK,EAAE,UAAU,EACjB,OAAO,EAAE,MAAM,GACd,UAAU,CAaZ"}

package/dist/check/properties/checked-state.js

@@ -0,0 +1,21 @@
+import { enabledTransitionVars } from "../slicing/slice-model.js";
+export function checkedState(model, property, state, context) {
+    if (property.reads === undefined)
+        return state;
+    const allowed = allowedPropertyReads(model, property);
+    return new Proxy(state, {
+        get(target, key, receiver) {
+            if (typeof key === "string" && !allowed.has(key)) {
+                throw new Error(`${property.name}: ${context} read undeclared var ${key}`);
+            }
+            return Reflect.get(target, key, receiver);
+        },
+    });
+}
+function allowedPropertyReads(model, property) {
+    return new Set([
+        ...(property.reads ?? []),
+        ...enabledTransitionVars(model, new Set(property.enabledTransitions ?? [])),
+    ]);
+}
+//# sourceMappingURL=checked-state.js.map

package/dist/check/properties/checked-state.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"checked-state.js","sourceRoot":"","sources":["../../../src/check/properties/checked-state.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,qBAAqB,EAAE,MAAM,2BAA2B,CAAC;AAElE,MAAM,UAAU,YAAY,CAC1B,KAAY,EACZ,QAAkB,EAClB,KAAiB,EACjB,OAAe;IAEf,IAAI,QAAQ,CAAC,KAAK,KAAK,SAAS;QAAE,OAAO,KAAK,CAAC;IAC/C,MAAM,OAAO,GAAG,oBAAoB,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAC;IACtD,OAAO,IAAI,KAAK,CAAC,KAAK,EAAE;QACtB,GAAG,CAAC,MAAM,EAAE,GAAG,EAAE,QAAQ;YACvB,IAAI,OAAO,GAAG,KAAK,QAAQ,IAAI,CAAC,OAAO,CAAC,GAAG,CAAC,GAAG,CAAC,EAAE,CAAC;gBACjD,MAAM,IAAI,KAAK,CACb,GAAG,QAAQ,CAAC,IAAI,KAAK,OAAO,wBAAwB,GAAG,EAAE,CAC1D,CAAC;YACJ,CAAC;YACD,OAAO,OAAO,CAAC,GAAG,CAAC,MAAM,EAAE,GAAG,EAAE,QAAQ,CAAY,CAAC;QACvD,CAAC;KACF,CAAC,CAAC;AACL,CAAC;AAED,SAAS,oBAAoB,CAC3B,KAAY,EACZ,QAAwD;IAExD,OAAO,IAAI,GAAG,CAAC;QACb,GAAG,CAAC,QAAQ,CAAC,KAAK,IAAI,EAAE,CAAC;QACzB,GAAG,qBAAqB,CAAC,KAAK,EAAE,IAAI,GAAG,CAAC,QAAQ,CAAC,kBAAkB,IAAI,EAAE,CAAC,CAAC;KAC5E,CAAC,CAAC;AACL,CAAC"}

package/dist/check/properties/finalize.d.ts

@@ -0,0 +1,4 @@
+import type { Model, ModelState, Property } from "modality-ts/core";
+import type { Edge, Parent, PropertyVerdict } from "../types.js";
+export declare function finalizeProperties(model: Model, properties: readonly Property[], parents: Map<string, Parent>, states: Map<string, ModelState>, edges: readonly Edge[], verdicts: Map<string, PropertyVerdict>): void;
+//# sourceMappingURL=finalize.d.ts.map

package/dist/check/properties/finalize.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"finalize.d.ts","sourceRoot":"","sources":["../../../src/check/properties/finalize.ts"],"names":[],"mappings":"AAAA,OAAO,KAAK,EAAE,KAAK,EAAE,UAAU,EAAE,QAAQ,EAAE,MAAM,kBAAkB,CAAC;AACpE,OAAO,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,eAAe,EAAE,MAAM,aAAa,CAAC;AASjE,wBAAgB,kBAAkB,CAChC,KAAK,EAAE,KAAK,EACZ,UAAU,EAAE,SAAS,QAAQ,EAAE,EAC/B,OAAO,EAAE,GAAG,CAAC,MAAM,EAAE,MAAM,CAAC,EAC5B,MAAM,EAAE,GAAG,CAAC,MAAM,EAAE,UAAU,CAAC,EAC/B,KAAK,EAAE,SAAS,IAAI,EAAE,EACtB,QAAQ,EAAE,GAAG,CAAC,MAAM,EAAE,eAAe,CAAC,GACrC,IAAI,CAaN"}

package/dist/check/properties/finalize.js

@@ -0,0 +1,71 @@
+import { makeTraceStep, replayCheckedVerdict, traceTo, } from "../traces/trace.js";
+import { failingSuffixWithin } from "./leads-to.js";
+import { unreachableWitness } from "./reachable-from.js";
+export function finalizeProperties(model, properties, parents, states, edges, verdicts) {
+    for (const property of properties) {
+        if (verdicts.has(property.name))
+            continue;
+        try {
+            finalizeProperty(model, property, parents, states, edges, verdicts);
+        }
+        catch (error) {
+            verdicts.set(property.name, {
+                status: "error",
+                property: property.name,
+                message: error.message,
+            });
+        }
+    }
+}
+function finalizeProperty(model, property, parents, states, edges, verdicts) {
+    if (property.kind === "reachable") {
+        verdicts.set(property.name, {
+            status: "vacuous-warning",
+            property: property.name,
+            message: "No reachable witness within bounds",
+        });
+    }
+    if (property.kind === "reachableFrom") {
+        const witness = unreachableWitness(model, property, states, edges);
+        if (witness) {
+            verdicts.set(property.name, {
+                status: "violated",
+                property: property.name,
+                trace: traceTo(parents, witness[0]),
+                replayable: false,
+                replayBlockedReason: "reachableFrom counterexamples assert absence of a path and are not replayable",
+            });
+        }
+    }
+    if (property.kind === "leadsToWithin") {
+        finalizeLeadsToWithin(model, property, parents, edges, verdicts);
+    }
+}
+function finalizeLeadsToWithin(model, property, parents, edges, verdicts) {
+    const triggerEdges = edges.filter((edge) => property.trigger(edge.step));
+    if (triggerEdges.length === 0) {
+        verdicts.set(property.name, {
+            status: "vacuous-warning",
+            property: property.name,
+            message: "Trigger never fired within bounds",
+        });
+        return;
+    }
+    const failure = triggerEdges
+        .map((edge) => ({
+        edge,
+        suffix: failingSuffixWithin(model, property, edge.post),
+    }))
+        .find((candidate) => candidate.suffix);
+    if (failure) {
+        const suffix = failure.suffix ?? [];
+        verdicts.set(property.name, replayCheckedVerdict("violated", property.name, {
+            steps: [
+                ...traceTo(parents, failure.edge.preCanon).steps,
+                makeTraceStep(failure.edge.pre, failure.edge.post, failure.edge.transition),
+                ...suffix.map((edge) => makeTraceStep(edge.pre, edge.post, edge.transition)),
+            ],
+        }));
+    }
+}
+//# sourceMappingURL=finalize.js.map

package/dist/check/properties/finalize.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"finalize.js","sourceRoot":"","sources":["../../../src/check/properties/finalize.ts"],"names":[],"mappings":"AAEA,OAAO,EACL,aAAa,EACb,oBAAoB,EACpB,OAAO,GACR,MAAM,oBAAoB,CAAC;AAC5B,OAAO,EAAE,mBAAmB,EAAE,MAAM,eAAe,CAAC;AACpD,OAAO,EAAE,kBAAkB,EAAE,MAAM,qBAAqB,CAAC;AAEzD,MAAM,UAAU,kBAAkB,CAChC,KAAY,EACZ,UAA+B,EAC/B,OAA4B,EAC5B,MAA+B,EAC/B,KAAsB,EACtB,QAAsC;IAEtC,KAAK,MAAM,QAAQ,IAAI,UAAU,EAAE,CAAC;QAClC,IAAI,QAAQ,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAC;YAAE,SAAS;QAC1C,IAAI,CAAC;YACH,gBAAgB,CAAC,KAAK,EAAE,QAAQ,EAAE,OAAO,EAAE,MAAM,EAAE,KAAK,EAAE,QAAQ,CAAC,CAAC;QACtE,CAAC;QAAC,OAAO,KAAK,EAAE,CAAC;YACf,QAAQ,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,EAAE;gBAC1B,MAAM,EAAE,OAAO;gBACf,QAAQ,EAAE,QAAQ,CAAC,IAAI;gBACvB,OAAO,EAAG,KAAe,CAAC,OAAO;aAClC,CAAC,CAAC;QACL,CAAC;IACH,CAAC;AACH,CAAC;AAED,SAAS,gBAAgB,CACvB,KAAY,EACZ,QAAkB,EAClB,OAA4B,EAC5B,MAA+B,EAC/B,KAAsB,EACtB,QAAsC;IAEtC,IAAI,QAAQ,CAAC,IAAI,KAAK,WAAW,EAAE,CAAC;QAClC,QAAQ,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,EAAE;YAC1B,MAAM,EAAE,iBAAiB;YACzB,QAAQ,EAAE,QAAQ,CAAC,IAAI;YACvB,OAAO,EAAE,oCAAoC;SAC9C,CAAC,CAAC;IACL,CAAC;IACD,IAAI,QAAQ,CAAC,IAAI,KAAK,eAAe,EAAE,CAAC;QACtC,MAAM,OAAO,GAAG,kBAAkB,CAAC,KAAK,EAAE,QAAQ,EAAE,MAAM,EAAE,KAAK,CAAC,CAAC;QACnE,IAAI,OAAO,EAAE,CAAC;YACZ,QAAQ,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,EAAE;gBAC1B,MAAM,EAAE,UAAU;gBAClB,QAAQ,EAAE,QAAQ,CAAC,IAAI;gBACvB,KAAK,EAAE,OAAO,CAAC,OAAO,EAAE,OAAO,CAAC,CAAC,CAAC,CAAC;gBACnC,UAAU,EAAE,KAAK;gBACjB,mBAAmB,EACjB,+EAA+E;aAClF,CAAC,CAAC;QACL,CAAC;IACH,CAAC;IACD,IAAI,QAAQ,CAAC,IAAI,KAAK,eAAe,EAAE,CAAC;QACtC,qBAAqB,CAAC,KAAK,EAAE,QAAQ,EAAE,OAAO,EAAE,KAAK,EAAE,QAAQ,CAAC,CAAC;IACnE,CAAC;AACH,CAAC;AAED,SAAS,qBAAqB,CAC5B,KAAY,EACZ,QAAsD,EACtD,OAA4B,EAC5B,KAAsB,EACtB,QAAsC;IAEtC,MAAM,YAAY,GAAG,KAAK,CAAC,MAAM,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,QAAQ,CAAC,OAAO,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC;IACzE,IAAI,YAAY,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;QAC9B,QAAQ,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,EAAE;YAC1B,MAAM,EAAE,iBAAiB;YACzB,QAAQ,EAAE,QAAQ,CAAC,IAAI;YACvB,OAAO,EAAE,mCAAmC;SAC7C,CAAC,CAAC;QACH,OAAO;IACT,CAAC;IACD,MAAM,OAAO,GAAG,YAAY;SACzB,GAAG,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC;QACd,IAAI;QACJ,MAAM,EAAE,mBAAmB,CAAC,KAAK,EAAE,QAAQ,EAAE,IAAI,CAAC,IAAI,CAAC;KACxD,CAAC,CAAC;SACF,IAAI,CAAC,CAAC,SAAS,EAAE,EAAE,CAAC,SAAS,CAAC,MAAM,CAAC,CAAC;IACzC,IAAI,OAAO,EAAE,CAAC;QACZ,MAAM,MAAM,GAAG,OAAO,CAAC,MAAM,IAAI,EAAE,CAAC;QACpC,QAAQ,CAAC,GAAG,CACV,QAAQ,CAAC,IAAI,EACb,oBAAoB,CAAC,UAAU,EAAE,QAAQ,CAAC,IAAI,EAAE;YAC9C,KAAK,EAAE;gBACL,GAAG,OAAO,CAAC,OAAO,EAAE,OAAO,CAAC,IAAI,CAAC,QAAQ,CAAC,CAAC,KAAK;gBAChD,aAAa,CACX,OAAO,CAAC,IAAI,CAAC,GAAG,EAChB,OAAO,CAAC,IAAI,CAAC,IAAI,EACjB,OAAO,CAAC,IAAI,CAAC,UAAU,CACxB;gBACD,GAAG,MAAM,CAAC,GAAG,CAAC,CAAC,IAAI,EAAE,EAAE,CACrB,aAAa,CAAC,IAAI,CAAC,GAAG,EAAE,IAAI,CAAC,IAAI,EAAE,IAAI,CAAC,UAAU,CAAC,CACpD;aACF;SACF,CAAC,CACH,CAAC;IACJ,CAAC;AACH,CAAC"}

package/dist/check/properties/leads-to.d.ts

@@ -0,0 +1,8 @@
+import type { Model, ModelState, Property } from "modality-ts/core";
+import type { Edge } from "../types.js";
+type LeadsToWithin = Extract<Property, {
+    kind: "leadsToWithin";
+}>;
+export declare function failingSuffixWithin(model: Model, property: LeadsToWithin, start: ModelState): Edge[] | undefined;
+export {};
+//# sourceMappingURL=leads-to.d.ts.map

package/dist/check/properties/leads-to.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"leads-to.d.ts","sourceRoot":"","sources":["../../../src/check/properties/leads-to.ts"],"names":[],"mappings":"AACA,OAAO,KAAK,EAAE,KAAK,EAAE,UAAU,EAAE,QAAQ,EAAc,MAAM,kBAAkB,CAAC;AAMhF,OAAO,KAAK,EAAE,IAAI,EAAE,MAAM,aAAa,CAAC;AAGxC,KAAK,aAAa,GAAG,OAAO,CAAC,QAAQ,EAAE;IAAE,IAAI,EAAE,eAAe,CAAA;CAAE,CAAC,CAAC;AAElE,wBAAgB,mBAAmB,CACjC,KAAK,EAAE,KAAK,EACZ,QAAQ,EAAE,aAAa,EACvB,KAAK,EAAE,UAAU,GAChB,IAAI,EAAE,GAAG,SAAS,CAiCpB"}

package/dist/check/properties/leads-to.js

@@ -0,0 +1,69 @@
+import { canonicalState } from "modality-ts/core";
+import { enabledTransitions } from "../engine/transitions.js";
+import { changedVars } from "../engine/state-utils.js";
+import { stabilize } from "../engine/stabilize.js";
+import { applyEffect } from "../runtime/effects.js";
+import { facts } from "../traces/step-facts.js";
+import { checkedState } from "./checked-state.js";
+export function failingSuffixWithin(model, property, start) {
+    const maxSteps = property.budget.steps ?? property.budget.environment ?? 0;
+    const memo = new Map();
+    const visit = (state, depth) => {
+        if (property.goal(checkedState(model, property, state, "leadsToWithin goal")))
+            return undefined;
+        const canon = canonicalState(model, state);
+        const key = `${canon}:${depth}`;
+        const cached = memo.get(key);
+        if (cached !== undefined)
+            return cached ?? undefined;
+        if (depth >= maxSteps) {
+            memo.set(key, []);
+            return [];
+        }
+        const successors = schedulerSuccessors(model, property, state);
+        if (successors.length === 0) {
+            memo.set(key, []);
+            return [];
+        }
+        for (const edge of successors) {
+            const suffix = visit(edge.post, depth + 1);
+            if (suffix) {
+                const failure = [edge, ...suffix];
+                memo.set(key, failure);
+                return failure;
+            }
+        }
+        memo.set(key, null);
+        return undefined;
+    };
+    return visit(start, 0);
+}
+function schedulerSuccessors(model, property, pre) {
+    const preCanon = canonicalState(model, pre);
+    const out = [];
+    for (const transition of enabledTransitions(model, pre).filter((candidate) => schedulerAllows(property, candidate))) {
+        for (const rawPost of applyEffect(model, pre, transition.effect)) {
+            for (const post of stabilize(model, rawPost, changedVars(pre, rawPost))) {
+                out.push({
+                    preCanon,
+                    postCanon: canonicalState(model, post),
+                    pre,
+                    post,
+                    transition,
+                    step: facts(pre, post, transition),
+                });
+            }
+        }
+    }
+    return out.sort((a, b) => a.transition.id.localeCompare(b.transition.id) ||
+        a.postCanon.localeCompare(b.postCanon));
+}
+function schedulerAllows(property, transition) {
+    if (transition.cls === "env" ||
+        transition.cls === "library" ||
+        transition.cls === "internal")
+        return true;
+    return (property.allowUserEvents === true &&
+        (transition.cls === "user" || transition.cls === "nav"));
+}
+//# sourceMappingURL=leads-to.js.map

package/dist/check/properties/leads-to.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"leads-to.js","sourceRoot":"","sources":["../../../src/check/properties/leads-to.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,cAAc,EAAE,MAAM,kBAAkB,CAAC;AAElD,OAAO,EAAE,kBAAkB,EAAE,MAAM,0BAA0B,CAAC;AAC9D,OAAO,EAAE,WAAW,EAAE,MAAM,0BAA0B,CAAC;AACvD,OAAO,EAAE,SAAS,EAAE,MAAM,wBAAwB,CAAC;AACnD,OAAO,EAAE,WAAW,EAAE,MAAM,uBAAuB,CAAC;AACpD,OAAO,EAAE,KAAK,EAAE,MAAM,yBAAyB,CAAC;AAEhD,OAAO,EAAE,YAAY,EAAE,MAAM,oBAAoB,CAAC;AAIlD,MAAM,UAAU,mBAAmB,CACjC,KAAY,EACZ,QAAuB,EACvB,KAAiB;IAEjB,MAAM,QAAQ,GAAG,QAAQ,CAAC,MAAM,CAAC,KAAK,IAAI,QAAQ,CAAC,MAAM,CAAC,WAAW,IAAI,CAAC,CAAC;IAC3E,MAAM,IAAI,GAAG,IAAI,GAAG,EAAyB,CAAC;IAC9C,MAAM,KAAK,GAAG,CAAC,KAAiB,EAAE,KAAa,EAAsB,EAAE;QACrE,IACE,QAAQ,CAAC,IAAI,CAAC,YAAY,CAAC,KAAK,EAAE,QAAQ,EAAE,KAAK,EAAE,oBAAoB,CAAC,CAAC;YAEzE,OAAO,SAAS,CAAC;QACnB,MAAM,KAAK,GAAG,cAAc,CAAC,KAAK,EAAE,KAAK,CAAC,CAAC;QAC3C,MAAM,GAAG,GAAG,GAAG,KAAK,IAAI,KAAK,EAAE,CAAC;QAChC,MAAM,MAAM,GAAG,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC;QAC7B,IAAI,MAAM,KAAK,SAAS;YAAE,OAAO,MAAM,IAAI,SAAS,CAAC;QACrD,IAAI,KAAK,IAAI,QAAQ,EAAE,CAAC;YACtB,IAAI,CAAC,GAAG,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC;YAClB,OAAO,EAAE,CAAC;QACZ,CAAC;QACD,MAAM,UAAU,GAAG,mBAAmB,CAAC,KAAK,EAAE,QAAQ,EAAE,KAAK,CAAC,CAAC;QAC/D,IAAI,UAAU,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;YAC5B,IAAI,CAAC,GAAG,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC;YAClB,OAAO,EAAE,CAAC;QACZ,CAAC;QACD,KAAK,MAAM,IAAI,IAAI,UAAU,EAAE,CAAC;YAC9B,MAAM,MAAM,GAAG,KAAK,CAAC,IAAI,CAAC,IAAI,EAAE,KAAK,GAAG,CAAC,CAAC,CAAC;YAC3C,IAAI,MAAM,EAAE,CAAC;gBACX,MAAM,OAAO,GAAG,CAAC,IAAI,EAAE,GAAG,MAAM,CAAC,CAAC;gBAClC,IAAI,CAAC,GAAG,CAAC,GAAG,EAAE,OAAO,CAAC,CAAC;gBACvB,OAAO,OAAO,CAAC;YACjB,CAAC;QACH,CAAC;QACD,IAAI,CAAC,GAAG,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC;QACpB,OAAO,SAAS,CAAC;IACnB,CAAC,CAAC;IACF,OAAO,KAAK,CAAC,KAAK,EAAE,CAAC,CAAC,CAAC;AACzB,CAAC;AAED,SAAS,mBAAmB,CAC1B,KAAY,EACZ,QAAuB,EACvB,GAAe;IAEf,MAAM,QAAQ,GAAG,cAAc,CAAC,KAAK,EAAE,GAAG,CAAC,CAAC;IAC5C,MAAM,GAAG,GAAW,EAAE,CAAC;IACvB,KAAK,MAAM,UAAU,IAAI,kBAAkB,CAAC,KAAK,EAAE,GAAG,CAAC,CAAC,MAAM,CAAC,CAAC,SAAS,EAAE,EAAE,CAC3E,eAAe,CAAC,QAAQ,EAAE,SAAS,CAAC,CACrC,EAAE,CAAC;QACF,KAAK,MAAM,OAAO,IAAI,WAAW,CAAC,KAAK,EAAE,GAAG,EAAE,UAAU,CAAC,MAAM,CAAC,EAAE,CAAC;YACjE,KAAK,MAAM,IAAI,IAAI,SAAS,CAAC,KAAK,EAAE,OAAO,EAAE,WAAW,CAAC,GAAG,EAAE,OAAO,CAAC,CAAC,EAAE,CAAC;gBACxE,GAAG,CAAC,IAAI,CAAC;oBACP,QAAQ;oBACR,SAAS,EAAE,cAAc,CAAC,KAAK,EAAE,IAAI,CAAC;oBACtC,GAAG;oBACH,IAAI;oBACJ,UAAU;oBACV,IAAI,EAAE,KAAK,CAAC,GAAG,EAAE,IAAI,EAAE,UAAU,CAAC;iBACnC,CAAC,CAAC;YACL,CAAC;QACH,CAAC;IACH,CAAC;IACD,OAAO,GAAG,CAAC,IAAI,CACb,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CACP,CAAC,CAAC,UAAU,CAAC,EAAE,CAAC,aAAa,CAAC,CAAC,CAAC,UAAU,CAAC,EAAE,CAAC;QAC9C,CAAC,CAAC,SAAS,CAAC,aAAa,CAAC,CAAC,CAAC,SAAS,CAAC,CACzC,CAAC;AACJ,CAAC;AAED,SAAS,eAAe,CACtB,QAAuB,EACvB,UAAsB;IAEtB,IACE,UAAU,CAAC,GAAG,KAAK,KAAK;QACxB,UAAU,CAAC,GAAG,KAAK,SAAS;QAC5B,UAAU,CAAC,GAAG,KAAK,UAAU;QAE7B,OAAO,IAAI,CAAC;IACd,OAAO,CACL,QAAQ,CAAC,eAAe,KAAK,IAAI;QACjC,CAAC,UAAU,CAAC,GAAG,KAAK,MAAM,IAAI,UAAU,CAAC,GAAG,KAAK,KAAK,CAAC,CACxD,CAAC;AACJ,CAAC"}

package/dist/check/properties/observe.d.ts

@@ -0,0 +1,5 @@
+import type { Model, ModelState, Property, StepFacts, Transition } from "modality-ts/core";
+import type { Parent, PropertyVerdict } from "../types.js";
+export declare function observeStates(model: Model, properties: readonly Property[], candidates: readonly ModelState[], parents: Map<string, Parent>, verdicts: Map<string, PropertyVerdict>): void;
+export declare function observeEdge(model: Model, properties: readonly Property[], pre: ModelState, post: ModelState, transition: Transition, step: StepFacts, parents: Map<string, Parent>, verdicts: Map<string, PropertyVerdict>): void;
+//# sourceMappingURL=observe.d.ts.map

package/dist/check/properties/observe.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"observe.d.ts","sourceRoot":"","sources":["../../../src/check/properties/observe.ts"],"names":[],"mappings":"AACA,OAAO,KAAK,EACV,KAAK,EACL,UAAU,EACV,QAAQ,EACR,SAAS,EACT,UAAU,EACX,MAAM,kBAAkB,CAAC;AAC1B,OAAO,KAAK,EAAE,MAAM,EAAE,eAAe,EAAE,MAAM,aAAa,CAAC;AAQ3D,wBAAgB,aAAa,CAC3B,KAAK,EAAE,KAAK,EACZ,UAAU,EAAE,SAAS,QAAQ,EAAE,EAC/B,UAAU,EAAE,SAAS,UAAU,EAAE,EACjC,OAAO,EAAE,GAAG,CAAC,MAAM,EAAE,MAAM,CAAC,EAC5B,QAAQ,EAAE,GAAG,CAAC,MAAM,EAAE,eAAe,CAAC,GACrC,IAAI,CA6CN;AAED,wBAAgB,WAAW,CACzB,KAAK,EAAE,KAAK,EACZ,UAAU,EAAE,SAAS,QAAQ,EAAE,EAC/B,GAAG,EAAE,UAAU,EACf,IAAI,EAAE,UAAU,EAChB,UAAU,EAAE,UAAU,EACtB,IAAI,EAAE,SAAS,EACf,OAAO,EAAE,GAAG,CAAC,MAAM,EAAE,MAAM,CAAC,EAC5B,QAAQ,EAAE,GAAG,CAAC,MAAM,EAAE,eAAe,CAAC,GACrC,IAAI,CA+BN"}

package/dist/check/properties/observe.js

@@ -0,0 +1,56 @@
+import { canonicalState } from "modality-ts/core";
+import { checkedState } from "./checked-state.js";
+import { makeTraceStep, replayCheckedVerdict, traceTo, } from "../traces/trace.js";
+export function observeStates(model, properties, candidates, parents, verdicts) {
+    for (const state of candidates) {
+        const canon = canonicalState(model, state);
+        for (const property of properties) {
+            if (verdicts.has(property.name))
+                continue;
+            try {
+                if (property.kind === "always" &&
+                    !property.predicate(checkedState(model, property, state, "state predicate"))) {
+                    verdicts.set(property.name, replayCheckedVerdict("violated", property.name, traceTo(parents, canon)));
+                }
+                if (property.kind === "reachable" &&
+                    property.predicate(checkedState(model, property, state, "state predicate"))) {
+                    verdicts.set(property.name, replayCheckedVerdict("reachable", property.name, traceTo(parents, canon)));
+                }
+            }
+            catch (error) {
+                verdicts.set(property.name, {
+                    status: "error",
+                    property: property.name,
+                    message: error.message,
+                });
+            }
+        }
+    }
+}
+export function observeEdge(model, properties, pre, post, transition, step, parents, verdicts) {
+    for (const property of properties) {
+        if (verdicts.has(property.name))
+            continue;
+        if (property.kind !== "alwaysStep")
+            continue;
+        try {
+            if (!property.predicate(checkedState(model, property, pre, "step pre-state"), step, checkedState(model, property, post, "step post-state"))) {
+                const preCanon = canonicalState(model, pre);
+                verdicts.set(property.name, replayCheckedVerdict("violated", property.name, {
+                    steps: [
+                        ...traceTo(parents, preCanon).steps,
+                        makeTraceStep(pre, post, transition),
+                    ],
+                }));
+            }
+        }
+        catch (error) {
+            verdicts.set(property.name, {
+                status: "error",
+                property: property.name,
+                message: error.message,
+            });
+        }
+    }
+}
+//# sourceMappingURL=observe.js.map

package/dist/check/properties/observe.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"observe.js","sourceRoot":"","sources":["../../../src/check/properties/observe.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,cAAc,EAAE,MAAM,kBAAkB,CAAC;AASlD,OAAO,EAAE,YAAY,EAAE,MAAM,oBAAoB,CAAC;AAClD,OAAO,EACL,aAAa,EACb,oBAAoB,EACpB,OAAO,GACR,MAAM,oBAAoB,CAAC;AAE5B,MAAM,UAAU,aAAa,CAC3B,KAAY,EACZ,UAA+B,EAC/B,UAAiC,EACjC,OAA4B,EAC5B,QAAsC;IAEtC,KAAK,MAAM,KAAK,IAAI,UAAU,EAAE,CAAC;QAC/B,MAAM,KAAK,GAAG,cAAc,CAAC,KAAK,EAAE,KAAK,CAAC,CAAC;QAC3C,KAAK,MAAM,QAAQ,IAAI,UAAU,EAAE,CAAC;YAClC,IAAI,QAAQ,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAC;gBAAE,SAAS;YAC1C,IAAI,CAAC;gBACH,IACE,QAAQ,CAAC,IAAI,KAAK,QAAQ;oBAC1B,CAAC,QAAQ,CAAC,SAAS,CACjB,YAAY,CAAC,KAAK,EAAE,QAAQ,EAAE,KAAK,EAAE,iBAAiB,CAAC,CACxD,EACD,CAAC;oBACD,QAAQ,CAAC,GAAG,CACV,QAAQ,CAAC,IAAI,EACb,oBAAoB,CAClB,UAAU,EACV,QAAQ,CAAC,IAAI,EACb,OAAO,CAAC,OAAO,EAAE,KAAK,CAAC,CACxB,CACF,CAAC;gBACJ,CAAC;gBACD,IACE,QAAQ,CAAC,IAAI,KAAK,WAAW;oBAC7B,QAAQ,CAAC,SAAS,CAChB,YAAY,CAAC,KAAK,EAAE,QAAQ,EAAE,KAAK,EAAE,iBAAiB,CAAC,CACxD,EACD,CAAC;oBACD,QAAQ,CAAC,GAAG,CACV,QAAQ,CAAC,IAAI,EACb,oBAAoB,CAClB,WAAW,EACX,QAAQ,CAAC,IAAI,EACb,OAAO,CAAC,OAAO,EAAE,KAAK,CAAC,CACxB,CACF,CAAC;gBACJ,CAAC;YACH,CAAC;YAAC,OAAO,KAAK,EAAE,CAAC;gBACf,QAAQ,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,EAAE;oBAC1B,MAAM,EAAE,OAAO;oBACf,QAAQ,EAAE,QAAQ,CAAC,IAAI;oBACvB,OAAO,EAAG,KAAe,CAAC,OAAO;iBAClC,CAAC,CAAC;YACL,CAAC;QACH,CAAC;IACH,CAAC;AACH,CAAC;AAED,MAAM,UAAU,WAAW,CACzB,KAAY,EACZ,UAA+B,EAC/B,GAAe,EACf,IAAgB,EAChB,UAAsB,EACtB,IAAe,EACf,OAA4B,EAC5B,QAAsC;IAEtC,KAAK,MAAM,QAAQ,IAAI,UAAU,EAAE,CAAC;QAClC,IAAI,QAAQ,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAC;YAAE,SAAS;QAC1C,IAAI,QAAQ,CAAC,IAAI,KAAK,YAAY;YAAE,SAAS;QAC7C,IAAI,CAAC;YACH,IACE,CAAC,QAAQ,CAAC,SAAS,CACjB,YAAY,CAAC,KAAK,EAAE,QAAQ,EAAE,GAAG,EAAE,gBAAgB,CAAC,EACpD,IAAI,EACJ,YAAY,CAAC,KAAK,EAAE,QAAQ,EAAE,IAAI,EAAE,iBAAiB,CAAC,CACvD,EACD,CAAC;gBACD,MAAM,QAAQ,GAAG,cAAc,CAAC,KAAK,EAAE,GAAG,CAAC,CAAC;gBAC5C,QAAQ,CAAC,GAAG,CACV,QAAQ,CAAC,IAAI,EACb,oBAAoB,CAAC,UAAU,EAAE,QAAQ,CAAC,IAAI,EAAE;oBAC9C,KAAK,EAAE;wBACL,GAAG,OAAO,CAAC,OAAO,EAAE,QAAQ,CAAC,CAAC,KAAK;wBACnC,aAAa,CAAC,GAAG,EAAE,IAAI,EAAE,UAAU,CAAC;qBACrC;iBACF,CAAC,CACH,CAAC;YACJ,CAAC;QACH,CAAC;QAAC,OAAO,KAAK,EAAE,CAAC;YACf,QAAQ,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,EAAE;gBAC1B,MAAM,EAAE,OAAO;gBACf,QAAQ,EAAE,QAAQ,CAAC,IAAI;gBACvB,OAAO,EAAG,KAAe,CAAC,OAAO;aAClC,CAAC,CAAC;QACL,CAAC;IACH,CAAC;AACH,CAAC"}

package/dist/check/properties/reachable-from.d.ts

@@ -0,0 +1,8 @@
+import type { Model, ModelState, Property } from "modality-ts/core";
+import type { Edge } from "../types.js";
+type ReachableFrom = Extract<Property, {
+    kind: "reachableFrom";
+}>;
+export declare function unreachableWitness(model: Model, property: ReachableFrom, states: Map<string, ModelState>, edges: readonly Edge[]): [string, ModelState] | undefined;
+export {};
+//# sourceMappingURL=reachable-from.d.ts.map

package/dist/check/properties/reachable-from.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"reachable-from.d.ts","sourceRoot":"","sources":["../../../src/check/properties/reachable-from.ts"],"names":[],"mappings":"AAAA,OAAO,KAAK,EAAE,KAAK,EAAE,UAAU,EAAE,QAAQ,EAAE,MAAM,kBAAkB,CAAC;AACpE,OAAO,KAAK,EAAE,IAAI,EAAE,MAAM,aAAa,CAAC;AAGxC,KAAK,aAAa,GAAG,OAAO,CAAC,QAAQ,EAAE;IAAE,IAAI,EAAE,eAAe,CAAA;CAAE,CAAC,CAAC;AAElE,wBAAgB,kBAAkB,CAChC,KAAK,EAAE,KAAK,EACZ,QAAQ,EAAE,aAAa,EACvB,MAAM,EAAE,GAAG,CAAC,MAAM,EAAE,UAAU,CAAC,EAC/B,KAAK,EAAE,SAAS,IAAI,EAAE,GACrB,CAAC,MAAM,EAAE,UAAU,CAAC,GAAG,SAAS,CAuBlC"}

package/dist/check/properties/reachable-from.js

@@ -0,0 +1,19 @@
+import { checkedState } from "./checked-state.js";
+export function unreachableWitness(model, property, states, edges) {
+    const goalCanons = [...states]
+        .filter(([, state]) => property.goal(checkedState(model, property, state, "reachableFrom goal")))
+        .map(([canon]) => canon);
+    const backward = new Set(goalCanons);
+    let changed = true;
+    while (changed) {
+        changed = false;
+        for (const edge of edges) {
+            if (backward.has(edge.postCanon) && !backward.has(edge.preCanon)) {
+                backward.add(edge.preCanon);
+                changed = true;
+            }
+        }
+    }
+    return [...states].find(([canon, state]) => property.when(checkedState(model, property, state, "reachableFrom when")) && !backward.has(canon));
+}
+//# sourceMappingURL=reachable-from.js.map

package/dist/check/properties/reachable-from.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"reachable-from.js","sourceRoot":"","sources":["../../../src/check/properties/reachable-from.ts"],"names":[],"mappings":"AAEA,OAAO,EAAE,YAAY,EAAE,MAAM,oBAAoB,CAAC;AAIlD,MAAM,UAAU,kBAAkB,CAChC,KAAY,EACZ,QAAuB,EACvB,MAA+B,EAC/B,KAAsB;IAEtB,MAAM,UAAU,GAAG,CAAC,GAAG,MAAM,CAAC;SAC3B,MAAM,CAAC,CAAC,CAAC,EAAE,KAAK,CAAC,EAAE,EAAE,CACpB,QAAQ,CAAC,IAAI,CAAC,YAAY,CAAC,KAAK,EAAE,QAAQ,EAAE,KAAK,EAAE,oBAAoB,CAAC,CAAC,CAC1E;SACA,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,EAAE,EAAE,CAAC,KAAK,CAAC,CAAC;IAC3B,MAAM,QAAQ,GAAG,IAAI,GAAG,CAAC,UAAU,CAAC,CAAC;IACrC,IAAI,OAAO,GAAG,IAAI,CAAC;IACnB,OAAO,OAAO,EAAE,CAAC;QACf,OAAO,GAAG,KAAK,CAAC;QAChB,KAAK,MAAM,IAAI,IAAI,KAAK,EAAE,CAAC;YACzB,IAAI,QAAQ,CAAC,GAAG,CAAC,IAAI,CAAC,SAAS,CAAC,IAAI,CAAC,QAAQ,CAAC,GAAG,CAAC,IAAI,CAAC,QAAQ,CAAC,EAAE,CAAC;gBACjE,QAAQ,CAAC,GAAG,CAAC,IAAI,CAAC,QAAQ,CAAC,CAAC;gBAC5B,OAAO,GAAG,IAAI,CAAC;YACjB,CAAC;QACH,CAAC;IACH,CAAC;IACD,OAAO,CAAC,GAAG,MAAM,CAAC,CAAC,IAAI,CACrB,CAAC,CAAC,KAAK,EAAE,KAAK,CAAC,EAAE,EAAE,CACjB,QAAQ,CAAC,IAAI,CACX,YAAY,CAAC,KAAK,EAAE,QAAQ,EAAE,KAAK,EAAE,oBAAoB,CAAC,CAC3D,IAAI,CAAC,QAAQ,CAAC,GAAG,CAAC,KAAK,CAAC,CAC5B,CAAC;AACJ,CAAC"}

package/dist/check/runtime/domains.d.ts

@@ -0,0 +1,5 @@
+import type { AbstractDomain, ExprIR, Model } from "modality-ts/core";
+export declare function taggedDomainForExpr(model: Model, expr: ExprIR): Extract<AbstractDomain, {
+    kind: "tagged";
+}> | undefined;
+//# sourceMappingURL=domains.d.ts.map

package/dist/check/runtime/domains.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"domains.d.ts","sourceRoot":"","sources":["../../../src/check/runtime/domains.ts"],"names":[],"mappings":"AAAA,OAAO,KAAK,EAAE,cAAc,EAAE,MAAM,EAAE,KAAK,EAAE,MAAM,kBAAkB,CAAC;AAEtE,wBAAgB,mBAAmB,CACjC,KAAK,EAAE,KAAK,EACZ,IAAI,EAAE,MAAM,GACX,OAAO,CAAC,cAAc,EAAE;IAAE,IAAI,EAAE,QAAQ,CAAA;CAAE,CAAC,GAAG,SAAS,CAGzD"}

package/dist/check/runtime/domains.js

@@ -0,0 +1,53 @@
+export function taggedDomainForExpr(model, expr) {
+    const domain = domainForExpr(model, expr);
+    return domain?.kind === "tagged" ? domain : undefined;
+}
+function domainForExpr(model, expr) {
+    switch (expr.kind) {
+        case "read": {
+            const decl = model.vars.find((candidate) => candidate.id === expr.var);
+            return decl ? domainAtPath(decl.domain, expr.path ?? []) : undefined;
+        }
+        case "cond": {
+            const thenDomain = domainForExpr(model, expr.args[1]);
+            const elseDomain = domainForExpr(model, expr.args[2]);
+            return thenDomain &&
+                elseDomain &&
+                JSON.stringify(thenDomain) === JSON.stringify(elseDomain)
+                ? thenDomain
+                : undefined;
+        }
+        case "updateField":
+            return domainForExpr(model, expr.target);
+        default:
+            return undefined;
+    }
+}
+function domainAtPath(domain, path) {
+    let current = domain;
+    for (const segment of path) {
+        if (!current)
+            return undefined;
+        while (current.kind === "option")
+            current = current.inner;
+        if (current.kind === "record")
+            current = current.fields[segment];
+        else if (current.kind === "boundedList") {
+            if (!/^\d+$/.test(segment))
+                return undefined;
+            const index = Number(segment);
+            current =
+                index >= 0 && index < current.maxLen ? current.inner : undefined;
+        }
+        else if (current.kind === "tagged") {
+            current =
+                segment === current.tag
+                    ? { kind: "enum", values: Object.keys(current.variants) }
+                    : undefined;
+        }
+        else
+            return undefined;
+    }
+    return current;
+}
+//# sourceMappingURL=domains.js.map

package/dist/check/runtime/domains.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"domains.js","sourceRoot":"","sources":["../../../src/check/runtime/domains.ts"],"names":[],"mappings":"AAEA,MAAM,UAAU,mBAAmB,CACjC,KAAY,EACZ,IAAY;IAEZ,MAAM,MAAM,GAAG,aAAa,CAAC,KAAK,EAAE,IAAI,CAAC,CAAC;IAC1C,OAAO,MAAM,EAAE,IAAI,KAAK,QAAQ,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,SAAS,CAAC;AACxD,CAAC;AAED,SAAS,aAAa,CAAC,KAAY,EAAE,IAAY;IAC/C,QAAQ,IAAI,CAAC,IAAI,EAAE,CAAC;QAClB,KAAK,MAAM,CAAC,CAAC,CAAC;YACZ,MAAM,IAAI,GAAG,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,SAAS,EAAE,EAAE,CAAC,SAAS,CAAC,EAAE,KAAK,IAAI,CAAC,GAAG,CAAC,CAAC;YACvE,OAAO,IAAI,CAAC,CAAC,CAAC,YAAY,CAAC,IAAI,CAAC,MAAM,EAAE,IAAI,CAAC,IAAI,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC;QACvE,CAAC;QACD,KAAK,MAAM,CAAC,CAAC,CAAC;YACZ,MAAM,UAAU,GAAG,aAAa,CAAC,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;YACtD,MAAM,UAAU,GAAG,aAAa,CAAC,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;YACtD,OAAO,UAAU;gBACf,UAAU;gBACV,IAAI,CAAC,SAAS,CAAC,UAAU,CAAC,KAAK,IAAI,CAAC,SAAS,CAAC,UAAU,CAAC;gBACzD,CAAC,CAAC,UAAU;gBACZ,CAAC,CAAC,SAAS,CAAC;QAChB,CAAC;QACD,KAAK,aAAa;YAChB,OAAO,aAAa,CAAC,KAAK,EAAE,IAAI,CAAC,MAAM,CAAC,CAAC;QAC3C;YACE,OAAO,SAAS,CAAC;IACrB,CAAC;AACH,CAAC;AAED,SAAS,YAAY,CACnB,MAAsB,EACtB,IAAuB;IAEvB,IAAI,OAAO,GAA+B,MAAM,CAAC;IACjD,KAAK,MAAM,OAAO,IAAI,IAAI,EAAE,CAAC;QAC3B,IAAI,CAAC,OAAO;YAAE,OAAO,SAAS,CAAC;QAC/B,OAAO,OAAO,CAAC,IAAI,KAAK,QAAQ;YAAE,OAAO,GAAG,OAAO,CAAC,KAAK,CAAC;QAC1D,IAAI,OAAO,CAAC,IAAI,KAAK,QAAQ;YAAE,OAAO,GAAG,OAAO,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;aAC5D,IAAI,OAAO,CAAC,IAAI,KAAK,aAAa,EAAE,CAAC;YACxC,IAAI,CAAC,OAAO,CAAC,IAAI,CAAC,OAAO,CAAC;gBAAE,OAAO,SAAS,CAAC;YAC7C,MAAM,KAAK,GAAG,MAAM,CAAC,OAAO,CAAC,CAAC;YAC9B,OAAO;gBACL,KAAK,IAAI,CAAC,IAAI,KAAK,GAAG,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,OAAO,CAAC,KAAK,CAAC,CAAC,CAAC,SAAS,CAAC;QACrE,CAAC;aAAM,IAAI,OAAO,CAAC,IAAI,KAAK,QAAQ,EAAE,CAAC;YACrC,OAAO;gBACL,OAAO,KAAK,OAAO,CAAC,GAAG;oBACrB,CAAC,CAAC,EAAE,IAAI,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,CAAC,IAAI,CAAC,OAAO,CAAC,QAAQ,CAAC,EAAE;oBACzD,CAAC,CAAC,SAAS,CAAC;QAClB,CAAC;;YAAM,OAAO,SAAS,CAAC;IAC1B,CAAC;IACD,OAAO,OAAO,CAAC;AACjB,CAAC"}

package/dist/check/runtime/effects.d.ts

@@ -0,0 +1,9 @@
+import type { EffectIR, Model, ModelState } from "modality-ts/core";
+import type { EvalOptions } from "./expr.js";
+import type { PendingOp } from "./pending.js";
+export type { EvalOptions, PendingOp };
+export { evalExpr, guardHolds } from "./expr.js";
+export { normalizeInitialRouteLocals } from "./navigation.js";
+export { readPending } from "./pending.js";
+export declare function applyEffect(model: Model, state: ModelState, effect: EffectIR, options?: EvalOptions): ModelState[];
+//# sourceMappingURL=effects.d.ts.map

package/dist/check/runtime/effects.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"effects.d.ts","sourceRoot":"","sources":["../../../src/check/runtime/effects.ts"],"names":[],"mappings":"AACA,OAAO,KAAK,EAAE,QAAQ,EAAE,KAAK,EAAE,UAAU,EAAE,MAAM,kBAAkB,CAAC;AACpE,OAAO,KAAK,EAAE,WAAW,EAAE,MAAM,WAAW,CAAC;AAI7C,OAAO,KAAK,EAAE,SAAS,EAAE,MAAM,cAAc,CAAC;AAI9C,YAAY,EAAE,WAAW,EAAE,SAAS,EAAE,CAAC;AACvC,OAAO,EAAE,QAAQ,EAAE,UAAU,EAAE,MAAM,WAAW,CAAC;AACjD,OAAO,EAAE,2BAA2B,EAAE,MAAM,iBAAiB,CAAC;AAC9D,OAAO,EAAE,WAAW,EAAE,MAAM,cAAc,CAAC;AAE3C,wBAAgB,WAAW,CACzB,KAAK,EAAE,KAAK,EACZ,KAAK,EAAE,UAAU,EACjB,MAAM,EAAE,QAAQ,EAChB,OAAO,GAAE,WAAgB,GACxB,UAAU,EAAE,CAUd"}

package/dist/check/runtime/effects.js

@@ -0,0 +1,86 @@
+import { enumerateDomain } from "modality-ts/core";
+import { evalExpr } from "./expr.js";
+import { navigate } from "./navigation.js";
+import { applyOpaqueEffect } from "./opaque.js";
+import { readPending } from "./pending.js";
+import { TokenExhausted } from "./tokens.js";
+export { evalExpr, guardHolds } from "./expr.js";
+export { normalizeInitialRouteLocals } from "./navigation.js";
+export { readPending } from "./pending.js";
+export function applyEffect(model, state, effect, options = {}) {
+    try {
+        return applyEffectUnsafe(model, state, effect, options);
+    }
+    catch (error) {
+        if (error instanceof TokenExhausted) {
+            options.onBoundHit?.(`token cap exhausted for ${error.domainOf}`);
+            return [];
+        }
+        throw error;
+    }
+}
+function applyEffectUnsafe(model, state, effect, options) {
+    switch (effect.kind) {
+        case "assign":
+            return [
+                {
+                    ...state,
+                    [effect.var]: evalExpr(model, state, effect.expr, options),
+                },
+            ];
+        case "havoc": {
+            const decl = mustVar(model, effect.var);
+            return enumerateDomain(decl.domain).map((value) => ({
+                ...state,
+                [effect.var]: value,
+            }));
+        }
+        case "choose":
+            return effect.among.map((expr) => ({
+                ...state,
+                [effect.var]: evalExpr(model, state, expr, options),
+            }));
+        case "if":
+            return applyEffect(model, state, evalExpr(model, state, effect.cond, options)
+                ? effect.then
+                : effect.else, options);
+        case "seq":
+            return effect.effects.reduce((states, next) => states.flatMap((candidate) => applyEffect(model, candidate, next, options)), [state]);
+        case "enqueue": {
+            const pending = readPending(state);
+            if (pending.length >= model.bounds.maxPending)
+                return [];
+            const op = {
+                opId: effect.op,
+                continuation: effect.continuation,
+                args: Object.fromEntries(Object.entries(effect.args).map(([key, expr]) => [
+                    key,
+                    evalExpr(model, state, expr, options),
+                ])),
+            };
+            return [{ ...state, "sys:pending": [...pending, op] }];
+        }
+        case "dequeue": {
+            const pending = readPending(state);
+            if (effect.index < 0 || effect.index >= pending.length)
+                return [state];
+            return [
+                {
+                    ...state,
+                    "sys:pending": pending.filter((_, index) => index !== effect.index),
+                },
+            ];
+        }
+        case "navigate":
+            return navigate(model, state, effect, options);
+        case "opaque":
+            return applyOpaqueEffect(model, state, effect.ref);
+    }
+}
+function mustVar(model, id) {
+    const decl = model.vars.find((candidate) => candidate.id === id);
+    if (!decl)
+        throw new Error(`Unknown var ${id}`);
+    return decl;
+}
+//# sourceMappingURL=effects.js.map

package/dist/check/runtime/effects.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"effects.js","sourceRoot":"","sources":["../../../src/check/runtime/effects.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,eAAe,EAAE,MAAM,kBAAkB,CAAC;AAGnD,OAAO,EAAE,QAAQ,EAAE,MAAM,WAAW,CAAC;AACrC,OAAO,EAAE,QAAQ,EAAE,MAAM,iBAAiB,CAAC;AAC3C,OAAO,EAAE,iBAAiB,EAAE,MAAM,aAAa,CAAC;AAEhD,OAAO,EAAE,WAAW,EAAE,MAAM,cAAc,CAAC;AAC3C,OAAO,EAAE,cAAc,EAAE,MAAM,aAAa,CAAC;AAG7C,OAAO,EAAE,QAAQ,EAAE,UAAU,EAAE,MAAM,WAAW,CAAC;AACjD,OAAO,EAAE,2BAA2B,EAAE,MAAM,iBAAiB,CAAC;AAC9D,OAAO,EAAE,WAAW,EAAE,MAAM,cAAc,CAAC;AAE3C,MAAM,UAAU,WAAW,CACzB,KAAY,EACZ,KAAiB,EACjB,MAAgB,EAChB,UAAuB,EAAE;IAEzB,IAAI,CAAC;QACH,OAAO,iBAAiB,CAAC,KAAK,EAAE,KAAK,EAAE,MAAM,EAAE,OAAO,CAAC,CAAC;IAC1D,CAAC;IAAC,OAAO,KAAK,EAAE,CAAC;QACf,IAAI,KAAK,YAAY,cAAc,EAAE,CAAC;YACpC,OAAO,CAAC,UAAU,EAAE,CAAC,2BAA2B,KAAK,CAAC,QAAQ,EAAE,CAAC,CAAC;YAClE,OAAO,EAAE,CAAC;QACZ,CAAC;QACD,MAAM,KAAK,CAAC;IACd,CAAC;AACH,CAAC;AAED,SAAS,iBAAiB,CACxB,KAAY,EACZ,KAAiB,EACjB,MAAgB,EAChB,OAAoB;IAEpB,QAAQ,MAAM,CAAC,IAAI,EAAE,CAAC;QACpB,KAAK,QAAQ;YACX,OAAO;gBACL;oBACE,GAAG,KAAK;oBACR,CAAC,MAAM,CAAC,GAAG,CAAC,EAAE,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,MAAM,CAAC,IAAI,EAAE,OAAO,CAAC;iBAC3D;aACF,CAAC;QACJ,KAAK,OAAO,CAAC,CAAC,CAAC;YACb,MAAM,IAAI,GAAG,OAAO,CAAC,KAAK,EAAE,MAAM,CAAC,GAAG,CAAC,CAAC;YACxC,OAAO,eAAe,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,CAAC;gBAClD,GAAG,KAAK;gBACR,CAAC,MAAM,CAAC,GAAG,CAAC,EAAE,KAAK;aACpB,CAAC,CAAC,CAAC;QACN,CAAC;QACD,KAAK,QAAQ;YACX,OAAO,MAAM,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC;gBACjC,GAAG,KAAK;gBACR,CAAC,MAAM,CAAC,GAAG,CAAC,EAAE,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,EAAE,OAAO,CAAC;aACpD,CAAC,CAAC,CAAC;QACN,KAAK,IAAI;YACP,OAAO,WAAW,CAChB,KAAK,EACL,KAAK,EACL,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,MAAM,CAAC,IAAI,EAAE,OAAO,CAAC;gBAC1C,CAAC,CAAC,MAAM,CAAC,IAAI;gBACb,CAAC,CAAC,MAAM,CAAC,IAAI,EACf,OAAO,CACR,CAAC;QACJ,KAAK,KAAK;YACR,OAAO,MAAM,CAAC,OAAO,CAAC,MAAM,CAC1B,CAAC,MAAM,EAAE,IAAI,EAAE,EAAE,CACf,MAAM,CAAC,OAAO,CAAC,CAAC,SAAS,EAAE,EAAE,CAC3B,WAAW,CAAC,KAAK,EAAE,SAAS,EAAE,IAAI,EAAE,OAAO,CAAC,CAC7C,EACH,CAAC,KAAK,CAAC,CACR,CAAC;QACJ,KAAK,SAAS,CAAC,CAAC,CAAC;YACf,MAAM,OAAO,GAAG,WAAW,CAAC,KAAK,CAAC,CAAC;YACnC,IAAI,OAAO,CAAC,MAAM,IAAI,KAAK,CAAC,MAAM,CAAC,UAAU;gBAAE,OAAO,EAAE,CAAC;YACzD,MAAM,EAAE,GAAc;gBACpB,IAAI,EAAE,MAAM,CAAC,EAAE;gBACf,YAAY,EAAE,MAAM,CAAC,YAAY;gBACjC,IAAI,EAAE,MAAM,CAAC,WAAW,CACtB,MAAM,CAAC,OAAO,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,EAAE,IAAI,CAAC,EAAE,EAAE,CAAC;oBAC/C,GAAG;oBACH,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,EAAE,OAAO,CAAC;iBACtC,CAAC,CACH;aACF,CAAC;YACF,OAAO,CAAC,EAAE,GAAG,KAAK,EAAE,aAAa,EAAE,CAAC,GAAG,OAAO,EAAE,EAAE,CAAC,EAAE,CAAC,CAAC;QACzD,CAAC;QACD,KAAK,SAAS,CAAC,CAAC,CAAC;YACf,MAAM,OAAO,GAAG,WAAW,CAAC,KAAK,CAAC,CAAC;YACnC,IAAI,MAAM,CAAC,KAAK,GAAG,CAAC,IAAI,MAAM,CAAC,KAAK,IAAI,OAAO,CAAC,MAAM;gBAAE,OAAO,CAAC,KAAK,CAAC,CAAC;YACvE,OAAO;gBACL;oBACE,GAAG,KAAK;oBACR,aAAa,EAAE,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,EAAE,CAAC,KAAK,KAAK,MAAM,CAAC,KAAK,CAAC;iBACpE;aACF,CAAC;QACJ,CAAC;QACD,KAAK,UAAU;YACb,OAAO,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,MAAM,EAAE,OAAO,CAAC,CAAC;QACjD,KAAK,QAAQ;YACX,OAAO,iBAAiB,CAAC,KAAK,EAAE,KAAK,EAAE,MAAM,CAAC,GAAG,CAAC,CAAC;IACvD,CAAC;AACH,CAAC;AAED,SAAS,OAAO,CAAC,KAAY,EAAE,EAAU;IACvC,MAAM,IAAI,GAAG,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,SAAS,EAAE,EAAE,CAAC,SAAS,CAAC,EAAE,KAAK,EAAE,CAAC,CAAC;IACjE,IAAI,CAAC,IAAI;QAAE,MAAM,IAAI,KAAK,CAAC,eAAe,EAAE,EAAE,CAAC,CAAC;IAChD,OAAO,IAAI,CAAC;AACd,CAAC"}

package/dist/check/runtime/expr.d.ts

@@ -0,0 +1,7 @@
+import type { ExprIR, Model, ModelState, Transition, Value } from "modality-ts/core";
+export interface EvalOptions {
+    onBoundHit?: (hit: string) => void;
+}
+export declare function evalExpr(model: Model, state: ModelState, expr: ExprIR, options?: EvalOptions): Value;
+export declare function guardHolds(model: Model, transition: Transition, state: ModelState): boolean;
+//# sourceMappingURL=expr.d.ts.map

package/dist/check/runtime/expr.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"expr.d.ts","sourceRoot":"","sources":["../../../src/check/runtime/expr.ts"],"names":[],"mappings":"AAAA,OAAO,KAAK,EACV,MAAM,EACN,KAAK,EACL,UAAU,EACV,UAAU,EACV,KAAK,EACN,MAAM,kBAAkB,CAAC;AAK1B,MAAM,WAAW,WAAW;IAC1B,UAAU,CAAC,EAAE,CAAC,GAAG,EAAE,MAAM,KAAK,IAAI,CAAC;CACpC;AAED,wBAAgB,QAAQ,CACtB,KAAK,EAAE,KAAK,EACZ,KAAK,EAAE,UAAU,EACjB,IAAI,EAAE,MAAM,EACZ,OAAO,GAAE,WAAgB,GACxB,KAAK,CAmDP;AAED,wBAAgB,UAAU,CACxB,KAAK,EAAE,KAAK,EACZ,UAAU,EAAE,UAAU,EACtB,KAAK,EAAE,UAAU,GAChB,OAAO,CAET"}

package/dist/check/runtime/expr.js

@@ -0,0 +1,49 @@
+import { taggedDomainForExpr } from "./domains.js";
+import { readPath, writePath } from "./paths.js";
+import { freshToken } from "./tokens.js";
+export function evalExpr(model, state, expr, options = {}) {
+    switch (expr.kind) {
+        case "lit":
+            return expr.value;
+        case "read":
+            return readPath(state[expr.var], expr.path ?? []);
+        case "eq":
+            return (JSON.stringify(evalExpr(model, state, expr.args[0], options)) ===
+                JSON.stringify(evalExpr(model, state, expr.args[1], options)));
+        case "neq":
+            return (JSON.stringify(evalExpr(model, state, expr.args[0], options)) !==
+                JSON.stringify(evalExpr(model, state, expr.args[1], options)));
+        case "and":
+            return expr.args.every((arg) => Boolean(evalExpr(model, state, arg, options)));
+        case "or":
+            return expr.args.some((arg) => Boolean(evalExpr(model, state, arg, options)));
+        case "not":
+            return !evalExpr(model, state, expr.args[0], options);
+        case "cond":
+            return evalExpr(model, state, expr.args[0], options)
+                ? evalExpr(model, state, expr.args[1], options)
+                : evalExpr(model, state, expr.args[2], options);
+        case "updateField":
+            return writePath(evalExpr(model, state, expr.target, options), expr.path, evalExpr(model, state, expr.value, options));
+        case "tagIs": {
+            const arg = evalExpr(model, state, expr.arg, options);
+            const domain = taggedDomainForExpr(model, expr.arg);
+            return (isRecord(arg) && domain !== undefined && arg[domain.tag] === expr.tag);
+        }
+        case "lenCat": {
+            const arg = evalExpr(model, state, expr.arg, options);
+            if (!Array.isArray(arg))
+                return "0";
+            return arg.length === 0 ? "0" : arg.length === 1 ? "1" : "many";
+        }
+        case "freshToken":
+            return freshToken(model, state, expr.domainOf);
+    }
+}
+export function guardHolds(model, transition, state) {
+    return Boolean(evalExpr(model, state, transition.guard));
+}
+function isRecord(value) {
+    return typeof value === "object" && value !== null && !Array.isArray(value);
+}
+//# sourceMappingURL=expr.js.map

package/dist/check/runtime/expr.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"expr.js","sourceRoot":"","sources":["../../../src/check/runtime/expr.ts"],"names":[],"mappings":"AAOA,OAAO,EAAE,mBAAmB,EAAE,MAAM,cAAc,CAAC;AACnD,OAAO,EAAE,QAAQ,EAAE,SAAS,EAAE,MAAM,YAAY,CAAC;AACjD,OAAO,EAAE,UAAU,EAAE,MAAM,aAAa,CAAC;AAMzC,MAAM,UAAU,QAAQ,CACtB,KAAY,EACZ,KAAiB,EACjB,IAAY,EACZ,UAAuB,EAAE;IAEzB,QAAQ,IAAI,CAAC,IAAI,EAAE,CAAC;QAClB,KAAK,KAAK;YACR,OAAO,IAAI,CAAC,KAAK,CAAC;QACpB,KAAK,MAAM;YACT,OAAO,QAAQ,CAAC,KAAK,CAAC,IAAI,CAAC,GAAG,CAAC,EAAE,IAAI,CAAC,IAAI,IAAI,EAAE,CAAC,CAAC;QACpD,KAAK,IAAI;YACP,OAAO,CACL,IAAI,CAAC,SAAS,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,OAAO,CAAC,CAAC;gBAC7D,IAAI,CAAC,SAAS,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,OAAO,CAAC,CAAC,CAC9D,CAAC;QACJ,KAAK,KAAK;YACR,OAAO,CACL,IAAI,CAAC,SAAS,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,OAAO,CAAC,CAAC;gBAC7D,IAAI,CAAC,SAAS,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,OAAO,CAAC,CAAC,CAC9D,CAAC;QACJ,KAAK,KAAK;YACR,OAAO,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,GAAG,EAAE,EAAE,CAC7B,OAAO,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,GAAG,EAAE,OAAO,CAAC,CAAC,CAC9C,CAAC;QACJ,KAAK,IAAI;YACP,OAAO,IAAI,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,GAAG,EAAE,EAAE,CAC5B,OAAO,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,GAAG,EAAE,OAAO,CAAC,CAAC,CAC9C,CAAC;QACJ,KAAK,KAAK;YACR,OAAO,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,OAAO,CAAC,CAAC;QACxD,KAAK,MAAM;YACT,OAAO,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,OAAO,CAAC;gBAClD,CAAC,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,OAAO,CAAC;gBAC/C,CAAC,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,OAAO,CAAC,CAAC;QACpD,KAAK,aAAa;YAChB,OAAO,SAAS,CACd,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,MAAM,EAAE,OAAO,CAAC,EAC5C,IAAI,CAAC,IAAI,EACT,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,KAAK,EAAE,OAAO,CAAC,CAC5C,CAAC;QACJ,KAAK,OAAO,CAAC,CAAC,CAAC;YACb,MAAM,GAAG,GAAG,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,GAAG,EAAE,OAAO,CAAC,CAAC;YACtD,MAAM,MAAM,GAAG,mBAAmB,CAAC,KAAK,EAAE,IAAI,CAAC,GAAG,CAAC,CAAC;YACpD,OAAO,CACL,QAAQ,CAAC,GAAG,CAAC,IAAI,MAAM,KAAK,SAAS,IAAI,GAAG,CAAC,MAAM,CAAC,GAAG,CAAC,KAAK,IAAI,CAAC,GAAG,CACtE,CAAC;QACJ,CAAC;QACD,KAAK,QAAQ,CAAC,CAAC,CAAC;YACd,MAAM,GAAG,GAAG,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,GAAG,EAAE,OAAO,CAAC,CAAC;YACtD,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,GAAG,CAAC;gBAAE,OAAO,GAAG,CAAC;YACpC,OAAO,GAAG,CAAC,MAAM,KAAK,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC,MAAM,KAAK,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,MAAM,CAAC;QAClE,CAAC;QACD,KAAK,YAAY;YACf,OAAO,UAAU,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,QAAQ,CAAC,CAAC;IACnD,CAAC;AACH,CAAC;AAED,MAAM,UAAU,UAAU,CACxB,KAAY,EACZ,UAAsB,EACtB,KAAiB;IAEjB,OAAO,OAAO,CAAC,QAAQ,CAAC,KAAK,EAAE,KAAK,EAAE,UAAU,CAAC,KAAK,CAAC,CAAC,CAAC;AAC3D,CAAC;AAED,SAAS,QAAQ,CAAC,KAAY;IAC5B,OAAO,OAAO,KAAK,KAAK,QAAQ,IAAI,KAAK,KAAK,IAAI,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,CAAC;AAC9E,CAAC"}

package/dist/check/runtime/navigation.d.ts

@@ -0,0 +1,7 @@
+import type { EffectIR, Model, ModelState } from "modality-ts/core";
+import type { EvalOptions } from "./expr.js";
+export declare function navigate(model: Model, state: ModelState, effect: Extract<EffectIR, {
+    kind: "navigate";
+}>, options: EvalOptions): ModelState[];
+export declare function normalizeInitialRouteLocals(model: Model, state: ModelState): ModelState[];
+//# sourceMappingURL=navigation.d.ts.map

package/dist/check/runtime/navigation.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"navigation.d.ts","sourceRoot":"","sources":["../../../src/check/runtime/navigation.ts"],"names":[],"mappings":"AACA,OAAO,KAAK,EAAE,QAAQ,EAAE,KAAK,EAAE,UAAU,EAAS,MAAM,kBAAkB,CAAC;AAC3E,OAAO,KAAK,EAAE,WAAW,EAAE,MAAM,WAAW,CAAC;AAG7C,wBAAgB,QAAQ,CACtB,KAAK,EAAE,KAAK,EACZ,KAAK,EAAE,UAAU,EACjB,MAAM,EAAE,OAAO,CAAC,QAAQ,EAAE;IAAE,IAAI,EAAE,UAAU,CAAA;CAAE,CAAC,EAC/C,OAAO,EAAE,WAAW,GACnB,UAAU,EAAE,CAsCd;AAED,wBAAgB,2BAA2B,CACzC,KAAK,EAAE,KAAK,EACZ,KAAK,EAAE,UAAU,GAChB,UAAU,EAAE,CAEd"}