@fieldia/core 0.9.2 → 0.10.0

package/src/lib/expression/functions.js

@@ -0,0 +1,129 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.FUNCTIONS = void 0;
+exports.localDay = localDay;
+exports.takesInWords = takesInWords;
+const operations_1 = require("./operations");
+/** A day as YYYY-MM-DD, in the computer's own time zone. */
+function localDay(date) {
+    const pad = (n) => String(n).padStart(2, '0');
+    return `${date.getFullYear()}-${pad(date.getMonth() + 1)}-${pad(date.getDate())}`;
+}
+/** The list a function counts or adds up: the rows of a one2many named by its field, or any list. */
+function listOf(call) {
+    const first = call.args[0];
+    const rows = first.type === 'Identifier' ? call.env.lines?.(first.name) : undefined;
+    return rows ?? call.value(first);
+}
+/** The smallest or largest of the values, lists opened: empty ones left out, numbers or text but not both. */
+function extreme(call, smaller) {
+    const items = call.args
+        .flatMap((arg) => {
+        const value = call.value(arg);
+        return Array.isArray(value) ? value : [value];
+    })
+        .filter((value) => value !== null && value !== undefined);
+    if (!items.length)
+        return null;
+    if (!items.every(operations_1.isNumber) && !items.every((value) => typeof value === 'string'))
+        return null;
+    const ordered = items;
+    return ordered.reduce((best, value) => ((smaller ? value < best : value > best) ? value : best));
+}
+exports.FUNCTIONS = new Map([
+    [
+        'round',
+        {
+            takes: [1, 2],
+            call({ args, value }) {
+                const x = value(args[0]);
+                const digits = args.length > 1 ? value(args[1]) : 0;
+                return (0, operations_1.isNumber)(x) && (0, operations_1.isNumber)(digits) ? (0, operations_1.roundTo)(x, digits) : null;
+            },
+        },
+    ],
+    [
+        'abs',
+        {
+            takes: [1, 1],
+            call({ args, value }) {
+                const x = value(args[0]);
+                return (0, operations_1.isNumber)(x) ? Math.abs(x) : null;
+            },
+        },
+    ],
+    ['min', { takes: [1, Infinity], call: (call) => extreme(call, true) }],
+    ['max', { takes: [1, Infinity], call: (call) => extreme(call, false) }],
+    [
+        'len',
+        {
+            takes: [1, 1],
+            call({ args, value }) {
+                const x = value(args[0]);
+                if (x === null || x === undefined)
+                    return 0;
+                return typeof x === 'string' || Array.isArray(x) ? x.length : null;
+            },
+        },
+    ],
+    ['today', { takes: [0, 0], call: ({ env }) => env.today?.() ?? localDay(new Date()) }],
+    [
+        'sum',
+        {
+            takes: [1, 2],
+            check(args) {
+                const field = args[1];
+                if (field && !(field.type === 'Literal' && typeof field.value === 'string')) {
+                    return "sum takes the name of a field, in quotes, after the lines: sum(lines, 'subtotal')";
+                }
+                return undefined;
+            },
+            call(call) {
+                const list = listOf(call);
+                if (list === null || list === undefined)
+                    return 0;
+                if (!Array.isArray(list))
+                    return null;
+                const field = call.args[1]?.type === 'Literal' ? call.args[1].value : undefined;
+                let total = 0;
+                for (const item of list) {
+                    const n = field === undefined ? item : item?.[field];
+                    if ((0, operations_1.isNumber)(n))
+                        total += n;
+                }
+                return (0, operations_1.tidy)(total);
+            },
+        },
+    ],
+    [
+        'count',
+        {
+            takes: [1, 1],
+            call(call) {
+                const list = listOf(call);
+                if (list === null || list === undefined)
+                    return 0;
+                return Array.isArray(list) ? list.length : null;
+            },
+        },
+    ],
+    [
+        'if',
+        {
+            takes: [3, 3],
+            // Only the branch chosen is worked out.
+            call: ({ args, value }) => ((0, operations_1.truthy)(value(args[0])) ? value(args[1]) : value(args[2])),
+        },
+    ],
+]);
+/** How many values a function takes, in words: "round takes 1 or 2 values". */
+function takesInWords(name, [least, most]) {
+    if (most === 0)
+        return `${name} takes no values`;
+    if (least === most)
+        return `${name} takes ${least} value${least === 1 ? '' : 's'}`;
+    if (most === Infinity)
+        return `${name} takes ${least} or more values`;
+    return `${name} takes ${least} or ${most} values`;
+}
+//# sourceMappingURL=functions.js.map

package/src/lib/expression/functions.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"functions.js","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/expression/functions.ts"],"names":[],"mappings":";;;AAoCA,4BAGC;AA0GD,oCAKC;AArJD,6CAA+D;AAkC/D,4DAA4D;AAC5D,SAAgB,QAAQ,CAAC,IAAU;IACjC,MAAM,GAAG,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,QAAQ,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC;IACtD,OAAO,GAAG,IAAI,CAAC,WAAW,EAAE,IAAI,GAAG,CAAC,IAAI,CAAC,QAAQ,EAAE,GAAG,CAAC,CAAC,IAAI,GAAG,CAAC,IAAI,CAAC,OAAO,EAAE,CAAC,EAAE,CAAC;AACpF,CAAC;AAED,qGAAqG;AACrG,SAAS,MAAM,CAAC,IAAU;IACxB,MAAM,KAAK,GAAG,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IAC3B,MAAM,IAAI,GAAG,KAAK,CAAC,IAAI,KAAK,YAAY,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,KAAK,EAAE,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC;IACpF,OAAO,IAAI,IAAI,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC;AACnC,CAAC;AAED,8GAA8G;AAC9G,SAAS,OAAO,CAAC,IAAU,EAAE,OAAgB;IAC3C,MAAM,KAAK,GAAG,IAAI,CAAC,IAAI;SACpB,OAAO,CAAC,CAAC,GAAG,EAAE,EAAE;QACf,MAAM,KAAK,GAAG,IAAI,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC;QAC9B,OAAO,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC;IAChD,CAAC,CAAC;SACD,MAAM,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,KAAK,IAAI,IAAI,KAAK,KAAK,SAAS,CAAC,CAAC;IAC5D,IAAI,CAAC,KAAK,CAAC,MAAM;QAAE,OAAO,IAAI,CAAC;IAC/B,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,qBAAQ,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,OAAO,KAAK,KAAK,QAAQ,CAAC;QAAE,OAAO,IAAI,CAAC;IAC9F,MAAM,OAAO,GAAG,KAA4B,CAAC;IAC7C,OAAO,OAAO,CAAC,MAAM,CAAC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC;AACnG,CAAC;AAEY,QAAA,SAAS,GAA4C,IAAI,GAAG,CAA6B;IACpG;QACE,OAAO;QACP;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,IAAI,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE;gBAClB,MAAM,CAAC,GAAG,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBACzB,MAAM,MAAM,GAAG,IAAI,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;gBACpD,OAAO,IAAA,qBAAQ,EAAC,CAAC,CAAC,IAAI,IAAA,qBAAQ,EAAC,MAAM,CAAC,CAAC,CAAC,CAAC,IAAA,oBAAO,EAAC,CAAC,EAAE,MAAM,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;YACrE,CAAC;SACF;KACF;IACD;QACE,KAAK;QACL;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,IAAI,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE;gBAClB,MAAM,CAAC,GAAG,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBACzB,OAAO,IAAA,qBAAQ,EAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;YAC1C,CAAC;SACF;KACF;IACD,CAAC,KAAK,EAAE,EAAE,KAAK,EAAE,CAAC,CAAC,EAAE,QAAQ,CAAC,EAAE,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,OAAO,CAAC,IAAI,EAAE,IAAI,CAAC,EAAE,CAAC;IACtE,CAAC,KAAK,EAAE,EAAE,KAAK,EAAE,CAAC,CAAC,EAAE,QAAQ,CAAC,EAAE,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,OAAO,CAAC,IAAI,EAAE,KAAK,CAAC,EAAE,CAAC;IACvE;QACE,KAAK;QACL;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,IAAI,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE;gBAClB,MAAM,CAAC,GAAG,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBACzB,IAAI,CAAC,KAAK,IAAI,IAAI,CAAC,KAAK,SAAS;oBAAE,OAAO,CAAC,CAAC;gBAC5C,OAAO,OAAO,CAAC,KAAK,QAAQ,IAAI,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC;YACrE,CAAC;SACF;KACF;IACD,CAAC,OAAO,EAAE,EAAE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,IAAI,EAAE,CAAC,EAAE,GAAG,EAAE,EAAE,EAAE,CAAC,GAAG,CAAC,KAAK,EAAE,EAAE,IAAI,QAAQ,CAAC,IAAI,IAAI,EAAE,CAAC,EAAE,CAAC;IACtF;QACE,KAAK;QACL;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,KAAK,CAAC,IAAI;gBACR,MAAM,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC;gBACtB,IAAI,KAAK,IAAI,CAAC,CAAC,KAAK,CAAC,IAAI,KAAK,SAAS,IAAI,OAAO,KAAK,CAAC,KAAK,KAAK,QAAQ,CAAC,EAAE,CAAC;oBAC5E,OAAO,mFAAmF,CAAC;gBAC7F,CAAC;gBACD,OAAO,SAAS,CAAC;YACnB,CAAC;YACD,IAAI,CAAC,IAAI;gBACP,MAAM,IAAI,GAAG,MAAM,CAAC,IAAI,CAAC,CAAC;gBAC1B,IAAI,IAAI,KAAK,IAAI,IAAI,IAAI,KAAK,SAAS;oBAAE,OAAO,CAAC,CAAC;gBAClD,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,IAAI,CAAC;oBAAE,OAAO,IAAI,CAAC;gBACtC,MAAM,KAAK,GAAG,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,IAAI,KAAK,SAAS,CAAC,CAAC,CAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,KAAgB,CAAC,CAAC,CAAC,SAAS,CAAC;gBAC5F,IAAI,KAAK,GAAG,CAAC,CAAC;gBACd,KAAK,MAAM,IAAI,IAAI,IAAI,EAAE,CAAC;oBACxB,MAAM,CAAC,GAAG,KAAK,KAAK,SAAS,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAE,IAAuC,EAAE,CAAC,KAAK,CAAC,CAAC;oBACzF,IAAI,IAAA,qBAAQ,EAAC,CAAC,CAAC;wBAAE,KAAK,IAAI,CAAC,CAAC;gBAC9B,CAAC;gBACD,OAAO,IAAA,iBAAI,EAAC,KAAK,CAAC,CAAC;YACrB,CAAC;SACF;KACF;IACD;QACE,OAAO;QACP;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,IAAI,CAAC,IAAI;gBACP,MAAM,IAAI,GAAG,MAAM,CAAC,IAAI,CAAC,CAAC;gBAC1B,IAAI,IAAI,KAAK,IAAI,IAAI,IAAI,KAAK,SAAS;oBAAE,OAAO,CAAC,CAAC;gBAClD,OAAO,KAAK,CAAC,OAAO,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC;YAClD,CAAC;SACF;KACF;IACD;QACE,IAAI;QACJ;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,wCAAwC;YACxC,IAAI,EAAE,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE,EAAE,EAAE,CAAC,CAAC,IAAA,mBAAM,EAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;SACtF;KACF;CACF,CAAC,CAAC;AAEH,+EAA+E;AAC/E,SAAgB,YAAY,CAAC,IAAY,EAAE,CAAC,KAAK,EAAE,IAAI,CAA4B;IACjF,IAAI,IAAI,KAAK,CAAC;QAAE,OAAO,GAAG,IAAI,kBAAkB,CAAC;IACjD,IAAI,KAAK,KAAK,IAAI;QAAE,OAAO,GAAG,IAAI,UAAU,KAAK,SAAS,KAAK,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC;IACnF,IAAI,IAAI,KAAK,QAAQ;QAAE,OAAO,GAAG,IAAI,UAAU,KAAK,iBAAiB,CAAC;IACtE,OAAO,GAAG,IAAI,UAAU,KAAK,OAAO,IAAI,SAAS,CAAC;AACpD,CAAC"}

package/src/lib/expression/functions.mjs

@@ -0,0 +1,124 @@
+import { isNumber, roundTo, tidy, truthy } from './operations.mjs';
+/** A day as YYYY-MM-DD, in the computer's own time zone. */
+export function localDay(date) {
+    const pad = (n) => String(n).padStart(2, '0');
+    return `${date.getFullYear()}-${pad(date.getMonth() + 1)}-${pad(date.getDate())}`;
+}
+/** The list a function counts or adds up: the rows of a one2many named by its field, or any list. */
+function listOf(call) {
+    const first = call.args[0];
+    const rows = first.type === 'Identifier' ? call.env.lines?.(first.name) : undefined;
+    return rows ?? call.value(first);
+}
+/** The smallest or largest of the values, lists opened: empty ones left out, numbers or text but not both. */
+function extreme(call, smaller) {
+    const items = call.args
+        .flatMap((arg) => {
+        const value = call.value(arg);
+        return Array.isArray(value) ? value : [value];
+    })
+        .filter((value) => value !== null && value !== undefined);
+    if (!items.length)
+        return null;
+    if (!items.every(isNumber) && !items.every((value) => typeof value === 'string'))
+        return null;
+    const ordered = items;
+    return ordered.reduce((best, value) => ((smaller ? value < best : value > best) ? value : best));
+}
+export const FUNCTIONS = new Map([
+    [
+        'round',
+        {
+            takes: [1, 2],
+            call({ args, value }) {
+                const x = value(args[0]);
+                const digits = args.length > 1 ? value(args[1]) : 0;
+                return isNumber(x) && isNumber(digits) ? roundTo(x, digits) : null;
+            },
+        },
+    ],
+    [
+        'abs',
+        {
+            takes: [1, 1],
+            call({ args, value }) {
+                const x = value(args[0]);
+                return isNumber(x) ? Math.abs(x) : null;
+            },
+        },
+    ],
+    ['min', { takes: [1, Infinity], call: (call) => extreme(call, true) }],
+    ['max', { takes: [1, Infinity], call: (call) => extreme(call, false) }],
+    [
+        'len',
+        {
+            takes: [1, 1],
+            call({ args, value }) {
+                const x = value(args[0]);
+                if (x === null || x === undefined)
+                    return 0;
+                return typeof x === 'string' || Array.isArray(x) ? x.length : null;
+            },
+        },
+    ],
+    ['today', { takes: [0, 0], call: ({ env }) => env.today?.() ?? localDay(new Date()) }],
+    [
+        'sum',
+        {
+            takes: [1, 2],
+            check(args) {
+                const field = args[1];
+                if (field && !(field.type === 'Literal' && typeof field.value === 'string')) {
+                    return "sum takes the name of a field, in quotes, after the lines: sum(lines, 'subtotal')";
+                }
+                return undefined;
+            },
+            call(call) {
+                const list = listOf(call);
+                if (list === null || list === undefined)
+                    return 0;
+                if (!Array.isArray(list))
+                    return null;
+                const field = call.args[1]?.type === 'Literal' ? call.args[1].value : undefined;
+                let total = 0;
+                for (const item of list) {
+                    const n = field === undefined ? item : item?.[field];
+                    if (isNumber(n))
+                        total += n;
+                }
+                return tidy(total);
+            },
+        },
+    ],
+    [
+        'count',
+        {
+            takes: [1, 1],
+            call(call) {
+                const list = listOf(call);
+                if (list === null || list === undefined)
+                    return 0;
+                return Array.isArray(list) ? list.length : null;
+            },
+        },
+    ],
+    [
+        'if',
+        {
+            takes: [3, 3],
+            // Only the branch chosen is worked out.
+            call: ({ args, value }) => (truthy(value(args[0])) ? value(args[1]) : value(args[2])),
+        },
+    ],
+]);
+/** How many values a function takes, in words: "round takes 1 or 2 values". */
+export function takesInWords(name, [least, most]) {
+    if (most === 0)
+        return `${name} takes no values`;
+    if (least === most)
+        return `${name} takes ${least} value${least === 1 ? '' : 's'}`;
+    if (most === Infinity)
+        return `${name} takes ${least} or more values`;
+    return `${name} takes ${least} or ${most} values`;
+}
+//# sourceMappingURL=functions.mjs.map

package/src/lib/expression/functions.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"functions.mjs","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/expression/functions.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,QAAQ,EAAE,OAAO,EAAE,IAAI,EAAE,MAAM,EAAE,MAAM,cAAc,CAAC;AAkC/D,4DAA4D;AAC5D,MAAM,UAAU,QAAQ,CAAC,IAAU;IACjC,MAAM,GAAG,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,QAAQ,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC;IACtD,OAAO,GAAG,IAAI,CAAC,WAAW,EAAE,IAAI,GAAG,CAAC,IAAI,CAAC,QAAQ,EAAE,GAAG,CAAC,CAAC,IAAI,GAAG,CAAC,IAAI,CAAC,OAAO,EAAE,CAAC,EAAE,CAAC;AACpF,CAAC;AAED,qGAAqG;AACrG,SAAS,MAAM,CAAC,IAAU;IACxB,MAAM,KAAK,GAAG,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IAC3B,MAAM,IAAI,GAAG,KAAK,CAAC,IAAI,KAAK,YAAY,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,KAAK,EAAE,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC;IACpF,OAAO,IAAI,IAAI,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC;AACnC,CAAC;AAED,8GAA8G;AAC9G,SAAS,OAAO,CAAC,IAAU,EAAE,OAAgB;IAC3C,MAAM,KAAK,GAAG,IAAI,CAAC,IAAI;SACpB,OAAO,CAAC,CAAC,GAAG,EAAE,EAAE;QACf,MAAM,KAAK,GAAG,IAAI,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC;QAC9B,OAAO,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC;IAChD,CAAC,CAAC;SACD,MAAM,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,KAAK,IAAI,IAAI,KAAK,KAAK,SAAS,CAAC,CAAC;IAC5D,IAAI,CAAC,KAAK,CAAC,MAAM;QAAE,OAAO,IAAI,CAAC;IAC/B,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,QAAQ,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,OAAO,KAAK,KAAK,QAAQ,CAAC;QAAE,OAAO,IAAI,CAAC;IAC9F,MAAM,OAAO,GAAG,KAA4B,CAAC;IAC7C,OAAO,OAAO,CAAC,MAAM,CAAC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC;AACnG,CAAC;AAED,MAAM,CAAC,MAAM,SAAS,GAA4C,IAAI,GAAG,CAA6B;IACpG;QACE,OAAO;QACP;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,IAAI,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE;gBAClB,MAAM,CAAC,GAAG,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBACzB,MAAM,MAAM,GAAG,IAAI,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;gBACpD,OAAO,QAAQ,CAAC,CAAC,CAAC,IAAI,QAAQ,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,EAAE,MAAM,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;YACrE,CAAC;SACF;KACF;IACD;QACE,KAAK;QACL;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,IAAI,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE;gBAClB,MAAM,CAAC,GAAG,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBACzB,OAAO,QAAQ,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;YAC1C,CAAC;SACF;KACF;IACD,CAAC,KAAK,EAAE,EAAE,KAAK,EAAE,CAAC,CAAC,EAAE,QAAQ,CAAC,EAAE,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,OAAO,CAAC,IAAI,EAAE,IAAI,CAAC,EAAE,CAAC;IACtE,CAAC,KAAK,EAAE,EAAE,KAAK,EAAE,CAAC,CAAC,EAAE,QAAQ,CAAC,EAAE,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,OAAO,CAAC,IAAI,EAAE,KAAK,CAAC,EAAE,CAAC;IACvE;QACE,KAAK;QACL;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,IAAI,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE;gBAClB,MAAM,CAAC,GAAG,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBACzB,IAAI,CAAC,KAAK,IAAI,IAAI,CAAC,KAAK,SAAS;oBAAE,OAAO,CAAC,CAAC;gBAC5C,OAAO,OAAO,CAAC,KAAK,QAAQ,IAAI,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC;YACrE,CAAC;SACF;KACF;IACD,CAAC,OAAO,EAAE,EAAE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,IAAI,EAAE,CAAC,EAAE,GAAG,EAAE,EAAE,EAAE,CAAC,GAAG,CAAC,KAAK,EAAE,EAAE,IAAI,QAAQ,CAAC,IAAI,IAAI,EAAE,CAAC,EAAE,CAAC;IACtF;QACE,KAAK;QACL;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,KAAK,CAAC,IAAI;gBACR,MAAM,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC;gBACtB,IAAI,KAAK,IAAI,CAAC,CAAC,KAAK,CAAC,IAAI,KAAK,SAAS,IAAI,OAAO,KAAK,CAAC,KAAK,KAAK,QAAQ,CAAC,EAAE,CAAC;oBAC5E,OAAO,mFAAmF,CAAC;gBAC7F,CAAC;gBACD,OAAO,SAAS,CAAC;YACnB,CAAC;YACD,IAAI,CAAC,IAAI;gBACP,MAAM,IAAI,GAAG,MAAM,CAAC,IAAI,CAAC,CAAC;gBAC1B,IAAI,IAAI,KAAK,IAAI,IAAI,IAAI,KAAK,SAAS;oBAAE,OAAO,CAAC,CAAC;gBAClD,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,IAAI,CAAC;oBAAE,OAAO,IAAI,CAAC;gBACtC,MAAM,KAAK,GAAG,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,IAAI,KAAK,SAAS,CAAC,CAAC,CAAE,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,KAAgB,CAAC,CAAC,CAAC,SAAS,CAAC;gBAC5F,IAAI,KAAK,GAAG,CAAC,CAAC;gBACd,KAAK,MAAM,IAAI,IAAI,IAAI,EAAE,CAAC;oBACxB,MAAM,CAAC,GAAG,KAAK,KAAK,SAAS,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAE,IAAuC,EAAE,CAAC,KAAK,CAAC,CAAC;oBACzF,IAAI,QAAQ,CAAC,CAAC,CAAC;wBAAE,KAAK,IAAI,CAAC,CAAC;gBAC9B,CAAC;gBACD,OAAO,IAAI,CAAC,KAAK,CAAC,CAAC;YACrB,CAAC;SACF;KACF;IACD;QACE,OAAO;QACP;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,IAAI,CAAC,IAAI;gBACP,MAAM,IAAI,GAAG,MAAM,CAAC,IAAI,CAAC,CAAC;gBAC1B,IAAI,IAAI,KAAK,IAAI,IAAI,IAAI,KAAK,SAAS;oBAAE,OAAO,CAAC,CAAC;gBAClD,OAAO,KAAK,CAAC,OAAO,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC;YAClD,CAAC;SACF;KACF;IACD;QACE,IAAI;QACJ;YACE,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;YACb,wCAAwC;YACxC,IAAI,EAAE,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE,EAAE,EAAE,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;SACtF;KACF;CACF,CAAC,CAAC;AAEH,+EAA+E;AAC/E,MAAM,UAAU,YAAY,CAAC,IAAY,EAAE,CAAC,KAAK,EAAE,IAAI,CAA4B;IACjF,IAAI,IAAI,KAAK,CAAC;QAAE,OAAO,GAAG,IAAI,kBAAkB,CAAC;IACjD,IAAI,KAAK,KAAK,IAAI;QAAE,OAAO,GAAG,IAAI,UAAU,KAAK,SAAS,KAAK,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC;IACnF,IAAI,IAAI,KAAK,QAAQ;QAAE,OAAO,GAAG,IAAI,UAAU,KAAK,iBAAiB,CAAC;IACtE,OAAO,GAAG,IAAI,UAAU,KAAK,OAAO,IAAI,SAAS,CAAC;AACpD,CAAC"}

package/src/lib/expression/modifier.d.mts

@@ -1,10 +1,12 @@
 import type { Modifier } from '../format/layout.mjs';
+import type { ExpressionEnv } from './functions.mjs';
 /** A modifier read once, ready to evaluate against a record's values. */
 export interface CompiledModifier {
     readonly source: Modifier | undefined;
     /** The fields it reads, by their first name, in order of appearance. */
     readonly fields: readonly string[];
-    evaluate(values: Readonly<Record<string, unknown>>): boolean;
+    /** Whether it holds for these values; `env` gives `sum` and `count` the lines, and `today()` its day. */
+    evaluate(values: Readonly<Record<string, unknown>>, env?: ExpressionEnv): boolean;
 }
 /**
  * Read a modifier. `true`, `false` and a missing modifier become constants;

package/src/lib/expression/modifier.d.ts

@@ -1,10 +1,12 @@
 import type { Modifier } from '../format/layout';
+import type { ExpressionEnv } from './functions';
 /** A modifier read once, ready to evaluate against a record's values. */
 export interface CompiledModifier {
     readonly source: Modifier | undefined;
     /** The fields it reads, by their first name, in order of appearance. */
     readonly fields: readonly string[];
-    evaluate(values: Readonly<Record<string, unknown>>): boolean;
+    /** Whether it holds for these values; `env` gives `sum` and `count` the lines, and `today()` its day. */
+    evaluate(values: Readonly<Record<string, unknown>>, env?: ExpressionEnv): boolean;
 }
 /**
  * Read a modifier. `true`, `false` and a missing modifier become constants;

package/src/lib/expression/modifier.js

@@ -3,6 +3,7 @@ Object.defineProperty(exports, "__esModule", { value: true });
 exports.compileModifier = compileModifier;
 const evaluator_1 = require("./evaluator");
 const parser_1 = require("./parser");
+const reads_1 = require("./reads");
 const tokenizer_1 = require("./tokenizer");
 /**
  * Read a modifier. `true`, `false` and a missing modifier become constants;
@@ -17,10 +18,10 @@ function compileModifier(modifier) {
     const ast = new parser_1.ExpressionParser((0, tokenizer_1.tokenize)(modifier)).parse();
     return {
         source: modifier,
-        fields: fieldsRead(ast),
-        evaluate(values) {
+        fields: (0, reads_1.fieldsRead)(ast),
+        evaluate(values, env) {
             try {
-                return (0, evaluator_1.truthy)((0, evaluator_1.evaluate)(ast, values));
+                return (0, evaluator_1.truthy)((0, evaluator_1.evaluate)(ast, values, env));
             }
             catch {
                 return false;
@@ -28,28 +29,4 @@ function compileModifier(modifier) {
         },
     };
 }
-function fieldsRead(ast) {
-    const names = [];
-    const visit = (node) => {
-        switch (node.type) {
-            case 'Identifier': {
-                const root = node.name.split('.')[0];
-                if (!names.includes(root))
-                    names.push(root);
-                return;
-            }
-            case 'BinaryOp':
-                visit(node.left);
-                visit(node.right);
-                return;
-            case 'UnaryOp':
-                visit(node.operand);
-                return;
-            default:
-                return;
-        }
-    };
-    visit(ast);
-    return names;
-}
 //# sourceMappingURL=modifier.js.map

package/src/lib/expression/modifier.js.map

@@ -1 +1 @@
-{"version":3,"file":"modifier.js","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/expression/modifier.ts"],"names":[],"mappings":";;AAkBA,0CAiBC;AAlCD,2CAA+C;AAC/C,qCAA0D;AAC1D,2CAAuC;AAUvC;;;;GAIG;AACH,SAAgB,eAAe,CAAC,QAA8B;IAC5D,IAAI,OAAO,QAAQ,KAAK,QAAQ,EAAE,CAAC;QACjC,MAAM,KAAK,GAAG,QAAQ,KAAK,IAAI,CAAC;QAChC,OAAO,EAAE,MAAM,EAAE,QAAQ,EAAE,MAAM,EAAE,EAAE,EAAE,QAAQ,EAAE,GAAG,EAAE,CAAC,KAAK,EAAE,CAAC;IACjE,CAAC;IACD,MAAM,GAAG,GAAG,IAAI,yBAAgB,CAAC,IAAA,oBAAQ,EAAC,QAAQ,CAAC,CAAC,CAAC,KAAK,EAAE,CAAC;IAC7D,OAAO;QACL,MAAM,EAAE,QAAQ;QAChB,MAAM,EAAE,UAAU,CAAC,GAAG,CAAC;QACvB,QAAQ,CAAC,MAAM;YACb,IAAI,CAAC;gBACH,OAAO,IAAA,kBAAM,EAAC,IAAA,oBAAQ,EAAC,GAAG,EAAE,MAAM,CAAC,CAAC,CAAC;YACvC,CAAC;YAAC,MAAM,CAAC;gBACP,OAAO,KAAK,CAAC;YACf,CAAC;QACH,CAAC;KACF,CAAC;AACJ,CAAC;AAED,SAAS,UAAU,CAAC,GAAY;IAC9B,MAAM,KAAK,GAAa,EAAE,CAAC;IAC3B,MAAM,KAAK,GAAG,CAAC,IAAa,EAAQ,EAAE;QACpC,QAAQ,IAAI,CAAC,IAAI,EAAE,CAAC;YAClB,KAAK,YAAY,CAAC,CAAC,CAAC;gBAClB,MAAM,IAAI,GAAG,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;gBACrC,IAAI,CAAC,KAAK,CAAC,QAAQ,CAAC,IAAI,CAAC;oBAAE,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;gBAC5C,OAAO;YACT,CAAC;YACD,KAAK,UAAU;gBACb,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;gBACjB,KAAK,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;gBAClB,OAAO;YACT,KAAK,SAAS;gBACZ,KAAK,CAAC,IAAI,CAAC,OAAO,CAAC,CAAC;gBACpB,OAAO;YACT;gBACE,OAAO;QACX,CAAC;IACH,CAAC,CAAC;IACF,KAAK,CAAC,GAAG,CAAC,CAAC;IACX,OAAO,KAAK,CAAC;AACf,CAAC"}
+{"version":3,"file":"modifier.js","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/expression/modifier.ts"],"names":[],"mappings":";;AAqBA,0CAiBC;AArCD,2CAA+C;AAE/C,qCAA4C;AAC5C,mCAAqC;AACrC,2CAAuC;AAWvC;;;;GAIG;AACH,SAAgB,eAAe,CAAC,QAA8B;IAC5D,IAAI,OAAO,QAAQ,KAAK,QAAQ,EAAE,CAAC;QACjC,MAAM,KAAK,GAAG,QAAQ,KAAK,IAAI,CAAC;QAChC,OAAO,EAAE,MAAM,EAAE,QAAQ,EAAE,MAAM,EAAE,EAAE,EAAE,QAAQ,EAAE,GAAG,EAAE,CAAC,KAAK,EAAE,CAAC;IACjE,CAAC;IACD,MAAM,GAAG,GAAG,IAAI,yBAAgB,CAAC,IAAA,oBAAQ,EAAC,QAAQ,CAAC,CAAC,CAAC,KAAK,EAAE,CAAC;IAC7D,OAAO;QACL,MAAM,EAAE,QAAQ;QAChB,MAAM,EAAE,IAAA,kBAAU,EAAC,GAAG,CAAC;QACvB,QAAQ,CAAC,MAAM,EAAE,GAAG;YAClB,IAAI,CAAC;gBACH,OAAO,IAAA,kBAAM,EAAC,IAAA,oBAAQ,EAAC,GAAG,EAAE,MAAM,EAAE,GAAG,CAAC,CAAC,CAAC;YAC5C,CAAC;YAAC,MAAM,CAAC;gBACP,OAAO,KAAK,CAAC;YACf,CAAC;QACH,CAAC;KACF,CAAC;AACJ,CAAC"}

package/src/lib/expression/modifier.mjs

@@ -1,5 +1,6 @@
 import { evaluate, truthy } from './evaluator.mjs';
 import { ExpressionParser } from './parser.mjs';
+import { fieldsRead } from './reads.mjs';
 import { tokenize } from './tokenizer.mjs';
 /**
  * Read a modifier. `true`, `false` and a missing modifier become constants;
@@ -15,9 +16,9 @@ export function compileModifier(modifier) {
     return {
         source: modifier,
         fields: fieldsRead(ast),
-        evaluate(values) {
+        evaluate(values, env) {
             try {
-                return truthy(evaluate(ast, values));
+                return truthy(evaluate(ast, values, env));
             }
             catch {
                 return false;
@@ -25,28 +26,4 @@ export function compileModifier(modifier) {
         },
     };
 }
-function fieldsRead(ast) {
-    const names = [];
-    const visit = (node) => {
-        switch (node.type) {
-            case 'Identifier': {
-                const root = node.name.split('.')[0];
-                if (!names.includes(root))
-                    names.push(root);
-                return;
-            }
-            case 'BinaryOp':
-                visit(node.left);
-                visit(node.right);
-                return;
-            case 'UnaryOp':
-                visit(node.operand);
-                return;
-            default:
-                return;
-        }
-    };
-    visit(ast);
-    return names;
-}
 //# sourceMappingURL=modifier.mjs.map

package/src/lib/expression/modifier.mjs.map

@@ -1 +1 @@
-{"version":3,"file":"modifier.mjs","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/expression/modifier.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,QAAQ,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AAC/C,OAAO,EAAE,gBAAgB,EAAgB,MAAM,UAAU,CAAC;AAC1D,OAAO,EAAE,QAAQ,EAAE,MAAM,aAAa,CAAC;AAUvC;;;;GAIG;AACH,MAAM,UAAU,eAAe,CAAC,QAA8B;IAC5D,IAAI,OAAO,QAAQ,KAAK,QAAQ,EAAE,CAAC;QACjC,MAAM,KAAK,GAAG,QAAQ,KAAK,IAAI,CAAC;QAChC,OAAO,EAAE,MAAM,EAAE,QAAQ,EAAE,MAAM,EAAE,EAAE,EAAE,QAAQ,EAAE,GAAG,EAAE,CAAC,KAAK,EAAE,CAAC;IACjE,CAAC;IACD,MAAM,GAAG,GAAG,IAAI,gBAAgB,CAAC,QAAQ,CAAC,QAAQ,CAAC,CAAC,CAAC,KAAK,EAAE,CAAC;IAC7D,OAAO;QACL,MAAM,EAAE,QAAQ;QAChB,MAAM,EAAE,UAAU,CAAC,GAAG,CAAC;QACvB,QAAQ,CAAC,MAAM;YACb,IAAI,CAAC;gBACH,OAAO,MAAM,CAAC,QAAQ,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC,CAAC;YACvC,CAAC;YAAC,MAAM,CAAC;gBACP,OAAO,KAAK,CAAC;YACf,CAAC;QACH,CAAC;KACF,CAAC;AACJ,CAAC;AAED,SAAS,UAAU,CAAC,GAAY;IAC9B,MAAM,KAAK,GAAa,EAAE,CAAC;IAC3B,MAAM,KAAK,GAAG,CAAC,IAAa,EAAQ,EAAE;QACpC,QAAQ,IAAI,CAAC,IAAI,EAAE,CAAC;YAClB,KAAK,YAAY,CAAC,CAAC,CAAC;gBAClB,MAAM,IAAI,GAAG,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;gBACrC,IAAI,CAAC,KAAK,CAAC,QAAQ,CAAC,IAAI,CAAC;oBAAE,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;gBAC5C,OAAO;YACT,CAAC;YACD,KAAK,UAAU;gBACb,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;gBACjB,KAAK,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;gBAClB,OAAO;YACT,KAAK,SAAS;gBACZ,KAAK,CAAC,IAAI,CAAC,OAAO,CAAC,CAAC;gBACpB,OAAO;YACT;gBACE,OAAO;QACX,CAAC;IACH,CAAC,CAAC;IACF,KAAK,CAAC,GAAG,CAAC,CAAC;IACX,OAAO,KAAK,CAAC;AACf,CAAC"}
+{"version":3,"file":"modifier.mjs","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/expression/modifier.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,QAAQ,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AAE/C,OAAO,EAAE,gBAAgB,EAAE,MAAM,UAAU,CAAC;AAC5C,OAAO,EAAE,UAAU,EAAE,MAAM,SAAS,CAAC;AACrC,OAAO,EAAE,QAAQ,EAAE,MAAM,aAAa,CAAC;AAWvC;;;;GAIG;AACH,MAAM,UAAU,eAAe,CAAC,QAA8B;IAC5D,IAAI,OAAO,QAAQ,KAAK,QAAQ,EAAE,CAAC;QACjC,MAAM,KAAK,GAAG,QAAQ,KAAK,IAAI,CAAC;QAChC,OAAO,EAAE,MAAM,EAAE,QAAQ,EAAE,MAAM,EAAE,EAAE,EAAE,QAAQ,EAAE,GAAG,EAAE,CAAC,KAAK,EAAE,CAAC;IACjE,CAAC;IACD,MAAM,GAAG,GAAG,IAAI,gBAAgB,CAAC,QAAQ,CAAC,QAAQ,CAAC,CAAC,CAAC,KAAK,EAAE,CAAC;IAC7D,OAAO;QACL,MAAM,EAAE,QAAQ;QAChB,MAAM,EAAE,UAAU,CAAC,GAAG,CAAC;QACvB,QAAQ,CAAC,MAAM,EAAE,GAAG;YAClB,IAAI,CAAC;gBACH,OAAO,MAAM,CAAC,QAAQ,CAAC,GAAG,EAAE,MAAM,EAAE,GAAG,CAAC,CAAC,CAAC;YAC5C,CAAC;YAAC,MAAM,CAAC;gBACP,OAAO,KAAK,CAAC;YACf,CAAC;QACH,CAAC;KACF,CAAC;AACJ,CAAC"}

package/src/lib/expression/operations.d.mts

@@ -0,0 +1,25 @@
+/**
+ * What the language's operators do to values, the way a form needs it:
+ * arithmetic on numbers only, text joined with +, and null — never an error —
+ * for what cannot be worked out, such as a sum with an empty field in it or a
+ * division by zero.
+ */
+/** A number that can be counted with: not NaN, not infinite. */
+export declare const isNumber: (value: unknown) => value is number;
+/**
+ * A result without the noise of binary fractions, so 0.1 + 0.2 is 0.3 and
+ * money adds up; null when it is not a finite number (a division by zero).
+ */
+export declare function tidy(value: number): number | null;
+/** `+ - * / %` on two values. `+` joins text when either side is text; an empty value joins as nothing. */
+export declare function arithmetic(operator: string, left: unknown, right: unknown): unknown;
+/** A number with its sign turned, or null for anything else. */
+export declare function negate(value: unknown): number | null;
+/** Python's truth test: empty lists, strings and objects, 0 and None are false. */
+export declare function truthy(value: unknown): boolean;
+/**
+ * A number rounded to so many digits after the point (before it, when
+ * negative), half away from zero as people and invoices round: 2.5 is 3,
+ * -2.5 is -3, and 1.005 to two digits is 1.01.
+ */
+export declare function roundTo(value: number, digits: number): number | null;

package/src/lib/expression/operations.d.ts

@@ -0,0 +1,25 @@
+/**
+ * What the language's operators do to values, the way a form needs it:
+ * arithmetic on numbers only, text joined with +, and null — never an error —
+ * for what cannot be worked out, such as a sum with an empty field in it or a
+ * division by zero.
+ */
+/** A number that can be counted with: not NaN, not infinite. */
+export declare const isNumber: (value: unknown) => value is number;
+/**
+ * A result without the noise of binary fractions, so 0.1 + 0.2 is 0.3 and
+ * money adds up; null when it is not a finite number (a division by zero).
+ */
+export declare function tidy(value: number): number | null;
+/** `+ - * / %` on two values. `+` joins text when either side is text; an empty value joins as nothing. */
+export declare function arithmetic(operator: string, left: unknown, right: unknown): unknown;
+/** A number with its sign turned, or null for anything else. */
+export declare function negate(value: unknown): number | null;
+/** Python's truth test: empty lists, strings and objects, 0 and None are false. */
+export declare function truthy(value: unknown): boolean;
+/**
+ * A number rounded to so many digits after the point (before it, when
+ * negative), half away from zero as people and invoices round: 2.5 is 3,
+ * -2.5 is -3, and 1.005 to two digits is 1.01.
+ */
+export declare function roundTo(value: number, digits: number): number | null;

package/src/lib/expression/operations.js

@@ -0,0 +1,81 @@
+"use strict";
+/**
+ * What the language's operators do to values, the way a form needs it:
+ * arithmetic on numbers only, text joined with +, and null — never an error —
+ * for what cannot be worked out, such as a sum with an empty field in it or a
+ * division by zero.
+ */
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.isNumber = void 0;
+exports.tidy = tidy;
+exports.arithmetic = arithmetic;
+exports.negate = negate;
+exports.truthy = truthy;
+exports.roundTo = roundTo;
+/** A number that can be counted with: not NaN, not infinite. */
+const isNumber = (value) => typeof value === 'number' && Number.isFinite(value);
+exports.isNumber = isNumber;
+/**
+ * A result without the noise of binary fractions, so 0.1 + 0.2 is 0.3 and
+ * money adds up; null when it is not a finite number (a division by zero).
+ */
+function tidy(value) {
+    return Number.isFinite(value) ? Number(value.toPrecision(15)) : null;
+}
+/** `+ - * / %` on two values. `+` joins text when either side is text; an empty value joins as nothing. */
+function arithmetic(operator, left, right) {
+    if (operator === '+' && (typeof left === 'string' || typeof right === 'string')) {
+        const l = joinable(left);
+        const r = joinable(right);
+        return l === null || r === null ? null : l + r;
+    }
+    if (!(0, exports.isNumber)(left) || !(0, exports.isNumber)(right))
+        return null;
+    switch (operator) {
+        case '+':
+            return tidy(left + right);
+        case '-':
+            return tidy(left - right);
+        case '*':
+            return tidy(left * right);
+        case '/':
+            return tidy(left / right);
+        case '%':
+            // Python's remainder takes the divisor's sign: -7 % 3 is 2.
+            return tidy(left - right * Math.floor(left / right));
+        default:
+            return null;
+    }
+}
+/** A value as it reads inside joined text: text and numbers as written, an empty value as nothing. */
+function joinable(value) {
+    if (value === null || value === undefined)
+        return '';
+    if (typeof value === 'string')
+        return value;
+    return (0, exports.isNumber)(value) ? String(value) : null;
+}
+/** A number with its sign turned, or null for anything else. */
+function negate(value) {
+    return (0, exports.isNumber)(value) ? tidy(-value) : null;
+}
+/** Python's truth test: empty lists, strings and objects, 0 and None are false. */
+function truthy(value) {
+    if (Array.isArray(value))
+        return value.length > 0;
+    if (value !== null && typeof value === 'object')
+        return Object.keys(value).length > 0;
+    return Boolean(value);
+}
+/**
+ * A number rounded to so many digits after the point (before it, when
+ * negative), half away from zero as people and invoices round: 2.5 is 3,
+ * -2.5 is -3, and 1.005 to two digits is 1.01.
+ */
+function roundTo(value, digits) {
+    const scale = 10 ** Math.trunc(digits);
+    // Tidied first, so 1.005 × 100 is 100.5 and not 100.49999999999999.
+    const scaled = Number((Math.abs(value) * scale).toPrecision(15));
+    return tidy((Math.sign(value) * Math.round(scaled)) / scale);
+}
+//# sourceMappingURL=operations.js.map

package/src/lib/expression/operations.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"operations.js","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/expression/operations.ts"],"names":[],"mappings":";AAAA;;;;;GAKG;;;AASH,oBAEC;AAGD,gCAsBC;AAUD,wBAEC;AAGD,wBAIC;AAOD,0BAKC;AAjED,gEAAgE;AACzD,MAAM,QAAQ,GAAG,CAAC,KAAc,EAAmB,EAAE,CAAC,OAAO,KAAK,KAAK,QAAQ,IAAI,MAAM,CAAC,QAAQ,CAAC,KAAK,CAAC,CAAC;AAApG,QAAA,QAAQ,YAA4F;AAEjH;;;GAGG;AACH,SAAgB,IAAI,CAAC,KAAa;IAChC,OAAO,MAAM,CAAC,QAAQ,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,WAAW,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;AACvE,CAAC;AAED,2GAA2G;AAC3G,SAAgB,UAAU,CAAC,QAAgB,EAAE,IAAa,EAAE,KAAc;IACxE,IAAI,QAAQ,KAAK,GAAG,IAAI,CAAC,OAAO,IAAI,KAAK,QAAQ,IAAI,OAAO,KAAK,KAAK,QAAQ,CAAC,EAAE,CAAC;QAChF,MAAM,CAAC,GAAG,QAAQ,CAAC,IAAI,CAAC,CAAC;QACzB,MAAM,CAAC,GAAG,QAAQ,CAAC,KAAK,CAAC,CAAC;QAC1B,OAAO,CAAC,KAAK,IAAI,IAAI,CAAC,KAAK,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC;IACjD,CAAC;IACD,IAAI,CAAC,IAAA,gBAAQ,EAAC,IAAI,CAAC,IAAI,CAAC,IAAA,gBAAQ,EAAC,KAAK,CAAC;QAAE,OAAO,IAAI,CAAC;IACrD,QAAQ,QAAQ,EAAE,CAAC;QACjB,KAAK,GAAG;YACN,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC;QAC5B,KAAK,GAAG;YACN,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC;QAC5B,KAAK,GAAG;YACN,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC;QAC5B,KAAK,GAAG;YACN,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC;QAC5B,KAAK,GAAG;YACN,4DAA4D;YAC5D,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC,CAAC;QACvD;YACE,OAAO,IAAI,CAAC;IAChB,CAAC;AACH,CAAC;AAED,sGAAsG;AACtG,SAAS,QAAQ,CAAC,KAAc;IAC9B,IAAI,KAAK,KAAK,IAAI,IAAI,KAAK,KAAK,SAAS;QAAE,OAAO,EAAE,CAAC;IACrD,IAAI,OAAO,KAAK,KAAK,QAAQ;QAAE,OAAO,KAAK,CAAC;IAC5C,OAAO,IAAA,gBAAQ,EAAC,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;AAChD,CAAC;AAED,gEAAgE;AAChE,SAAgB,MAAM,CAAC,KAAc;IACnC,OAAO,IAAA,gBAAQ,EAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;AAC/C,CAAC;AAED,mFAAmF;AACnF,SAAgB,MAAM,CAAC,KAAc;IACnC,IAAI,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC;QAAE,OAAO,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC;IAClD,IAAI,KAAK,KAAK,IAAI,IAAI,OAAO,KAAK,KAAK,QAAQ;QAAE,OAAO,MAAM,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,MAAM,GAAG,CAAC,CAAC;IACtF,OAAO,OAAO,CAAC,KAAK,CAAC,CAAC;AACxB,CAAC;AAED;;;;GAIG;AACH,SAAgB,OAAO,CAAC,KAAa,EAAE,MAAc;IACnD,MAAM,KAAK,GAAG,EAAE,IAAI,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC;IACvC,oEAAoE;IACpE,MAAM,MAAM,GAAG,MAAM,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,KAAK,CAAC,GAAG,KAAK,CAAC,CAAC,WAAW,CAAC,EAAE,CAAC,CAAC,CAAC;IACjE,OAAO,IAAI,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC,GAAG,KAAK,CAAC,CAAC;AAC/D,CAAC"}

package/src/lib/expression/operations.mjs

@@ -0,0 +1,72 @@
+/**
+ * What the language's operators do to values, the way a form needs it:
+ * arithmetic on numbers only, text joined with +, and null — never an error —
+ * for what cannot be worked out, such as a sum with an empty field in it or a
+ * division by zero.
+ */
+/** A number that can be counted with: not NaN, not infinite. */
+export const isNumber = (value) => typeof value === 'number' && Number.isFinite(value);
+/**
+ * A result without the noise of binary fractions, so 0.1 + 0.2 is 0.3 and
+ * money adds up; null when it is not a finite number (a division by zero).
+ */
+export function tidy(value) {
+    return Number.isFinite(value) ? Number(value.toPrecision(15)) : null;
+}
+/** `+ - * / %` on two values. `+` joins text when either side is text; an empty value joins as nothing. */
+export function arithmetic(operator, left, right) {
+    if (operator === '+' && (typeof left === 'string' || typeof right === 'string')) {
+        const l = joinable(left);
+        const r = joinable(right);
+        return l === null || r === null ? null : l + r;
+    }
+    if (!isNumber(left) || !isNumber(right))
+        return null;
+    switch (operator) {
+        case '+':
+            return tidy(left + right);
+        case '-':
+            return tidy(left - right);
+        case '*':
+            return tidy(left * right);
+        case '/':
+            return tidy(left / right);
+        case '%':
+            // Python's remainder takes the divisor's sign: -7 % 3 is 2.
+            return tidy(left - right * Math.floor(left / right));
+        default:
+            return null;
+    }
+}
+/** A value as it reads inside joined text: text and numbers as written, an empty value as nothing. */
+function joinable(value) {
+    if (value === null || value === undefined)
+        return '';
+    if (typeof value === 'string')
+        return value;
+    return isNumber(value) ? String(value) : null;
+}
+/** A number with its sign turned, or null for anything else. */
+export function negate(value) {
+    return isNumber(value) ? tidy(-value) : null;
+}
+/** Python's truth test: empty lists, strings and objects, 0 and None are false. */
+export function truthy(value) {
+    if (Array.isArray(value))
+        return value.length > 0;
+    if (value !== null && typeof value === 'object')
+        return Object.keys(value).length > 0;
+    return Boolean(value);
+}
+/**
+ * A number rounded to so many digits after the point (before it, when
+ * negative), half away from zero as people and invoices round: 2.5 is 3,
+ * -2.5 is -3, and 1.005 to two digits is 1.01.
+ */
+export function roundTo(value, digits) {
+    const scale = 10 ** Math.trunc(digits);
+    // Tidied first, so 1.005 × 100 is 100.5 and not 100.49999999999999.
+    const scaled = Number((Math.abs(value) * scale).toPrecision(15));
+    return tidy((Math.sign(value) * Math.round(scaled)) / scale);
+}
+//# sourceMappingURL=operations.mjs.map

package/src/lib/expression/operations.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"operations.mjs","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/expression/operations.ts"],"names":[],"mappings":"AAAA;;;;;GAKG;AAEH,gEAAgE;AAChE,MAAM,CAAC,MAAM,QAAQ,GAAG,CAAC,KAAc,EAAmB,EAAE,CAAC,OAAO,KAAK,KAAK,QAAQ,IAAI,MAAM,CAAC,QAAQ,CAAC,KAAK,CAAC,CAAC;AAEjH;;;GAGG;AACH,MAAM,UAAU,IAAI,CAAC,KAAa;IAChC,OAAO,MAAM,CAAC,QAAQ,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,WAAW,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;AACvE,CAAC;AAED,2GAA2G;AAC3G,MAAM,UAAU,UAAU,CAAC,QAAgB,EAAE,IAAa,EAAE,KAAc;IACxE,IAAI,QAAQ,KAAK,GAAG,IAAI,CAAC,OAAO,IAAI,KAAK,QAAQ,IAAI,OAAO,KAAK,KAAK,QAAQ,CAAC,EAAE,CAAC;QAChF,MAAM,CAAC,GAAG,QAAQ,CAAC,IAAI,CAAC,CAAC;QACzB,MAAM,CAAC,GAAG,QAAQ,CAAC,KAAK,CAAC,CAAC;QAC1B,OAAO,CAAC,KAAK,IAAI,IAAI,CAAC,KAAK,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC;IACjD,CAAC;IACD,IAAI,CAAC,QAAQ,CAAC,IAAI,CAAC,IAAI,CAAC,QAAQ,CAAC,KAAK,CAAC;QAAE,OAAO,IAAI,CAAC;IACrD,QAAQ,QAAQ,EAAE,CAAC;QACjB,KAAK,GAAG;YACN,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC;QAC5B,KAAK,GAAG;YACN,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC;QAC5B,KAAK,GAAG;YACN,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC;QAC5B,KAAK,GAAG;YACN,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC;QAC5B,KAAK,GAAG;YACN,4DAA4D;YAC5D,OAAO,IAAI,CAAC,IAAI,GAAG,KAAK,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,GAAG,KAAK,CAAC,CAAC,CAAC;QACvD;YACE,OAAO,IAAI,CAAC;IAChB,CAAC;AACH,CAAC;AAED,sGAAsG;AACtG,SAAS,QAAQ,CAAC,KAAc;IAC9B,IAAI,KAAK,KAAK,IAAI,IAAI,KAAK,KAAK,SAAS;QAAE,OAAO,EAAE,CAAC;IACrD,IAAI,OAAO,KAAK,KAAK,QAAQ;QAAE,OAAO,KAAK,CAAC;IAC5C,OAAO,QAAQ,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;AAChD,CAAC;AAED,gEAAgE;AAChE,MAAM,UAAU,MAAM,CAAC,KAAc;IACnC,OAAO,QAAQ,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;AAC/C,CAAC;AAED,mFAAmF;AACnF,MAAM,UAAU,MAAM,CAAC,KAAc;IACnC,IAAI,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC;QAAE,OAAO,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC;IAClD,IAAI,KAAK,KAAK,IAAI,IAAI,OAAO,KAAK,KAAK,QAAQ;QAAE,OAAO,MAAM,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,MAAM,GAAG,CAAC,CAAC;IACtF,OAAO,OAAO,CAAC,KAAK,CAAC,CAAC;AACxB,CAAC;AAED;;;;GAIG;AACH,MAAM,UAAU,OAAO,CAAC,KAAa,EAAE,MAAc;IACnD,MAAM,KAAK,GAAG,EAAE,IAAI,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC;IACvC,oEAAoE;IACpE,MAAM,MAAM,GAAG,MAAM,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,KAAK,CAAC,GAAG,KAAK,CAAC,CAAC,WAAW,CAAC,EAAE,CAAC,CAAC,CAAC;IACjE,OAAO,IAAI,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC,GAAG,KAAK,CAAC,CAAC;AAC/D,CAAC"}

package/src/lib/expression/order.d.mts

@@ -0,0 +1,11 @@
+/**
+ * The order to work fields out in: each after the fields it reads. `reads`
+ * maps each worked-out field to the fields its expression reads; names not in
+ * the map are plain values and need no order. A circle — a field read, at
+ * some remove, by itself — has no order: it is listed among the cycles, as
+ * the fields around it (`a → b → a`), and its fields still come out once each.
+ */
+export declare function dependencyOrder(reads: ReadonlyMap<string, readonly string[]>): {
+    order: string[];
+    cycles: string[][];
+};