tonus 0.1.8 → 0.5.0

package/dist/engines/chant/data/masses.js

@@ -1,36 +1,63 @@
-// humana/data/masses — 18 kyriale mass profiles
-//
-// Describes which masses are appropriate for a given season, grade, and day.
-// Mass 0 has two ad-lib variants (index 0a/0b); all others are single entries.
-import { GRADE_ORDER, } from "../../cal/types.js";
-// Inclusive slice of GRADE_ORDER from `high` (more solemn) to `low`.
-// e.g. gradesFrom("duplex-i", "duplex-ii") lists every grade between them.
-function gradesFrom(high, low) {
-    const hi = GRADE_ORDER.indexOf(high);
-    const lo = GRADE_ORDER.indexOf(low);
-    return GRADE_ORDER.slice(hi, lo + 1);
-}
-// Ad libitum entries are not part of the numbered kyriale; they serve as a
-// last-resort fallback when no numbered mass matches the feast context.
+// "This Ordinary is NOT meant to be a matter of hard and fast rule: chants from
+// one Mass may be used together with those from others, the Ferial Masses
+// excepted." [liber-usualis, Kyriale] — so slots may mix freely EXCEPT
+// under these two rubrics, whose masses are sung whole.
+export const WHOLE_MASS_RUBRICS = new Set([
+    "feria",
+    "feria-penitential",
+]);
+// The grades belonging to each rank category. The Grade ladder is
+// classis-primary and already carries the class in its names — `-i` is
+// "Duplex/Semiduplex I classis", `-ii` is II classis, unsuffixed is the
+// III-class tier (see cal/types.ts and archive/plan-2-rank-redesign.md for
+// the canonical 14-grade table).
+export const CLASS_I_GRADES = [
+    "triduum",
+    "duplex-i",
+    "duplex-majus-i",
+    "semiduplex-i",
+];
+export const CLASS_II_GRADES = ["duplex-ii", "semiduplex-ii"];
+export const CLASS_III_GRADES = [
+    "duplex-majus",
+    "duplex",
+    "semiduplex",
+];
+// `feria-privilegiata` is Ash Wednesday and Holy Week Mon–Wed — ranked high in
+// precedence but a feria, and always penitential.
+export const FERIA_GRADES = [
+    "feria-privilegiata",
+    "feria-major",
+    "vigilia",
+    "feria",
+];
+// Ad libitum fallbacks for a day whose calendar entry names no mass at all.
+// `mass` doubles as the lookup key into the Kyriale, so a fallback must name a
+// mass the book actually carries. These two carried mass 0 — a number no Kyriale
+// entry has — so the fallback silently resolved to nothing: the ordinary came
+// back with a Credo and the sprinkling and no Kyrie, Gloria, Sanctus or Agnus at
+// all, on roughly 50 days a year. The numbers below are the settings these
+// entries are already named after: de Angelis IS mass VIII, Cum jubilo IS the
+// BVM mass. An open editorial question on bvm: "Missa Salve" could instead
+// point at the ad libitum Kyrie Salve (appendix); mass IX is the plain reading
+// of "de Beata Maria".
 export const AD_LIB = {
     standard: {
         id: "adlib_standard",
-        mass: 0,
+        mass: 8,
         title: "Missa de Angelis (short)",
-        seasons: ["epi", "nat"],
-        grades: gradesFrom("duplex-ii", "feria"),
-        days: ["dominica"],
+        rubric: "class-ii",
+        heading: "For feasts of the II class. 5.",
         bvm: false,
         credos: ["I"],
         notes: "Ad libitum variant for ordinary Sundays.",
     },
     bvm: {
         id: "adlib_bvm",
-        mass: 0,
+        mass: 9,
         title: "Missa de Beata Maria (Missa Salve)",
-        seasons: ["epi", "pent"],
-        grades: gradesFrom("semiduplex", "feria"),
-        days: ["feria"],
+        rubric: "bvm",
+        heading: "For feasts of the Blessed Virgin. 1.",
         bvm: true,
         credos: [],
         notes: "BVM Saturdays outside privileged seasons.",
@@ -43,9 +70,8 @@ export const MASSES = new Map([
             id: "mass_1",
             mass: 1,
             title: "Lux et Origo",
-            seasons: ["pasc"],
-            grades: gradesFrom("triduum", "duplex-ii"),
-            days: ["dominica"],
+            rubric: "paschal",
+            heading: "I. — In Paschal Time.",
             bvm: false,
             credos: ["I", "III"],
             notes: "Sundays of Paschaltide; also solemn feasts in Paschaltide.",
@@ -57,9 +83,8 @@ export const MASSES = new Map([
             id: "mass_2",
             mass: 2,
             title: "Kyrie fons bonitatis",
-            seasons: ["pasc"],
-            grades: gradesFrom("triduum", "duplex-ii"),
-            days: ["dominica", "feria"],
+            rubric: "class-i",
+            heading: "II. — For feasts of the I class. 1.",
             bvm: false,
             credos: ["I", "III"],
             notes: "Solemn feasts of the Lord during Paschaltide.",
@@ -71,9 +96,8 @@ export const MASSES = new Map([
             id: "mass_3",
             mass: 3,
             title: "Kyrie Deus sempiterne",
-            seasons: ["nat", "epi"],
-            grades: gradesFrom("duplex-i", "duplex-ii"),
-            days: ["dominica", "feria"],
+            rubric: "class-i",
+            heading: "III. — For feasts of the I class. 2.",
             bvm: false,
             credos: ["I", "III"],
             notes: "Solemn feasts of the Lord outside Paschaltide, especially at Christmas/Epiphany.",
@@ -85,9 +109,8 @@ export const MASSES = new Map([
             id: "mass_4",
             mass: 4,
             title: "Cunctipotens genitor Deus",
-            seasons: ["nat", "epi", "pasc", "pent"],
-            grades: gradesFrom("duplex-i", "duplex-ii"),
-            days: ["dominica", "feria"],
+            rubric: "class-ii",
+            heading: "IV. — For feasts of the II class. 1.",
             bvm: false,
             credos: ["I", "III"],
             notes: "Feasts of the Apostles and major solemnities.",
@@ -99,9 +122,8 @@ export const MASSES = new Map([
             id: "mass_5",
             mass: 5,
             title: "Kyrie magnæ Deus potentiæ",
-            seasons: ["nat", "epi", "pasc", "pent"],
-            grades: gradesFrom("duplex-i", "duplex-ii"),
-            days: ["dominica"],
+            rubric: "class-ii",
+            heading: "V. — For feasts of the II class. 2.",
             bvm: false,
             credos: [],
             notes: "For Apostles and certain solemnities.",
@@ -113,9 +135,8 @@ export const MASSES = new Map([
             id: "mass_6",
             mass: 6,
             title: "Kyrie Rex genitor",
-            seasons: ["nat", "epi", "pasc", "pent"],
-            grades: gradesFrom("duplex-ii", "semiduplex"),
-            days: ["feria", "dominica"],
+            rubric: "class-ii",
+            heading: "VI. — For feasts of the II class. 3.",
             bvm: false,
             credos: [],
             notes: "For Confessors (non-bishops).",
@@ -127,9 +148,8 @@ export const MASSES = new Map([
             id: "mass_7",
             mass: 7,
             title: "Kyrie Rex splendens",
-            seasons: ["epi", "pent"],
-            grades: gradesFrom("duplex-ii", "duplex"),
-            days: ["dominica"],
+            rubric: "class-ii",
+            heading: "VII. — For feasts of the II class. 4.",
             bvm: false,
             credos: [],
             notes: "For Sundays after Epiphany and after Pentecost (EF).",
@@ -141,9 +161,8 @@ export const MASSES = new Map([
             id: "mass_8",
             mass: 8,
             title: "De Angelis",
-            seasons: ["epi", "nat", "pent"],
-            grades: gradesFrom("duplex-i", "feria"),
-            days: ["dominica"],
+            rubric: "class-ii",
+            heading: "VIII. — For feasts of the II class. 5.",
             bvm: false,
             credos: ["I", "III"],
             notes: "Commonly used for Sundays per annum.",
@@ -155,9 +174,8 @@ export const MASSES = new Map([
             id: "mass_9",
             mass: 9,
             title: "Cum jubilo",
-            seasons: ["adv", "nat", "quad", "pasc", "epi", "pent"],
-            grades: gradesFrom("triduum", "feria"),
-            days: ["feria", "dominica"],
+            rubric: "bvm",
+            heading: "IX. — For feasts of the Blessed Virgin. 1.",
             bvm: true,
             credos: ["IV"],
             notes: "Mass of the Blessed Virgin Mary; often for BVM feasts and Saturdays.",
@@ -169,9 +187,8 @@ export const MASSES = new Map([
             id: "mass_10",
             mass: 10,
             title: "Alme Pater",
-            seasons: ["adv", "nat", "quad", "pasc", "epi", "pent"],
-            grades: gradesFrom("duplex-ii", "feria"),
-            days: ["feria", "dominica"],
+            rubric: "bvm",
+            heading: "X. — For feasts of the Blessed Virgin. 2.",
             bvm: true,
             credos: [],
             notes: "Marian Kyriale",
@@ -183,9 +200,8 @@ export const MASSES = new Map([
             id: "mass_11",
             mass: 11,
             title: "Orbis factor",
-            seasons: ["epi", "pent"],
-            grades: gradesFrom("duplex-ii", "feria"),
-            days: ["dominica"],
+            rubric: "sunday",
+            heading: "XI. — For Sundays throughout the Year.",
             bvm: false,
             credos: ["I", "III"],
             notes: "For Sundays per annum (after Epiphany and after Pentecost).",
@@ -197,9 +213,8 @@ export const MASSES = new Map([
             id: "mass_12",
             mass: 12,
             title: "Pater cuncta",
-            seasons: ["epi", "pent"],
-            grades: gradesFrom("duplex-ii", "duplex"),
-            days: ["dominica"],
+            rubric: "class-iii",
+            heading: "XII. — For feasts of the III class. 1.",
             bvm: false,
             credos: [],
             notes: "For Sundays after Pentecost.",
@@ -211,9 +226,8 @@ export const MASSES = new Map([
             id: "mass_13",
             mass: 13,
             title: "Stelliferi conditor orbis",
-            seasons: ["epi", "pent"],
-            grades: gradesFrom("duplex-ii", "duplex"),
-            days: ["dominica"],
+            rubric: "class-iii",
+            heading: "XIII. — For feasts of the III class. 2.",
             bvm: false,
             credos: [],
             notes: "For Sundays after Pentecost.",
@@ -225,9 +239,8 @@ export const MASSES = new Map([
             id: "mass_14",
             mass: 14,
             title: "Jesu Redemptor",
-            seasons: ["epi", "nat"],
-            grades: gradesFrom("duplex-ii", "duplex"),
-            days: ["feria", "dominica"],
+            rubric: "class-iii",
+            heading: "XIV. — For feasts of the III class. 3.",
             bvm: false,
             credos: [],
             notes: "For Confessor Bishops.",
@@ -239,9 +252,8 @@ export const MASSES = new Map([
             id: "mass_15",
             mass: 15,
             title: "Dominator Deus",
-            seasons: ["epi", "pent"],
-            grades: gradesFrom("duplex-ii", "duplex"),
-            days: ["dominica"],
+            rubric: "commemoration",
+            heading: "XV. — For commemorations.",
             bvm: false,
             credos: [],
             notes: "For Sundays after Pentecost of lower solemnity.",
@@ -253,9 +265,8 @@ export const MASSES = new Map([
             id: "mass_16",
             mass: 16,
             title: "Deus genitor alme",
-            seasons: ["epi", "pent"],
-            grades: gradesFrom("semiduplex", "simplex"),
-            days: ["dominica"],
+            rubric: "feria",
+            heading: "XVI. — For ferias throughout the Year.",
             bvm: false,
             credos: [],
             notes: "For lower-rank Sundays after Pentecost.",
@@ -267,11 +278,8 @@ export const MASSES = new Map([
             id: "mass_17",
             mass: 17,
             title: "Salve",
-            seasons: ["adv", "quadp", "quad"],
-            // Advent/Lent Sundays are Semiduplex I classis — the highest dignity in
-            // these seasons — so the penitential Sunday mass must reach that far up.
-            grades: gradesFrom("semiduplex-i", "feria"),
-            days: ["dominica"],
+            rubric: "sunday-penitential",
+            heading: "XVII. — For the Sundays of Advent and Lent.",
             bvm: false,
             credos: ["IV"],
             notes: "For Sundays of Advent, pre-Lent, and Lent.",
@@ -283,15 +291,232 @@ export const MASSES = new Map([
             id: "mass_18",
             mass: 18,
             title: "Deus Genitor alme",
-            seasons: ["adv", "quadp", "quad"],
-            // Penitential ferias: privileged ferias (Ash Wed, Holy Week Mon–Wed)
-            // down through ordinary ferias.
-            grades: gradesFrom("feria-privilegiata", "feria"),
-            days: ["feria"],
+            rubric: "feria-penitential",
+            heading: "XVIII. — For the ferias of Advent and Lent.",
             bvm: false,
             credos: [],
             notes: "For weekdays of Advent, pre-Lent, and Lent; penitential ferias.",
         },
     ],
 ]);
+/** The masses the book appoints under one rubric, in mass-number order. */
+export function massesForRubric(rubric) {
+    return [...MASSES.values()]
+        .filter((m) => m.rubric === rubric)
+        .sort((a, b) => a.mass - b.mass);
+}
+/** mass number → ordinary code → what the Kyriale prints. */
+export const MASS_CENTURY = {
+    // Mass I — Lux et Origo
+    1: {
+        ky: { from: 10, to: 10, printed: "X. s." },
+        gl: { from: 10, to: 10, printed: "X. s." },
+        sa: { from: 10, to: 10, printed: "X. s." },
+        ag: { from: 10, to: 10, printed: "X. s." },
+    },
+    // Mass II — Kyrie fons bonitatis
+    2: {
+        ky: { from: 10, to: 10, printed: "X. s." },
+        gl: { from: 13, to: 13, printed: "XIII. s." },
+        ag: { from: 10, to: 10, printed: "X. s." },
+    },
+    // Mass III — Kyrie Deus sempiterne
+    3: {
+        ky: { from: 11, to: 11, inferred: true, printed: "XI. s." },
+        gl: { from: 11, to: 11, printed: "XI. s." },
+        sa: { from: 12, to: 12, alt: 11, printed: "(XI) XII. s." },
+        ag: { from: 11, to: 12, printed: "XI-XII. s." },
+    },
+    // Mass IV — Cunctipotens Genitor Deus
+    4: {
+        ky: { from: 10, to: 10, printed: "X. s." },
+        gl: { from: 10, to: 10, printed: "X. s." },
+        sa: { from: 11, to: 11, printed: "XI. s." },
+        ag: { from: 13, to: 13, alt: 12, printed: "(XII) XIII. s." },
+    },
+    // Mass V — Kyrie magnæ Deus potentiæ
+    5: {
+        ky: { from: 13, to: 13, printed: "XIII. s." },
+        gl: { from: 12, to: 12, printed: "XII. s." },
+        sa: { from: 12, to: 12, printed: "XII. s." },
+        ag: { from: 12, to: 12, printed: "XII. s." },
+    },
+    // Mass VI — Kyrie Rex Genitor
+    6: {
+        ky: { from: 10, to: 10, printed: "X. s." },
+        gl: { from: 10, to: 10, printed: "X. s." },
+        sa: { from: 11, to: 11, printed: "XI. s." },
+        ag: { from: 11, to: 11, printed: "XI. s." },
+    },
+    // Mass VII — Kyrie Rex splendes
+    7: {
+        ky: { from: 10, to: 10, printed: "X. s." },
+        gl: { from: 12, to: 12, printed: "XII. s." },
+        sa: { from: 11, to: 11, printed: "XI. s." },
+        ag: { from: 15, to: 15, printed: "XV. s." },
+    },
+    // Mass VIII — de Angelis
+    8: {
+        ky: { from: 15, to: 16, printed: "XV-XVI. s." },
+        gl: { from: 16, to: 16, printed: "XVI. s." },
+        sa: { from: 12, to: 12, alt: 11, printed: "(XI) XII. s." },
+        ag: { from: 15, to: 15, printed: "XV. s." },
+    },
+    // Mass IX — Cum Jubilo
+    9: {
+        ky: { from: 12, to: 12, printed: "XII. s." },
+        gl: { from: 11, to: 11, printed: "XI. s." },
+        sa: { from: 14, to: 14, printed: "XIV. s." },
+        ag: { from: 13, to: 13, alt: 10, printed: "(X) XIII. s." },
+    },
+    // Mass X — Alme Pater
+    10: {
+        ky: { from: 11, to: 11, printed: "XI. s." },
+        gl: { from: 15, to: 15, printed: "XV. s." },
+        sa: { from: null, to: null, printed: "?. s." },
+        ag: { from: 12, to: 12, printed: "XII. s." },
+    },
+    // Mass XI — Orbis factor
+    11: {
+        ky: { from: 14, to: 16, alt: 10, printed: "(X) XIV-XVI. s." },
+        gl: { from: 10, to: 10, printed: "X. s." },
+        sa: { from: 10, to: 10, printed: "X. s." },
+        ag: { from: 14, to: 14, printed: "XIV. s." },
+    },
+    // Mass XII — Pater cuncta
+    12: {
+        ky: { from: 12, to: 12, printed: "XII. s." },
+        gl: { from: 12, to: 12, inferred: true, printed: "XII. s." },
+        sa: { from: 13, to: 13, printed: "XIII. s." },
+        ag: { from: 11, to: 11, printed: "XI. s." },
+    },
+    // Mass XIII — Stelliferi Conditor orbis
+    13: {
+        ky: { from: 11, to: 11, printed: "XI. s." },
+        gl: { from: 12, to: 12, printed: "XII. s." },
+        sa: { from: 13, to: 13, printed: "XIII. s." },
+        ag: { from: null, to: null, printed: "? s." },
+    },
+    // Mass XIV — Jesu Redemptor
+    14: {
+        ky: { from: 10, to: 10, inferred: true, printed: "X. s." },
+        gl: { from: 10, to: 10, printed: "X. s." },
+        sa: { from: 12, to: 12, inferred: true, printed: "XII. s." },
+        ag: { from: 13, to: 13, printed: "XIII. s." },
+    },
+    // Mass XV — Dominator Deus
+    15: {
+        ky: { from: 11, to: 13, printed: "XI-XIII. s." },
+        gl: { from: 10, to: 10, printed: "X. s." },
+        sa: { from: 10, to: 10, printed: "X. s." },
+        ag: { from: 14, to: 14, alt: 12, printed: "(XII) XIV. s." },
+    },
+    // Mass XVI
+    16: {
+        ky: { from: 11, to: 13, printed: "XI-XIII. s." },
+        sa: { from: 13, to: 13, printed: "XIII. s." },
+        ag: { from: 10, to: 11, printed: "X-XI. s." },
+    },
+    // Mass XVII
+    17: {
+        ky: { from: 15, to: 17, alt: 10, printed: "(X) XV-XVII. s." },
+        sa: { from: 11, to: 11, printed: "XI. s." },
+        ag: { from: 13, to: 13, printed: "XIII. s." },
+    },
+    // Mass XVIII — Deus Genitor alme
+    18: {
+        ky: { from: 11, to: 11, printed: "XI. s." },
+        sa: { from: 13, to: 13, printed: "XIII. s." },
+        ag: { from: 12, to: 12, printed: "XII. s." },
+    },
+};
+/** Credo number (roman, as the Kyriale names them) → its ascription. */
+export const CREDO_CENTURY = {
+    I: { from: 11, to: 11, printed: "XI. s." },
+    II: { from: null, to: null, printed: "?. s." },
+    III: { from: 17, to: 17, printed: "XVII. s." },
+    IV: { from: 15, to: 15, printed: "XV. s." },
+    V: { from: 12, to: 12, printed: "XII. s." },
+    VI: { from: 11, to: 11, printed: "XI. s." },
+};
+// ── The Kyriale era rule ────────────────────────────────────────────────────
+// A LATEST-CENTURY bound on ORDINARY settings, and nothing more. Scope matters
+// here, so it is stated plainly rather than implied:
+//
+// This is NOT a corpus-wide era filter. tonus has per-chant EDITORIAL dates
+// for the Kyriale and for nothing else — 71 of 2,860 shipped chants, 2.5%. A
+// bound applied beyond that would be filtering 97.5% of the repertory on data
+// that does not exist. The attestation filter learned this the hard way: at
+// 69% coverage it answered "what was sung in 1098" by deleting the Night
+// Office, because CANTUS had not yet dated the responsories, and it stayed
+// retired until the coverage was closed (see chant/attest.ts). 2.5% is the
+// stricter version of the same mistake.
+//
+// So the corpus's period is set by THE CUT — it ships what the liturgy places —
+// and this rule only keeps the ordinary from reaching for a setting the
+// Kyriale's own editors date to the Renaissance. Within its 2.5% the data is
+// near-complete (66 of 72 mass parts printed) and per-part, which is what makes
+// it safe to act on where CANTUS attestation was not.
+//
+// The cutoff: Docta Sanctorum Patrum, John XXII's bull at Avignon (1324),
+// condemning the ars nova and insisting the plainchant melodies stay "intact
+// and recognizable as such" — the liturgy's own line between the chant
+// tradition and what followed. It lands on the seam already in the data:
+// Kyriale parts by century run 10th 21 · 11th 17 · 12th 13 · 13th 8 · then
+// 14th 2. A cliff, not a slope.
+//
+// There is deliberately NO lower bound. An earlier draft carried ERA_FROM=754
+// (the Frankish adoption of the Roman rite), which read as doctrine but was
+// unenforceable: nothing in the corpus is checked against it and no data could
+// check it. A constant nothing enforces is a claim, not a rule.
+export const ORDINARY_LATEST_YEAR = 1324;
+/**
+ * The latest century a year admits WHOLE.
+ *
+ * The Kyriale dates a setting only to its century, so 1324 cannot admit "the
+ * 14th century" — a chant marked XIV. s. may have been written in 1390, well
+ * after the bull. A century is admitted only when it has CLOSED by the bound:
+ * 1324 → 13 (through the 1200s), 1300 → 13 (the century closes at its
+ * hundredth year). This is the same closed-century rule attest.ts applies to
+ * `before` — floor, not ceil, so an exact century year admits the century it
+ * ends. It is what keeps Mass IX's XIV-c Sanctus and Mass XI's XIV-c Agnus
+ * out, which is the whole point of choosing 1324.
+ */
+function latestWholeCentury(year) {
+    return Math.floor(year / 100);
+}
+/**
+ * Whether a Kyriale setting is early enough to sing.
+ *
+ * PER PART, never per mass. The Kyriale is a 19th-c Solesmes GROUPING of chants
+ * from different centuries — which is why its ascriptions are per-part in the
+ * first place. Mass XI "Orbis factor" is a 10th-c Kyrie + 10th Gloria + 10th
+ * Sanctus with a 14th-c Agnus bolted on; a whole-mass test would lose the
+ * ordinary Sunday mass over one late part. The book licenses the per-part
+ * result outright — "chants from one Mass may be used together with those from
+ * others, the Ferial Masses excepted" — so a dropped part simply borrows, which
+ * is the machinery entriesForOffice() already runs.
+ *
+ * `alt` wins where the editors print one. Mass XI's Kyrie reads "(X) XIV-XVI.
+ * s." — the parenthetical is the melody, the late reading is whichever
+ * manuscript they transcribed. Modern scholarship agrees: Corpus Monodicum
+ * (Brill, 2024) dates Orbis factor to the 10th-12th c.
+ *
+ * An undated part (the editors' own "?. s.") is ADMITTED, not excluded —
+ * undated is not late, and excluding it would repeat the mistake that killed
+ * the attestation filter. Same for a part with no entry at all: this rule can
+ * only remove a setting the Kyriale itself dates late, never one it is silent
+ * about.
+ */
+export function partWithinEra(mass, office, toYear = ORDINARY_LATEST_YEAR) {
+    if (mass == null || !office)
+        return true;
+    const entry = MASS_CENTURY[mass]?.[office];
+    if (!entry)
+        return true; // no printed century → admit
+    const century = entry.alt ?? entry.from;
+    if (century == null)
+        return true; // "?. s." → admit
+    return century <= latestWholeCentury(toYear);
+}
 //# sourceMappingURL=masses.js.map

package/dist/engines/chant/data/prime.js

@@ -10,7 +10,7 @@
 //
 // Like compline.ts and masses.ts (its siblings here) this is a hand-authored table that
 // references chants already in the corpus by id; it carries no GABC of its own.
-// See docs/chant.md and BIBLIOGRAPHY.md.
+// See ../../../../docs/api/chant.md and ../../../../BIBLIOGRAPHY.md.
 // Prime's psalmody (Ps 53 + a weekday-proper psalm + Ps 118 in two sections,
 // varying by weekday per DO's Tridentine scheme) is not hand-listed here — it
 // comes from the extracted scheme via `officePsalmPortions("Prima", weekday)`.