diff --git a/.weksa/cultural-ontology/README.md b/.weksa/cultural-ontology/README.md
deleted file mode 100644
index a424e82..0000000
--- a/.weksa/cultural-ontology/README.md
+++ /dev/null
@@ -1,27 +0,0 @@
-# Cultural Ontology CultCache Seeds
-
-This directory stores Weksa cultural ontology as CultCache `.cc` witnesses.
-
-## Starter Database
-
-- `starter-targets.cc`
-
-This store contains one catalog entry and three draft guarded profile entries:
-
-- `weksa.cultural_ontology.pt-BR.vanilla_brazilian.v0`
-- `weksa.cultural_ontology.en.transatlantic.v0`
-- `weksa.cultural_ontology.ja-JP.kanto.contemporary.v0`
-
-The catalog entry is:
-
-- `weksa.cultural_ontology.catalog.seed_targets.v0`
-
-The `.cc` file is the typed state witness. This README is only an inspection
-guide; it does not own cultural ontology truth.
-
-The profiles follow `schemas/cultural-ontology-profile.md`: salience axes and
-linguistic affordances are nested typed state with feature IDs, activation
-gates, constraints, indexicality, evidence, uncertainty, and trace labels.
-
-Qdrant retrieval may later propose evidence bundles for these profiles. It does
-not own accepted profile state.
diff --git a/.weksa/cultural-ontology/starter-targets.cc b/.weksa/cultural-ontology/starter-targets.cc
deleted file mode 100644
index 680b06c..0000000
Binary files a/.weksa/cultural-ontology/starter-targets.cc and /dev/null differ
diff --git a/README.md b/README.md
index 3133190..2b5d0d3 100644
--- a/README.md
+++ b/README.md
@@ -5,7 +5,8 @@ culture, and constraint, and the planned lowerer that turns an agent's
 meaning packet into the reader's display language.
 
 **What is valuable here.** The interlingua standard and the lowering design: a
-meaning packet owns what is meant, a target-language profile owns register,
+meaning packet owns what is meant, the scene state (live: `weksa scene put|dump`, labelled by the rule in
+`docs/scene-annotation.md`; speaker documents are planned) owns the speaker's relation to the addressee, which selects register,
 address and politeness, and a lowerer owns surface text and leaves a trace.
 
 **The problem it solves.** An agent's outward speech today is one English
@@ -24,11 +25,13 @@ measured.
   published schemas in `schemas/cultnet/`.
 - `data/corpus/corpus.cc`, `data/entity/entity.cc` and `data/interlingua/inventory.cc`: the English
   corpus, its entities and the inventory, read with `weksa corpus dump`,
-  `weksa entity dump` and `weksa inventory dump`.
+  `weksa entity dump` and `weksa inventory dump`. `data/original/inventory.cc`
+  carries its own Validation-informed lexicon revisions (5 and 6) for lowering
+  measurements; scored runs use `data/interlingua`.
 - [Lowering target](./docs/targets/interlingua-lowering.md) and
   [its map](./docs/targets/interlingua-lowering-map.md): the design, scoring
   and cut sequence.
-- `data/`: the cultural ontology and target-language profile data.
+- `data/`: the committed stores (corpora, entities, inventory, language ontology) and research data; there are no target-language profiles.
 - `settings/`: setting-specific proving grounds for language projects.
 
 **Live versus planned.** Live: docs, fixtures, examples, ontology data and the
@@ -82,9 +85,17 @@ English, Brazilian Portuguese, Japanese, and later target-language dialogue.
 [Flavored English Lowering](./docs/flavored-english-lowering.md) remains the
 target-specific English receipt.
 
-See [Target-Language Cultural Ontology Profiles](./data/target-language-ontology/README.md)
-for the reviewable address, register, politeness, idiom, metaphor, and script
-distinctions that target lowerers must inspect before producing output.
+The language ontology is `data/ontology/ontology.cc` (read it with
+`weksa ontology dump`): per language, the lexicon, grammar and discourse choices a lowerer
+reads for a stance, a discourse and a scene relation. Only an entry with a Scene condition names an
+address or politeness level; the relation, from `data/original/speaker-state.cc`, picks it. Its
+en-US and ja-JP entries and the keeper scenes are model-drafted or model-annotated, never Test evidence. Nothing yet grows them from accepted
+rounds; until that mint exists they change only by a new `weksa ontology admit`. ja-JP holds Scene entries `onto:ja-JP:10` to `:13`. It holds none for an above-status out-group
+addressee, and none for an above-status in-group addressee below intimacy 700 (`:12` still selects
+an in-group addressee at intimacy 700 or more, whatever the status). Two entries for the above-status
+cases were withdrawn: a paired measure found they made the lowerer match the reference register less
+often, and they stay out until a native reader attests them.
+ja-JP `:5` (hedging), `:7` (affection) and `:8` (restrained sadness) carry certainty and restraint conditions, through `AtMostOrUnset` bounds (an unrated certainty or restraint does not defeat them), so the hedging, certainty, affection, restraint and sadness entries never co-select on the pairs `:5`/`:6`, `:4`/`:7`, `:6`/`:7` and `:6`/`:8`; ja-JP `:3` (anger) carries `AtMostOrUnset` hedge and affection bounds, as en-US `:3`, so `:3`/`:5` and `:3`/`:7` never co-select; the store has no retire, so that was a rebuild of `data/ontology/ontology.cc` with the ja-JP text unchanged. en-US `:3` (blunt anger) carries `AtMostOrUnset` hedge and affection bounds, and `:5` (hedging) and `:8` (affection) each an `AtMostOrUnset` certainty bound (as ja-JP `:7`), so `:3`/`:5`, `:3`/`:8`, `:5`/`:6` and `:6`/`:8` never co-select; `:5`'s certainty clause is that condition and no longer prose; `:6` and the Scene entry `:10` still co-select and are kept apart by scoping in the text. ja-JP `:9` (surprise) states its question ending as available, not prescribed, so `:6`/`:9`, `:5`/`:9` and `:3`/`:9` stay co-selectable and are reconciled by wording, not by condition.
 
 For the first AquaSynth speech-training handoff, see
 [Tiny PanPhon v0.1 Speech Curriculum](./examples/speech-training/tiny-panphon-v0.1/README.md).
diff --git a/crates/weksa/examples/show_working.rs b/crates/weksa/examples/show_working.rs
index 8c23fb2..6a31b26 100644
--- a/crates/weksa/examples/show_working.rs
+++ b/crates/weksa/examples/show_working.rs
@@ -259,6 +259,8 @@ fn lower_error(e: &LowerError) -> Value {
         LowerError::ConsentMissing { predication } => ("ConsentMissing", format!("{predication} is a request the packet does not carry the addressee's consent to")),
         LowerError::AskerNotAddressee { predication } => ("AskerNotAddressee", format!("the agent of {predication} is not the addressee")),
         LowerError::EntityRead { entity, .. } => ("EntityRead", format!("the entity store failed reading {entity}")),
+        LowerError::SceneUnread => ("SceneUnread", "the view's scene was never read".to_string()),
+        LowerError::SpeakerTokenTaken => ("SpeakerTokenTaken", "a referent cites the entity id the speaker token uses".to_string()),
     };
     json!({ "variant": variant, "reason": reason })
 }
diff --git a/crates/weksa/src/context.rs b/crates/weksa/src/context.rs
index 877c974..5b64758 100644
--- a/crates/weksa/src/context.rs
+++ b/crates/weksa/src/context.rs
@@ -10,7 +10,14 @@
 //! [`Inventory`] and an [`EditFeedback`] and nothing else, so no held-out text,
 //! key or per-item score can reach it. A lowering prompt names the language it
 //! is said in on a language line; every language is named by its tag, none by a
-//! default.
+//! default. A lowering prompt also prints the target language's ontology
+//! entries that `ontology::select` chose for the view; the caller never names
+//! entries.
+//!
+//! An ontology mint prompt is a second Train-only prompt: the [`TrainItems`] of
+//! one language, the inventory's Stance, Discourse and Scene features (the only
+//! ones a condition can read) and that language's existing entry lines. It reads
+//! no packet, no score and no held-out text.
 //!
 //! Item text may hold line breaks; the renderer indents every continuation line
 //! (`indented`), so item text cannot forge a `[key]` line or a paragraph.
@@ -26,15 +33,17 @@ use std::marker::PhantomData;
 use serde::Serialize;
 
 use crate::corpus::{CorpusItem, CorpusItemId};
-use crate::inventory::{Inventory, InventoryEntry, OptionLabel, ValueKind};
+use crate::inventory::{Inventory, InventoryEntry, OptionLabel, Slot, ValueKind};
 use crate::lower::{EntityForms, LowerError, entity};
+use crate::encode::{EntryOntologyDraft, OntologyDraft};
+use crate::ontology::{Condition, Layer, Ontology, Test, select};
 use crate::packet::{
-    Context, Discourse, EntityId, Extension, Predication, Referent, Relation, Stance,
+    Context, Discourse, EntityId, Extension, FeatValue, Grade, Predication, Referent, Relation, Stance,
 };
 use crate::run::LADDER_STEP;
 use crate::split::{Checkpoint, Split, SplitScheme, fnv1a64, hex16};
 use crate::store::{CorpusStore, normalized};
-use crate::validate::LoweringInput;
+use crate::validate::{LoweringInput, SceneRead};
 
 /// The instructions a mint prompt starts with: the editor's whole brief. Fixed
 /// per run by `PROMPT_SOURCE_DIGEST`.
@@ -61,14 +70,14 @@ Fields:
 - predications: a list of {id, concept, frame, roles, features}; roles is a list of {role, filler}, filler a node id.
 - relations: a list of {relation, from, to, features}.
 - stance: {features}; the speaker's felt affect and restraint, never the affect the line displays.
-Node ids are n1, n2, and so on, one per referent and predication. Every other id comes from the inventory listed below and must be live at its revision. Write each id in full, exactly as the inventory lines spell it, family prefix included: concept:7, never 7. An entity comes only from the entities line. A referent's concept is never null, even when it carries an entity: give the nearest concept id. Participants and audience list the node ids of referents, never an entity id: an entity speaker is a referent whose entity field holds it, and participants lists that referent's node id.
+Node ids are n1, n2, and so on, one per referent and predication. Every other id comes from the inventory listed below and must be live at its revision. Write each id in full, exactly as the inventory lines spell it, family prefix included: concept:7, never 7. An entity comes only from the entities line. A referent's concept is never null, even when it carries an entity: give the nearest concept id. Participants and audience list the node ids of referents, never an entity id: an entity speaker is a referent whose entity field holds it, and participants lists that referent's node id. A predication holds each role at most once, and a feature list each feature at most once: two or more fillers of one role are one referent of kind group that fills the role, and each member is related to it by a member_of relation from the member to the group.
 A feature is {feature, value}; value is {\"Grade\": 0 to 1000}, {\"Option\": label} or {\"Flag\": true or false}, as the inventory lists the feature's kind.";
 
 /// The instructions a lowering prompt starts with: the lowerer's whole brief.
 /// Fixed per run by `PROMPT_SOURCE_DIGEST`.
 pub const LOWER_INSTRUCTIONS: &str = "\
 Say the packet below in the language on the language line, as one utterance of its speaker: all of its meaning and nothing it does not carry.
-Every id is the inventory's listed below and every feature value is as listed; a grade is permille, 0 to 1000. The stance is the speaker's felt affect and restraint: it shapes how the utterance is said, not what it says.
+Every id is the inventory's listed below and every feature value is as listed; a grade is permille, 0 to 1000. The stance is the speaker's felt affect and restraint: it shapes how the utterance is said, not what it says. The ontology lines are choices this language makes for this speaker, stance and scene: realize each where the packet allows; they add no meaning.
 A referent with an entity is named by one of that entity's forms on the entities line.
 Answer with one JSON object and nothing else: {\"text\": \"...\"}. No code fence, no commentary.";
 
@@ -79,6 +88,13 @@ pub const RECALL_INSTRUCTIONS: &str = "\
 Below is the opening of a passage, with what is known of where it comes from. Continue it exactly as its source words it, from memory, until the passage ends. If you do not remember it, give your best guess in the same voice.
 Answer with one JSON object and nothing else: {\"text\": \"...\"}, the continuation only, not the opening. No code fence, no commentary.";
 
+/// The instructions of an ontology mint: drafting entries for one language from
+/// its Train lines. Fixed per run by `PROMPT_SOURCE_DIGEST`.
+pub const MINT_ONTOLOGY_INSTRUCTIONS: &str = "\
+Below are lines written in one language (the language line), the features an ontology condition may test, and the entries that language's ontology already has. Draft new entries: choices this language's culture makes, for a speaker in a stance and scene, about word, grammar, discourse, sound or script, that the lines show.
+Answer with one JSON object and nothing else: {\"entries\": [{\"layer\": \"...\", \"when\": [...], \"choice\": \"...\", \"examples\": [...]}]}. No code fence, no commentary.
+Give only entries the lines show, as many as they support (a language holds at most 64 in all). layer is exactly one of Lexicon, Grammar, Discourse, Phonology, Orthography. when holds at most 4 conditions, each {\"slot\": \"Stance\" | \"Discourse\" | \"Scene\", \"feature\": \"<id>\", \"test\": ...}, where <id> is the id printed before the colon of a listed feature (\"feature:10\", never its name) and its slot is one that feature lists. test is {\"AtLeast\": <permille>}, {\"AtMost\": <permille>} or {\"AtMostOrUnset\": <permille>} on a grade feature, or {\"Is\": {\"Option\": \"<label>\"}} on an options feature with one of its labels, or {\"Is\": {\"Flag\": true}} on a flag feature. The example line shows each form on listed features; its choice and examples are placeholders, not content to copy. when may be empty when a choice holds for every line of the language. choice states a pattern the lines show, in at most 200 bytes, without quoting a line. examples are original short phrases of the language, never copied from the lines below, at most 3, each at most 120 bytes.";
+
 /// The live Train items of a corpus, in key order. The only input minting
 /// reads; it cannot be built from a slice, and no accessor returns text or an
 /// item.
@@ -86,7 +102,7 @@ Answer with one JSON object and nothing else: {\"text\": \"...\"}, the continuat
 /// ```no_run
 /// # let dir = tempfile::tempdir().unwrap();
 /// # let p = |n: &str| dir.path().join(n);
-/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc") };
+/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc"), ontology: &p("o.cc"), speaker_state: &p("s.cc") };
 /// # let panel = ["en-US".to_string()];
 /// # let run = weksa::run::RunStores::create(&p("run"), "t", paths, "m", "e", weksa::run::LowererReach::ToolLessRelay, weksa::corpus::ModelFamily::Unrecorded, &panel).unwrap();
 /// let t = run.train().unwrap();
@@ -100,8 +116,8 @@ Answer with one JSON object and nothing else: {\"text\": \"...\"}, the continuat
 /// ```compile_fail
 /// # let dir = tempfile::tempdir().unwrap();
 /// # let p = |n: &str| dir.path().join(n);
-/// # for n in ["c.cc", "i.cc", "e.cc"] { std::fs::write(p(n), [0x90]).unwrap(); }
-/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc") };
+/// # for n in ["c.cc", "i.cc", "e.cc", "o.cc"] { std::fs::write(p(n), [0x90]).unwrap(); }
+/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc"), ontology: &p("o.cc"), speaker_state: &p("s.cc") };
 /// # let run = weksa::run::RunStores::create(&p("run"), "t", paths, "m", "e", weksa::run::LowererReach::ToolLessRelay, weksa::corpus::ModelFamily::Unrecorded, &["en-US".to_string()]).unwrap();
 /// let t = run.train().unwrap();
 /// let _u = t.clone();
@@ -111,8 +127,8 @@ Answer with one JSON object and nothing else: {\"text\": \"...\"}, the continuat
 /// fn s<T: serde::Serialize>(_: &T) {}
 /// # let dir = tempfile::tempdir().unwrap();
 /// # let p = |n: &str| dir.path().join(n);
-/// # for n in ["c.cc", "i.cc", "e.cc"] { std::fs::write(p(n), [0x90]).unwrap(); }
-/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc") };
+/// # for n in ["c.cc", "i.cc", "e.cc", "o.cc"] { std::fs::write(p(n), [0x90]).unwrap(); }
+/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc"), ontology: &p("o.cc"), speaker_state: &p("s.cc") };
 /// # let run = weksa::run::RunStores::create(&p("run"), "t", paths, "m", "e", weksa::run::LowererReach::ToolLessRelay, weksa::corpus::ModelFamily::Unrecorded, &["en-US".to_string()]).unwrap();
 /// let t = run.train().unwrap();
 /// s(&t);
@@ -334,7 +350,7 @@ impl EditFeedback {
 /// ```no_run
 /// # let dir = tempfile::tempdir().unwrap();
 /// # let p = |n: &str| dir.path().join(n);
-/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc") };
+/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc"), ontology: &p("o.cc"), speaker_state: &p("s.cc") };
 /// # let panel = ["en-US".to_string()];
 /// # let run = weksa::run::RunStores::create(&p("run"), "t", paths, "m", "e", weksa::run::LowererReach::ToolLessRelay, weksa::corpus::ModelFamily::Unrecorded, &panel).unwrap();
 /// let t = run.train().unwrap();
@@ -352,8 +368,8 @@ impl EditFeedback {
 /// ```compile_fail,E0061
 /// # let dir = tempfile::tempdir().unwrap();
 /// # let p = |n: &str| dir.path().join(n);
-/// # for n in ["c.cc", "i.cc", "e.cc"] { std::fs::write(p(n), [0x90]).unwrap(); }
-/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc") };
+/// # for n in ["c.cc", "i.cc", "e.cc", "o.cc"] { std::fs::write(p(n), [0x90]).unwrap(); }
+/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc"), ontology: &p("o.cc"), speaker_state: &p("s.cc") };
 /// # let run = weksa::run::RunStores::create(&p("run"), "t", paths, "m", "e", weksa::run::LowererReach::ToolLessRelay, weksa::corpus::ModelFamily::Unrecorded, &["en-US".to_string()]).unwrap();
 /// let t = run.train().unwrap();
 /// let inv = run.inventory().inventory().unwrap();
@@ -365,8 +381,8 @@ impl EditFeedback {
 /// fn s<T: serde::Serialize>(_: &T) {}
 /// # let dir = tempfile::tempdir().unwrap();
 /// # let p = |n: &str| dir.path().join(n);
-/// # for n in ["c.cc", "i.cc", "e.cc"] { std::fs::write(p(n), [0x90]).unwrap(); }
-/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc") };
+/// # for n in ["c.cc", "i.cc", "e.cc", "o.cc"] { std::fs::write(p(n), [0x90]).unwrap(); }
+/// # let paths = weksa::run::RunPaths { corpus: &p("c.cc"), inventory: &p("i.cc"), entities: &p("e.cc"), ontology: &p("o.cc"), speaker_state: &p("s.cc") };
 /// # let run = weksa::run::RunStores::create(&p("run"), "t", paths, "m", "e", weksa::run::LowererReach::ToolLessRelay, weksa::corpus::ModelFamily::Unrecorded, &["en-US".to_string()]).unwrap();
 /// let t = run.train().unwrap();
 /// let inv = run.inventory().inventory().unwrap();
@@ -451,6 +467,53 @@ fn entry_line(entry: &InventoryEntry) -> String {
     line
 }
 
+/// The slot a condition on `entry` reads it in: the first of its slots a
+/// lowering view carries.
+fn condition_slot(entry: &InventoryEntry) -> Option<Slot> {
+    entry
+        .applies_to
+        .iter()
+        .copied()
+        .find(|s| matches!(s, Slot::Stance | Slot::Discourse | Slot::Scene))
+}
+
+/// One entry in the form the admit door reads, serialized from its own draft
+/// type so the taught shape cannot drift from the door: a condition on the
+/// first listed grade, options and flag feature each, over placeholder text.
+fn mint_example(readable: &[&InventoryEntry]) -> String {
+    let when = [
+        readable.iter().find(|e| e.value_kind == Some(ValueKind::Grade)).map(|e| {
+            (e, Test::AtLeast(Grade::new(500).expect("500 is a permille")))
+        }),
+        readable.iter().find_map(|e| match &e.value_kind {
+            Some(ValueKind::Options(set)) => {
+                let first = Vec::<OptionLabel>::from(set.clone()).remove(0);
+                Some((e, Test::Is(FeatValue::Option(first))))
+            }
+            _ => None,
+        }),
+        readable
+            .iter()
+            .find(|e| e.value_kind == Some(ValueKind::Flag))
+            .map(|e| (e, Test::Is(FeatValue::Flag(true)))),
+    ]
+    .into_iter()
+    .flatten()
+    .filter_map(|(e, test)| {
+        Some(Condition { slot: condition_slot(e)?, feature: e.id, test })
+    })
+    .collect();
+    let draft = OntologyDraft {
+        entries: vec![EntryOntologyDraft {
+            layer: Layer::Grammar,
+            when,
+            choice: "a pattern the lines show".into(),
+            examples: vec!["a short phrase of your own".into()],
+        }],
+    };
+    serde_json::to_string(&draft).expect("a draft serializes")
+}
+
 /// Each entry of `inventory` live at `rev`, one `\n` and one line apiece: the
 /// listing both prompts print under `inventory rev:<rev>`.
 fn inventory_lines(inventory: &Inventory, rev: u32) -> String {
@@ -475,6 +538,13 @@ struct Meaning<'a> {
     stance: &'a Stance,
 }
 
+/// What the lowering prompt prints in place of the item's speaker's entity id:
+/// one constant, the same for every speaker and every item, so no id and
+/// nothing derived from one reaches the lowerer. It parses as an entity id so
+/// the packet keeps its shape. A real entity of this id is refused at lowering
+/// ([`LowerError::SpeakerTokenTaken`]); the entity store does not reserve it.
+pub const SPEAKER_TOKEN: &str = "entity:speaker";
+
 /// Printed in place of a prior turn whose text no live Train item holds.
 const ELIDED: &str = "[elided]";
 
@@ -499,6 +569,51 @@ impl Prompt {
         }
     }
 
+    /// [`MINT_ONTOLOGY_INSTRUCTIONS`], the `language` line, the Stance,
+    /// Discourse and Scene features of `inventory` live at `rev` (grade, flag or
+    /// options: all a condition can read), the entries `ontology` already holds
+    /// for `language` as `<key> <choice>`, then the Train items of exactly
+    /// `language` in key order without prior turns. `None` when there is none.
+    pub(crate) fn mint_ontology(
+        train: &TrainItems,
+        language: &str,
+        inventory: &Inventory,
+        rev: u32,
+        ontology: &Ontology,
+    ) -> Option<Prompt> {
+        let items: Vec<&CorpusItem> = train
+            .items
+            .iter()
+            .filter(|item| item.language == language)
+            .collect();
+        if items.is_empty() {
+            return None;
+        }
+        let readable: Vec<&InventoryEntry> = inventory
+            .entries()
+            .filter(|e| e.live_at(rev) && e.value_kind.is_some() && condition_slot(e).is_some())
+            .collect();
+        let features: String = readable.iter().map(|e| format!("\n{}", entry_line(e))).collect();
+        let existing: String = ontology
+            .entries()
+            .iter()
+            .filter(|e| e.language == language)
+            .map(|e| format!("\n{} {}", e.key(), e.choice))
+            .collect();
+        let mut parts = vec![
+            MINT_ONTOLOGY_INSTRUCTIONS.to_string(),
+            format!("language: {language}"),
+            format!("features rev:{rev}{features}"),
+            format!("entries{existing}"),
+            format!("example {}", mint_example(&readable)),
+        ];
+        parts.extend(items.iter().map(|item| block(item, None)));
+        Some(Prompt {
+            text: parts.join("\n\n"),
+            items: items.iter().map(|item| item.id.as_str().to_string()).collect(),
+        })
+    }
+
     /// [`ENCODE_INSTRUCTIONS`], the one offered item with its prior turns resolved
     /// against `train`, the entities a packet for it may cite, and the entries
     /// of `inventory` live at `rev`.
@@ -523,22 +638,58 @@ impl Prompt {
 
     /// [`LOWER_INSTRUCTIONS`], the `language: <tag>` line, the meaning of
     /// `input` (no kind, constraints, scene, speaker or group), the forms in
-    /// `language` of every entity its referents cite, and the entries of `inventory` live at the view's revision. `item`
-    /// goes only to [`Prompt::item_keys`], never into the text. The view's
-    /// speaker and group fields are never read; a speaker's entity id appears
-    /// only when the encoder cites that entity on a referent, which is naming a
-    /// cited entity like any other. A cited entity the port lacks, or one with
-    /// no form in `language`, is an error and no prompt. The caller chooses the
-    /// language; the view has none.
+    /// `language` of every entity its referents cite, the `ontology:` section
+    /// and the entries of `inventory` live at the view's revision. The section
+    /// holds the entries `ontology::select` chooses from the view's stance,
+    /// discourse and the scene relation `with_scene` read, and `language`,
+    /// never the caller; the scene's values are never printed, only the entries
+    /// they select. `item` goes only to [`Prompt::item_keys`], never into the
+    /// text. `speaker` is the item's speaker: its id is never printed. The
+    /// promise guards the id that names an entity of this item, not the
+    /// speaker's forms, which every item of the language shares. A referent
+    /// citing the speaker is printed with [`SPEAKER_TOKEN`] as its entity, and
+    /// the entities line holds the speaker's forms under that token. A speaker
+    /// the language has no form for, or the port lacks, does not refuse: its
+    /// referents print no entity and the line has no entry. Any other cited
+    /// entity is printed under its own id with its forms; one the port lacks,
+    /// or one with no form in `language`, is an error and no prompt. A
+    /// referent citing the token's own id as an entity is
+    /// [`LowerError::SpeakerTokenTaken`]. The caller chooses the language; the
+    /// view has none.
     pub fn lower(
         input: &LoweringInput,
         item: &CorpusItemId,
+        speaker: &EntityId,
         language: &str,
         inventory: &Inventory,
         entities: &dyn EntityForms,
+        ontology: &Ontology,
     ) -> Result<Prompt, LowerError> {
+        if input.scene_read() == &SceneRead::Unread {
+            return Err(LowerError::SceneUnread);
+        }
+        let token = EntityId::parse(SPEAKER_TOKEN).expect("the token is an entity id");
+        let mut referents = input.referents().to_vec();
+        if referents.iter().any(|r| r.entity.as_ref() == Some(&token)) {
+            return Err(LowerError::SpeakerTokenTaken);
+        }
         let mut forms: BTreeMap<&str, Vec<String>> = BTreeMap::new();
-        for id in input.referents().iter().filter_map(|r| r.entity.as_ref()) {
+        if referents.iter().any(|r| r.entity.as_ref() == Some(speaker)) {
+            let spoken = match entity(entities, speaker) {
+                Ok(found) => found.forms_in(language).filter(|f| !f.is_empty()).map(<[String]>::to_vec),
+                Err(LowerError::UnknownEntity { .. }) => None,
+                Err(e) => return Err(e),
+            };
+            if let Some(spoken) = &spoken {
+                forms.insert(token.as_str(), spoken.clone());
+            }
+            for referent in &mut referents {
+                if referent.entity.as_ref() == Some(speaker) {
+                    referent.entity = spoken.as_ref().map(|_| token.clone());
+                }
+            }
+        }
+        for id in referents.iter().filter_map(|r| r.entity.as_ref()).filter(|id| *id != &token) {
             let found = entity(entities, id)?;
             let named = found
                 .forms_in(language)
@@ -549,15 +700,26 @@ impl Prompt {
         let meaning = Meaning {
             context: input.context(),
             discourse: input.discourse(),
-            referents: input.referents(),
+            referents: &referents,
             predications: input.predications(),
             relations: input.relations(),
             extensions: input.extensions(),
             stance: input.stance(),
         };
         let rev = input.inventory_rev();
+        let chosen = select(ontology, language, input);
+        let mut lines = String::new();
+        for e in &chosen {
+            lines.push_str(&format!("\n{} [{}] {}", e.key(), e.layer.name(), e.choice));
+            for x in &e.examples {
+                lines.push_str(&format!(" | e.g. {x}"));
+            }
+        }
+        if chosen.is_empty() {
+            lines.push_str(" none");
+        }
         let text = format!(
-            "{LOWER_INSTRUCTIONS}\n\nlanguage: {language}\n\npacket: {}\n\nentities: {}\n\ninventory rev:{rev}{}",
+            "{LOWER_INSTRUCTIONS}\n\nlanguage: {language}\n\npacket: {}\n\nentities: {}\n\nontology:{lines}\n\ninventory rev:{rev}{}",
             serde_json::to_string(&meaning).expect("a meaning is plain data"),
             serde_json::to_string(&forms).expect("forms are plain data"),
             inventory_lines(inventory, rev)
@@ -597,6 +759,9 @@ impl Prompt {
     }
 }
 
+#[cfg(test)]
+mod mutants;
+
 #[cfg(test)]
 mod tests {
     use super::*;
@@ -639,6 +804,18 @@ mod tests {
         );
     }
 
+    #[test]
+    fn an_ontology_mint_over_no_item_of_the_language_is_no_prompt() {
+        let inv = Inventory::default();
+        let train = TrainItems { items: vec![] };
+        assert!(Prompt::mint_ontology(&train, "en-US", &inv, 1, &Ontology::empty()).is_none());
+        let mut held = item("item:a:1", "x", &group_in(Split::Train), false);
+        held.language = "ja-JP".into();
+        let train = TrainItems { items: vec![held] };
+        assert!(Prompt::mint_ontology(&train, "en-US", &inv, 1, &Ontology::empty()).is_none());
+        assert!(Prompt::mint_ontology(&train, "ja-JP", &inv, 1, &Ontology::empty()).is_some());
+    }
+
     #[test]
     fn a_mint_prompt_over_no_train_items_is_the_brief_the_feedback_and_the_listing() {
         let none = TrainItems { items: vec![] };
@@ -783,6 +960,12 @@ mod tests {
         const SEPS: [&str; 8] = ["\n", "\r\n", "\r", "\u{b}", "\u{c}", "\u{85}", "\u{2028}", "\u{2029}"];
         let is_sep = |c: char| matches!(c, '\n' | '\r' | '\u{b}' | '\u{c}' | '\u{85}' | '\u{2028}' | '\u{2029}');
         let g = group_in(Split::Train);
+        // The escape itself, not through `str::lines`: one break per separator
+        // (CRLF is one), rendered as a newline and two spaces.
+        for sep in SEPS {
+            assert_eq!(indented(&format!("a{sep}b")), "a\n  b", "{sep:?}");
+        }
+        assert_eq!(indented("a\r\n\r\nb"), "a\n  \n  b");
         for sep in SEPS {
             let it = item("item:a:1", &format!("hi{sep}[item:z:9] x"), &g, false);
             let out = block(&it, None);
diff --git a/crates/weksa/src/context/mutants.rs b/crates/weksa/src/context/mutants.rs
new file mode 100644
index 0000000..876816f
--- /dev/null
+++ b/crates/weksa/src/context/mutants.rs
@@ -0,0 +1,14 @@
+//! Pins for private reach of `context.rs` that no run can produce.
+
+use super::*;
+
+/// A corpus with no live Train item of the panel's languages holds an empty
+/// train. (A run refuses a panel without Train items at open, so only the
+/// builder shows it.)
+#[test]
+fn no_train_item_of_the_panel_is_an_empty_train() {
+    let dir = tempfile::tempdir().unwrap();
+    let corpus = CorpusStore::open(&dir.path().join("c.cc")).unwrap();
+    let train = TrainItems::from_corpus(&corpus, &["en-US".to_string()]).unwrap();
+    assert_eq!((train.len(), train.is_empty()), (0, true));
+}
diff --git a/crates/weksa/src/corpus.rs b/crates/weksa/src/corpus.rs
index 4afa662..1fb7fa1 100644
--- a/crates/weksa/src/corpus.rs
+++ b/crates/weksa/src/corpus.rs
@@ -8,6 +8,7 @@ use serde::{Deserialize, Serialize};
 
 use crate::form::{FormError, is_slug, string_form};
 use crate::packet::EntityId;
+use crate::speaker::Annotator;
 
 #[derive(Clone, Debug, PartialEq, Eq, Serialize, Deserialize, JsonSchema)]
 pub struct Turn {
@@ -103,6 +104,11 @@ pub struct CorpusItem {
     /// Which entities the text names, and where. Fixed with the text at intake.
     #[cultcache(key = 10)]
     pub names: Vec<NameSpan>,
+    /// Who placed `names`: the annotator of the intake that wrote them. `None`
+    /// when nothing records one (the cast seeds, `weksa corpus add`, the Dao De
+    /// Jing bed); it labels the spans, never the line or its speaker.
+    #[cultcache(key = 11, default)]
+    pub names_by: Option<Annotator>,
 }
 
 impl CorpusItem {
diff --git a/crates/weksa/src/encode.rs b/crates/weksa/src/encode.rs
index c9b245e..500d575 100644
--- a/crates/weksa/src/encode.rs
+++ b/crates/weksa/src/encode.rs
@@ -7,7 +7,8 @@
 //! provenance, constraints and extensions, and an empty trace, so a model that
 //! saw a Validation item cannot hand its words to whoever reads packets. The
 //! editor writes family, gloss, value kind and slots only; `into_revision` sets
-//! every id and revision number.
+//! every id and revision number. The public-domain intake file (`WorkDraft`) and
+//! its name-span answer (`MarkedLine`) are read here too.
 
 use std::fmt;
 use std::num::NonZeroU32;
@@ -15,14 +16,21 @@ use std::num::NonZeroU32;
 use serde::de::DeserializeOwned;
 use serde::{Deserialize, Serialize};
 
-use crate::corpus::CorpusItemId;
+use unicode_normalization::UnicodeNormalization;
+
+use crate::corpus::{CorpusItem, CorpusItemId, NameSpan, Source, item_key};
+use crate::entity::{Entity, EntityOrigin, LanguageForms};
+use crate::form::is_slug;
+use crate::packet::EntityId;
 use crate::inventory::{
     Change, Family, InvId, Inventory, InventoryEntry, InventoryRevision, Slot, ValueKind,
 };
+use crate::ontology::{Condition, Layer, OntologyEntry};
 use crate::packet::{
     Constraints, Context, Discourse, EncoderId, Grade, Packet, PacketId, PacketKind, Predication,
     Provenance, ProvenanceSource, Referent, Relation, SCHEMA_VERSION, Stance, Trace,
 };
+use crate::speaker::Annotator;
 use crate::split::{fnv1a64, hex16};
 
 /// The meaning fields of a packet, as a model writes them.
@@ -221,19 +229,22 @@ impl EditDraft {
     }
 
     /// The revision after `base` this edit asks for, and the entries it adds.
-    /// `None` when the edit makes no change or more than [`MAX_EDIT_CHANGES`].
+    /// `None` when the edit makes no change or more than `max_changes`. The
+    /// loop's cycle passes [`MAX_EDIT_CHANGES`]; the CLI's `inventory admit`
+    /// passes its own larger cap for a draft reviewed whole in its cut.
     /// Every id is the store's: an added entry takes the next number of its
     /// family after the highest in `inventory`, retired entries included, in
     /// draft order. Nothing else is judged here: the gloss, the entry's shape,
     /// whether a retire target is live and a repeated id are
     /// `InventoryStore::admit_revision`'s to refuse.
-    pub(crate) fn into_revision(
+    pub fn into_revision(
         self,
         inventory: &Inventory,
         base: u32,
+        max_changes: usize,
     ) -> Option<(InventoryRevision, Vec<InventoryEntry>)> {
         let count = self.add.len() + self.retire.len();
-        if count == 0 || count > MAX_EDIT_CHANGES {
+        if count == 0 || count > max_changes {
             return None;
         }
         let n = base.checked_add(1)?;
@@ -271,6 +282,59 @@ impl EditDraft {
     }
 }
 
+/// One ontology entry as a model writes it: no language, number, inventory
+/// revision or annotator.
+#[derive(Clone, Debug, PartialEq, Serialize, Deserialize)]
+#[serde(deny_unknown_fields)]
+pub struct EntryOntologyDraft {
+    pub layer: Layer,
+    #[serde(default)]
+    pub when: Vec<Condition>,
+    pub choice: String,
+    #[serde(default)]
+    pub examples: Vec<String>,
+}
+
+/// A batch of ontology entries as a model drafts them: the xenos door of a
+/// seed answer.
+#[derive(Clone, Debug, PartialEq, Serialize, Deserialize)]
+#[serde(deny_unknown_fields)]
+pub struct OntologyDraft {
+    pub entries: Vec<EntryOntologyDraft>,
+}
+
+impl OntologyDraft {
+    pub fn parse(answer: &str) -> Result<Self, DraftError> {
+        from_json(answer)
+    }
+
+    /// The entries this draft becomes: numbered from `first_n` in draft order,
+    /// all of `language` read at `inventory_rev`, annotated `annotator`.
+    /// Whether they are admissible is `OntologyStore::admit`'s to refuse.
+    pub fn into_entries(
+        self,
+        language: &str,
+        inventory_rev: u32,
+        first_n: u32,
+        annotator: &Annotator,
+    ) -> Vec<OntologyEntry> {
+        self.entries
+            .into_iter()
+            .zip(first_n..)
+            .map(|(d, n)| OntologyEntry {
+                language: language.to_string(),
+                n,
+                inventory_rev,
+                layer: d.layer,
+                when: d.when,
+                choice: d.choice,
+                examples: d.examples,
+                annotator: annotator.clone(),
+            })
+            .collect()
+    }
+}
+
 /// A lowering as the lowerer writes it: the English text, nothing else.
 #[derive(Clone, Debug, PartialEq, Serialize, Deserialize)]
 #[serde(deny_unknown_fields)]
@@ -300,6 +364,196 @@ impl LoweringDraft {
     }
 }
 
+/// One cast member of a work: the entity and the forms the work spells it with,
+/// in the work's language, citation form first.
+#[derive(Clone, Debug, PartialEq, Eq, Deserialize)]
+#[serde(deny_unknown_fields)]
+pub struct CastDraft {
+    pub entity: EntityId,
+    pub forms: Vec<String>,
+}
+
+/// One line of a work: its scene group, the speaker its speech prefix names, text.
+#[derive(Clone, Debug, PartialEq, Eq, Deserialize)]
+#[serde(deny_unknown_fields)]
+pub struct LineDraft {
+    pub group: String,
+    pub speaker: EntityId,
+    pub text: String,
+}
+
+/// A transcription of a public-domain work in hand: provenance, cast forms,
+/// lines, scene groups and the speaker each speech prefix names. It holds no
+/// distributor header, licence or trademark text, and nothing reads a URL.
+#[derive(Clone, Debug, PartialEq, Eq, Deserialize)]
+#[serde(deny_unknown_fields)]
+pub struct WorkDraft {
+    pub slug: String,
+    pub language: String,
+    pub admitted_on: String,
+    pub source: Source,
+    pub cast: Vec<CastDraft>,
+    pub lines: Vec<LineDraft>,
+}
+
+/// One line of a name-span answer: the line number and the line copied with
+/// `[[entity:<slug>|<form>]]` around each place it names a cast member.
+#[derive(Clone, Debug, PartialEq, Eq, Deserialize)]
+#[serde(deny_unknown_fields)]
+pub struct MarkedLine {
+    pub line: u32,
+    pub marked: String,
+}
+
+impl MarkedLine {
+    pub fn parse(answer: &str) -> Result<Self, DraftError> {
+        from_json(answer)
+    }
+}
+
+/// Why an import was refused before any document was written. The text names
+/// the kind and the line number only, never a value.
+#[derive(Clone, Debug, PartialEq, Eq)]
+pub enum ImportRefusal {
+    NotPublicDomain,
+    CastRepeated,
+    NoSuchLine { line: u32 },
+    LineMarkedTwice { line: u32 },
+    Group { line: u32 },
+    SpeakerNotInCast { line: u32 },
+    Markup { line: u32 },
+    NotInCast { line: u32 },
+}
+
+impl fmt::Display for ImportRefusal {
+    fn fmt(&self, f: &mut fmt::Formatter<'_>) -> fmt::Result {
+        match self {
+            Self::NotPublicDomain => write!(f, "the work's source is not public domain"),
+            Self::CastRepeated => write!(f, "a cast entity is listed twice"),
+            Self::NoSuchLine { line } => write!(f, "the answer marks a line that is not there (line {line})"),
+            Self::LineMarkedTwice { line } => write!(f, "line {line} is marked twice"),
+            Self::Group { line } => write!(f, "the group of line {line} is not a slug"),
+            Self::SpeakerNotInCast { line } => write!(f, "the speaker of line {line} is not in the cast"),
+            Self::Markup { line } => write!(f, "the marked text of line {line} is not its text with markup"),
+            Self::NotInCast { line } => write!(f, "line {line} marks an entity outside the cast"),
+        }
+    }
+}
+
+impl std::error::Error for ImportRefusal {}
+
+impl WorkDraft {
+    pub fn parse(file: &str) -> Result<Self, DraftError> {
+        from_json(file)
+    }
+
+    /// The cast entities and the corpus items for the lines `marked` covers, in
+    /// line order, each item's spans read from its markup and labelled
+    /// `annotator`. Decides everything before any write; whether the documents
+    /// are admissible is `EntityStore::put` and `CorpusStore::add`'s to refuse.
+    pub fn into_import(
+        self,
+        marked: &[MarkedLine],
+        annotator: &Annotator,
+    ) -> Result<(Vec<Entity>, Vec<CorpusItem>), ImportRefusal> {
+        let Source::PublicDomain { work, .. } = &self.source else {
+            return Err(ImportRefusal::NotPublicDomain);
+        };
+        let mut entities = Vec::new();
+        for c in &self.cast {
+            if entities.iter().any(|e: &Entity| e.id == c.entity) {
+                return Err(ImportRefusal::CastRepeated);
+            }
+            entities.push(Entity {
+                id: c.entity.clone(),
+                forms: vec![LanguageForms {
+                    language: self.language.clone(),
+                    forms: c.forms.iter().map(|f| f.nfc().collect()).collect(),
+                    pronunciation: None,
+                }],
+                origin: EntityOrigin::PublicDomain { work: work.clone() },
+            });
+        }
+        let in_cast = |id: &EntityId| entities.iter().any(|e| &e.id == id);
+        let mut answer: Vec<&MarkedLine> = marked.iter().collect();
+        answer.sort_by_key(|m| m.line);
+        let mut items = Vec::new();
+        for (i, m) in answer.iter().enumerate() {
+            let line = m.line;
+            if line == 0 || line as usize > self.lines.len() {
+                return Err(ImportRefusal::NoSuchLine { line });
+            }
+            if i > 0 && answer[i - 1].line == line {
+                return Err(ImportRefusal::LineMarkedTwice { line });
+            }
+            let draft = &self.lines[line as usize - 1];
+            let group = format!("{}-{}", self.slug, draft.group);
+            if !is_slug(&group) {
+                return Err(ImportRefusal::Group { line });
+            }
+            if !in_cast(&draft.speaker) {
+                return Err(ImportRefusal::SpeakerNotInCast { line });
+            }
+            let text: String = draft.text.nfc().collect();
+            if text.contains("[[") || text.contains("]]") {
+                return Err(ImportRefusal::Markup { line });
+            }
+            let marked_nfc: String = m.marked.nfc().collect();
+            let (plain, names) = match unmark(&marked_nfc) {
+                Some((plain, names)) if plain == text => (plain, names),
+                _ => return Err(ImportRefusal::Markup { line }),
+            };
+            if names.iter().any(|n| !in_cast(&n.entity)) {
+                return Err(ImportRefusal::NotInCast { line });
+            }
+            items.push(CorpusItem {
+                id: item_key(&self.slug, line),
+                text: plain,
+                language: self.language.clone(),
+                speaker: draft.speaker.clone(),
+                group,
+                prior_turns: Vec::new(),
+                source: self.source.clone(),
+                admitted_on: self.admitted_on.clone(),
+                supersedes: None,
+                withdrawn: false,
+                names,
+                names_by: Some(annotator.clone()),
+            });
+        }
+        Ok((entities, items))
+    }
+}
+
+/// The text of `marked` with `[[entity|form]]` replaced by `form`, and the
+/// byte span of each form in that text. `None` for any malformed markup. The
+/// only search is for the markup delimiters.
+fn unmark(marked: &str) -> Option<(String, Vec<NameSpan>)> {
+    let mut out = String::with_capacity(marked.len());
+    let mut names = Vec::new();
+    let mut rest = marked;
+    while let Some(at) = rest.find("[[") {
+        out.push_str(&rest[..at]);
+        let inner = &rest[at + 2..];
+        let (id, after) = inner.split_once('|')?;
+        let (form, tail) = after.split_once("]]")?;
+        if form.is_empty() || form.contains("[[") || id.contains("]]") {
+            return None;
+        }
+        let entity = EntityId::parse(id).ok()?;
+        let start = u32::try_from(out.len()).ok()?;
+        out.push_str(form);
+        names.push(NameSpan {
+            entity,
+            start,
+            end: u32::try_from(out.len()).ok()?,
+        });
+        rest = tail;
+    }
+    out.push_str(rest);
+    Some((out, names))
+}
+
 /// `encoder:<hex16>`, a digest of the model id and the prompt digest.
 pub fn encoder_id(model: &str, prompt_digest: &str) -> EncoderId {
     let digest = fnv1a64(format!("weksa-encoder-v1:{model}:{prompt_digest}").as_bytes());
@@ -312,6 +566,9 @@ pub fn packet_id(item: &CorpusItemId, rev: u32, encoder: &EncoderId) -> PacketId
     PacketId::parse(&format!("packet:{}", hex16(digest))).expect("a packet id is well formed")
 }
 
+#[cfg(test)]
+mod mutants;
+
 #[cfg(test)]
 mod tests {
     use super::*;
@@ -416,6 +673,39 @@ mod tests {
         assert_eq!(PacketDraft::of(&made), draft);
     }
 
+    #[test]
+    fn coordinated_fillers_admit_as_one_group_referent() {
+        use crate::store::InventoryStore;
+        use crate::validate::{Refusal, validate};
+        // Item original-ja:19 as measure-ja-2 recorded it: two patients, one role twice.
+        const REFUSED: &str = r#"{"confidence":720,"context":{"setting":null,"medium":null,"participants":["n1"],"audience":["n1"]},"discourse":{"speech_act":"speech_act:3","addressee":null,"addressee_consent":null,"features":[]},"referents":[{"id":"n1","kind":"referent_kind:1","concept":"concept:28","entity":"entity:keeper","features":[]},{"id":"n2","kind":"referent_kind:1","concept":"concept:31","entity":null,"features":[]},{"id":"n3","kind":"referent_kind:5","concept":"concept:123","entity":null,"features":[]},{"id":"n4","kind":"referent_kind:5","concept":"concept:123","entity":null,"features":[]}],"predications":[{"id":"n5","concept":"concept:26","frame":"frame:4","roles":[{"role":"role:1","filler":"n1"},{"role":"role:2","filler":"n3"},{"role":"role:2","filler":"n4"}],"features":[{"feature":"feature:1","value":{"Option":"positive"}},{"feature":"feature:2","value":{"Option":"present"}},{"feature":"feature:3","value":{"Option":"habitual"}}]},{"id":"n6","concept":"concept:196","frame":"frame:4","roles":[{"role":"role:1","filler":"n1"},{"role":"role:2","filler":"n5"}],"features":[{"feature":"feature:1","value":{"Option":"positive"}},{"feature":"feature:2","value":{"Option":"future"}},{"feature":"feature:4","value":{"Option":"desired"}}]}],"relations":[{"relation":"relation:11","from":"n2","to":"n3","features":[]},{"relation":"relation:11","from":"n1","to":"n4","features":[]}],"stance":{"features":[{"feature":"feature:18","value":{"Grade":600}},{"feature":"feature:11","value":{"Grade":450}},{"feature":"feature:17","value":{"Grade":250}}]}}"#;
+        const PRESCRIBED: &str = r#"{"confidence":720,"context":{"setting":null,"medium":null,"participants":["n1"],"audience":["n1"]},"discourse":{"speech_act":"speech_act:3","addressee":null,"addressee_consent":null,"features":[]},"referents":[{"id":"n1","kind":"referent_kind:1","concept":"concept:28","entity":"entity:keeper","features":[]},{"id":"n2","kind":"referent_kind:1","concept":"concept:31","entity":null,"features":[]},{"id":"n3","kind":"referent_kind:5","concept":"concept:123","entity":null,"features":[]},{"id":"n4","kind":"referent_kind:5","concept":"concept:123","entity":null,"features":[]},{"id":"n7","kind":"referent_kind:2","concept":"concept:123","entity":null,"features":[]}],"predications":[{"id":"n5","concept":"concept:26","frame":"frame:4","roles":[{"role":"role:1","filler":"n1"},{"role":"role:2","filler":"n7"}],"features":[{"feature":"feature:1","value":{"Option":"positive"}},{"feature":"feature:2","value":{"Option":"present"}},{"feature":"feature:3","value":{"Option":"habitual"}}]},{"id":"n6","concept":"concept:196","frame":"frame:4","roles":[{"role":"role:1","filler":"n1"},{"role":"role:2","filler":"n5"}],"features":[{"feature":"feature:1","value":{"Option":"positive"}},{"feature":"feature:2","value":{"Option":"future"}},{"feature":"feature:4","value":{"Option":"desired"}}]}],"relations":[{"relation":"relation:11","from":"n2","to":"n3","features":[]},{"relation":"relation:11","from":"n1","to":"n4","features":[]},{"relation":"relation:3","from":"n3","to":"n7","features":[]},{"relation":"relation:3","from":"n4","to":"n7","features":[]}],"stance":{"features":[{"feature":"feature:18","value":{"Grade":600}},{"feature":"feature:11","value":{"Grade":450}},{"feature":"feature:17","value":{"Grade":250}}]}}"#;
+        let path = std::path::Path::new(env!("CARGO_MANIFEST_DIR"))
+            .join("../../data/original/inventory.cc");
+        let inventory = InventoryStore::open(&path).unwrap().inventory().unwrap();
+        let item = CorpusItemId::parse("item:original-ja:19").unwrap();
+        let encoder = encoder_id("m", "d");
+        let packet = |answer: &str| {
+            PacketDraft::parse(answer)
+                .unwrap()
+                .into_packet(&item, 6, &encoder)
+        };
+        assert_eq!(
+            validate(&packet(REFUSED), &inventory),
+            Err(vec![Refusal::V11DuplicateRole {
+                role: "role:2".parse().unwrap(),
+                predication: "n5".parse().unwrap(),
+            }])
+        );
+        assert_eq!(validate(&packet(PRESCRIBED), &inventory), Ok(()));
+        // The prompt names the shape the packet above admits, by gloss.
+        let gloss = |id: &str| inventory.entry(&id.parse().unwrap()).unwrap().gloss.clone();
+        assert_eq!(gloss("referent_kind:2"), "group");
+        assert_eq!(gloss("relation:3"), "member_of");
+        let prompt = crate::context::ENCODE_INSTRUCTIONS;
+        assert!(prompt.contains("member_of") && prompt.contains("group"));
+    }
+
     #[test]
     fn lowering_draft_parse() {
         let draft = LoweringDraft::parse("\n {\"text\":\"a\"} \n").unwrap();
@@ -528,7 +818,7 @@ mod tests {
                 InvId::parse("frame:2").unwrap(),
             ],
         };
-        let (rev, entries) = draft.clone().into_revision(&inv, 6).unwrap();
+        let (rev, entries) = draft.clone().into_revision(&inv, 6, MAX_EDIT_CHANGES).unwrap();
         let ids: Vec<String> = entries.iter().map(|e| e.id.to_string()).collect();
         // After the highest of the family, retired ones included, in draft order.
         assert_eq!(ids, ["concept:4", "role:1", "concept:5", "frame:3"]);
@@ -571,20 +861,25 @@ mod tests {
                 .collect(),
             retire: vec![],
         };
-        assert!(adds(0).into_revision(&inv, 1).is_none());
-        assert!(adds(1).into_revision(&inv, 1).is_some());
-        assert_eq!(adds(8).into_revision(&inv, 1).unwrap().1.len(), 8);
-        assert!(adds(9).into_revision(&inv, 1).is_none());
+        assert!(adds(0).into_revision(&inv, 1, MAX_EDIT_CHANGES).is_none());
+        assert!(adds(1).into_revision(&inv, 1, MAX_EDIT_CHANGES).is_some());
+        assert_eq!(adds(8).into_revision(&inv, 1, MAX_EDIT_CHANGES).unwrap().1.len(), 8);
+        assert!(adds(9).into_revision(&inv, 1, MAX_EDIT_CHANGES).is_none());
         // Adds and retires count together.
         let mixed = |a: usize, r: usize| EditDraft {
             add: (0..a).map(|_| add(Family::Concept, "g")).collect(),
             retire: vec![InvId::parse("concept:1").unwrap(); r],
         };
-        assert!(mixed(4, 4).into_revision(&inv, 1).is_some());
-        assert!(mixed(4, 5).into_revision(&inv, 1).is_none());
-        assert!(mixed(0, 9).into_revision(&inv, 1).is_none());
+        assert!(mixed(4, 4).into_revision(&inv, 1, MAX_EDIT_CHANGES).is_some());
+        assert!(mixed(4, 5).into_revision(&inv, 1, MAX_EDIT_CHANGES).is_none());
+        assert!(mixed(0, 9).into_revision(&inv, 1, MAX_EDIT_CHANGES).is_none());
         // A repeated retire is the door's to refuse, not this fn's.
-        assert!(mixed(0, 2).into_revision(&inv, 1).is_some());
+        assert!(mixed(0, 2).into_revision(&inv, 1, MAX_EDIT_CHANGES).is_some());
+        // The cap is the caller's.
+        let (_, entries) = adds(200).into_revision(&inv, 1, 256).unwrap();
+        assert_eq!(entries.first().unwrap().id.to_string(), "concept:2");
+        assert_eq!(entries.last().unwrap().id.to_string(), "concept:201");
+        assert!(adds(257).into_revision(&inv, 1, 256).is_none());
     }
 
     #[test]
@@ -626,4 +921,169 @@ mod tests {
         }
         assert!(EditDraft::parse("3").is_err() && EditDraft::parse("\"x\"").is_err());
     }
+
+    #[test]
+    fn ontology_draft_refuses_unknown_fields_and_numbers_from_first_n() {
+        for bad in [
+            r#"{"entries": [], "extra": 1}"#,
+            r#"{"entries": [{"layer": "Lexicon", "choice": "c", "language": "ja-JP"}]}"#,
+            "```json\n{\"entries\": []}\n```",
+            "[]",
+        ] {
+            assert!(OntologyDraft::parse(bad).is_err(), "{bad}");
+        }
+        let draft = OntologyDraft::parse(
+            r#"{"entries": [{"layer": "Grammar", "choice": "a"}, {"layer": "Lexicon", "choice": "b", "examples": ["x"]}]}"#,
+        )
+        .unwrap();
+        let by = Annotator::Operator;
+        let entries = draft.into_entries("ja-JP", 3, 5, &by);
+        assert_eq!(
+            entries.iter().map(|e| (e.language.as_str(), e.n, e.inventory_rev)).collect::<Vec<_>>(),
+            [("ja-JP", 5, 3), ("ja-JP", 6, 3)]
+        );
+        assert!(entries.iter().all(|e| e.annotator == by));
+        assert_eq!(entries[1].examples, ["x"]);
+    }
+
+    const WORK: &str = r#"{"slug":"lantern-wager","language":"en-US","admitted_on":"2026-11-13",
+        "source":{"PublicDomain":{"work":"The Lantern Wager","author":"A. Invented","edition_url":"https://example.invalid/lantern","licence":"public domain","jurisdiction":"US","translator":"none","edition_year":1890}},
+        "cast":[{"entity":"entity:orsa","forms":["Orsa"]},{"entity":"entity:tamsin","forms":["Tamsin","Tam"]},{"entity":"entity:wexmoor","forms":["Wexmoor"]}],
+        "lines":[{"group":"s1","speaker":"entity:orsa","text":"Tamsin, bring the lantern."},
+                 {"group":"s1","speaker":"entity:tamsin","text":"Orsa, I will not, said Tam."},
+                 {"group":"s2","speaker":"entity:wexmoor","text":"Quiet, both of you."}]}"#;
+
+    fn marked(line: u32, text: &str) -> MarkedLine {
+        MarkedLine { line, marked: text.into() }
+    }
+
+    fn model_annotator() -> Annotator {
+        Annotator::Model {
+            family: crate::corpus::ModelFamily::Anthropic,
+            generator: "g".into(),
+        }
+    }
+
+    fn import(
+        work: &str,
+        answer: &[MarkedLine],
+    ) -> Result<(Vec<Entity>, Vec<CorpusItem>), ImportRefusal> {
+        WorkDraft::parse(work).unwrap().into_import(answer, &model_annotator())
+    }
+
+    #[test]
+    fn a_work_imports_its_cast_and_marked_lines() {
+        let answer = [
+            marked(1, "[[entity:tamsin|Tamsin]], bring the lantern."),
+            marked(2, "[[entity:orsa|Orsa]], I will not, said [[entity:tamsin|Tam]]."),
+        ];
+        let (entities, items) = import(WORK, &answer).unwrap();
+        assert_eq!(entities.len(), 3);
+        for e in &entities {
+            assert!(matches!(&e.origin, EntityOrigin::PublicDomain { work } if work == "The Lantern Wager"));
+            assert_eq!(e.forms[0].language, "en-US");
+        }
+        assert_eq!(items.len(), 2);
+        assert_eq!(items[0].id, "item:lantern-wager:1");
+        assert_eq!(items[1].id, "item:lantern-wager:2");
+        assert_eq!(items[0].group, "lantern-wager-s1");
+        let span = |e: &str, text: &str, form: &str| {
+            let start = text.find(form).unwrap() as u32;
+            NameSpan { entity: EntityId::parse(e).unwrap(), start, end: start + form.len() as u32 }
+        };
+        let t2 = &items[1].text;
+        assert_eq!(items[0].names, [span("entity:tamsin", &items[0].text, "Tamsin")]);
+        assert_eq!(
+            items[1].names,
+            [span("entity:orsa", t2, "Orsa"), span("entity:tamsin", t2, "Tam")]
+        );
+        // "will" is unmarked and unspanned; the line's speaker is the file's.
+        assert_eq!(items[1].speaker, EntityId::parse("entity:tamsin").unwrap());
+        for i in &items {
+            assert_eq!(i.names_by, Some(model_annotator()));
+            assert!(i.prior_turns.is_empty() && i.supersedes.is_none() && !i.withdrawn);
+        }
+    }
+
+    #[test]
+    fn an_import_refuses_before_any_document() {
+        let ok = marked(1, "Tamsin, bring the lantern.");
+        let refused = |work: &str, answer: &[MarkedLine]| import(work, answer).unwrap_err();
+        let cast_authored = WORK.replace(
+            r#"{"PublicDomain":{"work":"The Lantern Wager","author":"A. Invented","edition_url":"https://example.invalid/lantern","licence":"public domain","jurisdiction":"US","translator":"none","edition_year":1890}}"#,
+            r#""OperatorWritten""#,
+        );
+        assert_eq!(refused(&cast_authored, std::slice::from_ref(&ok)), ImportRefusal::NotPublicDomain);
+        let repeated = WORK.replace(r#"{"entity":"entity:orsa","forms":["Orsa"]}"#, r#"{"entity":"entity:orsa","forms":["Orsa"]},{"entity":"entity:orsa","forms":["O"]}"#);
+        assert_eq!(refused(&repeated, std::slice::from_ref(&ok)), ImportRefusal::CastRepeated);
+        let stranger = WORK.replace(r#""speaker":"entity:orsa""#, r#""speaker":"entity:stranger""#);
+        assert_eq!(refused(&stranger, std::slice::from_ref(&ok)), ImportRefusal::SpeakerNotInCast { line: 1 });
+        assert_eq!(refused(WORK, &[marked(9, "x")]), ImportRefusal::NoSuchLine { line: 9 });
+        assert_eq!(refused(WORK, &[marked(0, "x")]), ImportRefusal::NoSuchLine { line: 0 });
+        assert_eq!(
+            refused(WORK, &[ok.clone(), ok.clone()]),
+            ImportRefusal::LineMarkedTwice { line: 1 }
+        );
+        for bad in [
+            "[[entity:tamsin|Tamsin, bring the lantern.",
+            "[[entity:tamsin Tamsin]], bring the lantern.",
+            "[[tamsin|Tamsin]], bring the lantern.",
+            "[[entity:tamsin|]]Tamsin, bring the lantern.",
+            "Tamsin, bring the lantern",
+        ] {
+            assert_eq!(refused(WORK, &[marked(1, bad)]), ImportRefusal::Markup { line: 1 }, "{bad}");
+        }
+        assert_eq!(
+            refused(WORK, &[marked(1, "[[entity:stranger|Tamsin]], bring the lantern.")]),
+            ImportRefusal::NotInCast { line: 1 }
+        );
+        let group = WORK.replace(r#""group":"s1""#, r#""group":"S 1""#);
+        assert_eq!(refused(&group, &[ok]), ImportRefusal::Group { line: 1 });
+        let bracketed = WORK.replace("Tamsin, bring the lantern.", "Tamsin [[bring]] the lantern.");
+        assert_eq!(
+            refused(&bracketed, &[marked(1, "[[entity:tamsin|Tamsin]] [[entity:orsa|bring]] the lantern.")]),
+            ImportRefusal::Markup { line: 1 }
+        );
+        // The refusal text names the kind and the line, no value.
+        assert_eq!(
+            ImportRefusal::Markup { line: 1 }.to_string(),
+            "the marked text of line 1 is not its text with markup"
+        );
+    }
+
+    #[test]
+    fn markup_offsets_are_bytes_of_the_nfc_text() {
+        let work = WORK
+            .replace("Tamsin, bring the lantern.", "Caf\u{e9} Zo\u{eb}")
+            .replace(r#""forms":["Orsa"]"#, r#""forms":["Zoe\u0308"]"#);
+        let decomposed = "Cafe\u{301} [[entity:orsa|Zoe\u{308}]]";
+        let (entities, items) = import(&work, &[marked(1, decomposed)]).unwrap();
+        assert_eq!(entities[0].forms[0].forms, ["Zo\u{eb}"]);
+        let item = &items[0];
+        assert_eq!(item.text, "Caf\u{e9} Zo\u{eb}");
+        let n = &item.names[0];
+        assert_eq!(&item.text[n.start as usize..n.end as usize], "Zo\u{eb}");
+        assert_eq!(n.start, 6);
+    }
+
+    #[test]
+    fn a_stray_close_bracket_and_a_scattered_duplicate_answer_are_refused() {
+        // A text holding only `]]` is not a marked line.
+        let close = WORK.replace("Quiet, both of you.", "Quiet ]] both of you.");
+        assert_eq!(
+            import(&close, &[marked(3, "Quiet ]] both of you.")]).unwrap_err(),
+            ImportRefusal::Markup { line: 3 }
+        );
+        // The answer's order does not matter, and a duplicate need not be adjacent.
+        let (_, items) = import(WORK, &[marked(3, "Quiet, both of you."), marked(1, "Tamsin, bring the lantern.")]).unwrap();
+        assert_eq!(items.iter().map(|i| i.id.as_str()).collect::<Vec<_>>(), ["item:lantern-wager:1", "item:lantern-wager:3"]);
+        assert_eq!(
+            import(
+                WORK,
+                &[marked(1, "Tamsin, bring the lantern."), marked(3, "Quiet, both of you."), marked(1, "Tamsin, bring the lantern.")]
+            )
+            .unwrap_err(),
+            ImportRefusal::LineMarkedTwice { line: 1 }
+        );
+    }
 }
diff --git a/crates/weksa/src/encode/mutants.rs b/crates/weksa/src/encode/mutants.rs
new file mode 100644
index 0000000..344c2a9
--- /dev/null
+++ b/crates/weksa/src/encode/mutants.rs
@@ -0,0 +1,13 @@
+//! Pins for `unmark` that the import door only reaches through a whole work.
+
+use super::*;
+
+/// A form that opens another markup is malformed, though its entity id is
+/// sound: the model wrote a nested or unclosed mark, not a name.
+#[test]
+fn a_form_that_opens_a_mark_is_malformed() {
+    assert_eq!(unmark("[[entity:orsa|Or[[sa]] came"), None);
+    // The same line without the nested opener unmarks.
+    let (plain, names) = unmark("[[entity:orsa|Orsa]] came").unwrap();
+    assert_eq!((plain.as_str(), names.len()), ("Orsa came", 1));
+}
diff --git a/crates/weksa/src/form.rs b/crates/weksa/src/form.rs
index 3626fd1..9b1e254 100644
--- a/crates/weksa/src/form.rs
+++ b/crates/weksa/src/form.rs
@@ -91,20 +91,73 @@ pub fn is_calendar_date(s: &str) -> bool {
     (1..=days).contains(&day)
 }
 
-/// A BCP 47-form language tag: 1 to 35 bytes of ASCII alphanumerics in
-/// hyphen-separated subtags of 1 to 8 bytes; the first is 2 to 8 letters, or the
-/// single letter `x` of a private-use tag. Form only: no registry is consulted.
+/// A BCP 47 language tag in its canonical case (RFC 5646 section 2.1.1): 1 to 35
+/// bytes of ASCII alphanumerics in hyphen-separated subtags of 1 to 8 bytes; the
+/// first is 2 to 8 letters, or the single letter `x` of a private-use tag. The
+/// language subtag is lowercase, a four-letter script subtag is Titlecase, a
+/// two-letter region subtag is UPPERCASE, and every other subtag, and every
+/// subtag after a singleton such as `x`, is lowercase. Form only: no registry is
+/// consulted. Selection and comparison are by exact tag, so a case variant would
+/// be a different, dead language; this is the one tag check of corpus items,
+/// entities, ontology entries and the run panel.
 pub(crate) fn is_language_tag(s: &str) -> bool {
     if s.len() > 35 {
         return false;
     }
     let mut subtags = s.split('-');
     let first = subtags.next().unwrap_or("");
-    let first_ok = first.bytes().all(|b| b.is_ascii_alphabetic())
+    let first_ok = first.bytes().all(|b| b.is_ascii_lowercase())
         && ((2..=8).contains(&first.len()) || first == "x");
-    first_ok
-        && subtags
-            .all(|t| (1..=8).contains(&t.len()) && t.bytes().all(|b| b.is_ascii_alphanumeric()))
+    if !first_ok {
+        return false;
+    }
+    // `private`: inside the `x` private-use section (subtags 1 to 8, lowercase).
+    // `ext`: inside any singleton section, where a one-byte subtag starts the next.
+    // `pending`: the last subtag was a singleton and nothing has followed it yet.
+    let mut private = first == "x";
+    let mut ext = private;
+    let mut pending = private;
+    for t in subtags {
+        if !(1..=8).contains(&t.len()) || !t.bytes().all(|b| b.is_ascii_alphanumeric()) {
+            return false;
+        }
+        let lower = t.bytes().all(|b| !b.is_ascii_uppercase());
+        if private {
+            if !lower {
+                return false;
+            }
+            pending = false;
+        } else if t.len() == 1 {
+            // A singleton: lowercase, and not directly after another singleton.
+            if !lower || pending {
+                return false;
+            }
+            ext = true;
+            pending = true;
+            private = t == "x";
+        } else if ext {
+            // Extension subtags are 2 to 8 lowercase.
+            if !lower {
+                return false;
+            }
+            pending = false;
+        } else {
+            let alpha = t.bytes().all(|b| b.is_ascii_alphabetic());
+            let canonical = if t.len() == 2 {
+                // A region: two letters. Two digits are not a subtag at all.
+                alpha && t.bytes().all(|b| b.is_ascii_uppercase())
+            } else if alpha && t.len() == 4 {
+                t.as_bytes()[0].is_ascii_uppercase()
+                    && t.bytes().skip(1).all(|b| b.is_ascii_lowercase())
+            } else {
+                lower
+            };
+            if !canonical {
+                return false;
+            }
+        }
+    }
+    !pending
 }
 
 /// A slug: `[a-z0-9]` and inner `-`, 1 to 48 bytes, no edge `-`.
@@ -214,6 +267,25 @@ mod tests {
         assert!(!is_format('\u{200c}') && !is_format('\u{200d}'));
     }
 
+    #[test]
+    fn a_language_tag_is_in_canonical_case() {
+        for good in [
+            "en", "en-US", "ja-JP", "zh-Hant-TW", "sr-Latn", "es-419", "de-1996", "en-CA-x-ca",
+            "x-private", "x-ab", "x-a", "x-a-b", "en-x-a-b", "en-u-nu-x-a-b", "en-u-nu-latn", "ja-JP-x-a1",
+        ] {
+            assert!(is_language_tag(good), "{good}");
+        }
+        for bad in [
+            "", "e", "EN", "En", "en-us", "en-Us", "en-uS", "ja-jp", "JA-JP", "zh-hant-TW",
+            "zh-HANT-TW", "zh-hAnt-TW", "zh-Hant-tw", "en-CA-x-CA", "en-CA-x-Ca", "de-1996-X",
+            "es-419-LATN", "en--US", "en-", "-en", "en_US", "abcdefghi", "en-abcdefghi",
+            "xx-\u{e9}", "x", "en-x", "en-u", "en-US-x", "en-0", "en-12", "en-u-x", "en-u-0",
+            "x-AB", "x-Ab", "en-x-AB", "en-a-b-ccc", "en-u-NU", "en-U-nu", "en-a-b",
+        ] {
+            assert!(!is_language_tag(bad), "{bad}");
+        }
+    }
+
     #[test]
     fn an_attestation_is_bounded_readable_text() {
         assert!(is_attestation("a"));
diff --git a/crates/weksa/src/inventory.rs b/crates/weksa/src/inventory.rs
index ec59b13..4820ea5 100644
--- a/crates/weksa/src/inventory.rs
+++ b/crates/weksa/src/inventory.rs
@@ -541,7 +541,7 @@ pub fn proof_revision() -> (InventoryRevision, Vec<InventoryEntry>) {
     )
 }
 
-/// Revision 3: the speaker-state vocabulary. First the Scene features, the
+/// Revision `n`: the speaker-state vocabulary. First the Scene features, the
 /// speaker's relation to one party of a scene (slot `Scene`): `relative_status`
 /// is the speaker's standing against the addressee's, not a register word, what
 /// it selects is each language's ontology's business. Then the Speaker features
@@ -551,7 +551,7 @@ pub fn proof_revision() -> (InventoryRevision, Vec<InventoryEntry>) {
 /// arrive as community ids with cut `language-ontology`. Hand-seeded like
 /// [`proof_revision`] until the loop's minting round owns the vocabulary; the
 /// features take the ids after the seed's.
-pub fn speaker_scene_revision() -> (InventoryRevision, Vec<InventoryEntry>) {
+pub fn speaker_scene_revision(n: u32) -> (InventoryRevision, Vec<InventoryEntry>) {
     let taken = seed()
         .1
         .iter()
@@ -593,15 +593,15 @@ pub fn speaker_scene_revision() -> (InventoryRevision, Vec<InventoryEntry>) {
             gloss: gloss.to_string(),
             value_kind: Some(kind),
             applies_to: vec![slot],
-            introduced_rev: 3,
+            introduced_rev: n,
             retired_rev: None,
         });
     }
     let changes = entries.iter().map(|e| Change::Add(e.id)).collect();
     (
         InventoryRevision {
-            n: 3,
-            parent: Some(2),
+            n,
+            parent: Some(n - 1),
             changes,
             frozen: false,
         },
diff --git a/crates/weksa/src/lib.rs b/crates/weksa/src/lib.rs
index efea9ef..2510fae 100644
--- a/crates/weksa/src/lib.rs
+++ b/crates/weksa/src/lib.rs
@@ -12,6 +12,7 @@ pub mod form;
 pub mod inventory;
 pub mod lower;
 pub mod model;
+pub mod ontology;
 pub mod packet;
 pub mod phones;
 pub mod run;
@@ -32,6 +33,7 @@ pub use inventory::{
 };
 pub use lower::{EntityForms, LowerError, PhoneLine, TARGET_LANGUAGE, lower, phones, pronounce};
 pub use model::{AnswerFiles, ModelPort};
+pub use ontology::{Condition, Layer, Ontology, OntologyEntry, Test, select};
 pub use packet::{
     EncoderId, EntityId, Grade, NodeId, Packet, PacketId, PacketKind, SCHEMA_VERSION, Stance,
 };
@@ -41,7 +43,7 @@ pub use score::{Embedder, ItemScore, OllamaEmbedder, Scorer, chrf};
 pub use speaker::{Annotator, PairRelation, Party, Scene, Speaker};
 pub use split::{Split, SplitScheme};
 pub use store::{
-    AddOutcome, CorpusStore, EntityBound, EntityStore, InventoryStore, PacketStore,
+    AddOutcome, CorpusStore, EntityBound, EntityStore, InventoryStore, OntologyStore, PacketStore,
     SpeakerStateStore, StoreError, StoreRefusal,
 };
 pub use validate::{LoweringInput, Refusal, SceneRead, validate};
diff --git a/crates/weksa/src/lower.rs b/crates/weksa/src/lower.rs
index 76f3158..12fbb61 100644
--- a/crates/weksa/src/lower.rs
+++ b/crates/weksa/src/lower.rs
@@ -182,6 +182,11 @@ pub enum LowerError {
     AskerNotAddressee { predication: NodeId },
     /// The entity port failed to read.
     EntityRead { entity: EntityId, why: String },
+    /// A lowering prompt was asked of a view whose scene was never read.
+    SceneUnread,
+    /// A referent cites the entity whose id is the lowering prompt's speaker
+    /// token ([`crate::context::SPEAKER_TOKEN`]), which would read as the speaker.
+    SpeakerTokenTaken,
 }
 
 impl fmt::Display for LowerError {
@@ -203,6 +208,8 @@ impl fmt::Display for LowerError {
             LowerError::ConsentMissing { .. } => "request lacks the addressee's consent",
             LowerError::AskerNotAddressee { .. } => "request agent is not the addressee",
             LowerError::EntityRead { .. } => "entity port failed to read",
+            LowerError::SceneUnread => "the view's scene was never read",
+            LowerError::SpeakerTokenTaken => "a referent cites the entity id the speaker token uses",
         })
     }
 }
diff --git a/crates/weksa/src/main.rs b/crates/weksa/src/main.rs
index 8270565..21693d5 100644
--- a/crates/weksa/src/main.rs
+++ b/crates/weksa/src/main.rs
@@ -1,24 +1,26 @@
 //! The `weksa` command line: the same validator and store admission the library
 //! exposes, plus text projections (`dump`) that are for review and are not stores.
 
-use std::path::PathBuf;
+use std::path::{Path, PathBuf};
 
 use anyhow::{Context, Result, bail};
 use clap::error::{ContextKind, ContextValue, ErrorKind};
 use clap::{Args, Parser, Subcommand, ValueEnum};
 use unicode_normalization::UnicodeNormalization;
 use weksa::corpus::{CorpusItem, ModelFamily, NameSpan, Source, Turn};
+use weksa::encode::{EditDraft, MarkedLine, OntologyDraft, WorkDraft};
 use weksa::entity::{Entity, EntityOrigin, LanguageForms, Pronunciation};
-use weksa::inventory::{proof_revision, seed};
+use weksa::inventory::{proof_revision, seed, speaker_scene_revision};
+use weksa::packet::{FeatValue, FeatureValue, Grade};
 use weksa::packet::proof_packet;
-use weksa::model::RecordedAnswers;
+use weksa::model::{ModelPort, RecordedAnswers};
 use weksa::run::{
-    AblationOutcome, CycleOutcome, LowererReach, RecallOutcome, RoundOutcome, RunPaths, RunStores, cycle, round,
+    AblationOutcome, CalibrateOutcome, CycleOutcome, FLOOR_ARMS_MIN, LowererReach, OntologyMintOutcome, RecallOutcome, RelowerOutcome, RoundOutcome, RunPaths, RunStores, cycle, round,
 };
 use weksa::score::ScoreInput;
 use weksa::{
-    AnswerFiles, CorpusStore, EntityId, EntityStore, InventoryStore, OllamaEmbedder, PacketStore,
-    Scorer, Split, SplitScheme, StoreError, lower, pronounce, validate,
+    Annotator, CorpusStore, EntityId, EntityStore, Family, InventoryStore, OllamaEmbedder, OntologyStore, OptionLabel,
+    PacketStore, PairRelation, Party, Scene, Slot, SpeakerStateStore, ValueKind, Scorer, Split, SplitScheme, StoreError, StoreRefusal, lower, pronounce, validate,
 };
 
 #[derive(Parser)]
@@ -36,6 +38,12 @@ struct Cli {
     /// The entity store.
     #[arg(long, global = true, default_value = "data/entity/entity.cc")]
     entities: PathBuf,
+    /// The language ontology store.
+    #[arg(long, global = true, default_value = "data/ontology/ontology.cc")]
+    ontology: PathBuf,
+    /// The speaker-state store (scenes).
+    #[arg(long, global = true, default_value = "data/corpus/speaker-state.cc")]
+    speaker_state: PathBuf,
     #[command(subcommand)]
     command: Command,
 }
@@ -51,6 +59,10 @@ enum Command {
     #[command(subcommand)]
     Entity(EntityCommand),
     #[command(subcommand)]
+    Ontology(OntologyCommand),
+    #[command(subcommand)]
+    Scene(SceneCommand),
+    #[command(subcommand)]
     Packet(PacketCommand),
     /// Lower a stored packet to English text.
     Lower {
@@ -81,7 +93,7 @@ enum Command {
 
 #[derive(Subcommand)]
 enum LoopCommand {
-    /// Pin the global --corpus, --inventory and --entities as a run at ROOT.
+    /// Pin the global --corpus, --inventory, --entities, --ontology and --speaker-state as a run at ROOT.
     Open {
         root: PathBuf,
         #[arg(long)]
@@ -105,8 +117,8 @@ enum LoopCommand {
         panel: Vec<String>,
     },
     /// Run one round of the run at ROOT. The stores are read only from the
-    /// run's record: the global --corpus, --inventory and --entities are not
-    /// read. Encode prompts are written first; once they are answered a rerun
+    /// run's record: the global --corpus, --inventory, --entities and --ontology
+    /// are not read. Encode prompts are written first; once they are answered a rerun
     /// writes the lowering prompts. The command exits 3 each time until every
     /// prompt has an answer.
     Round {
@@ -119,6 +131,15 @@ enum LoopCommand {
     /// half). Prompts and answers live in `<ROOT>/recall`; the command exits 3
     /// until every prompt has an answer. A diagnostic, never a gate.
     Recall { root: PathBuf },
+    /// Draft ontology entries from the run's Train items of one language.
+    /// Prompts and answers live in `<ROOT>/ontology-mint`; the command exits 3
+    /// until the prompt has an answer. Admission is `weksa ontology admit`
+    /// into a copy, never into the run's pinned file.
+    MintOntology {
+        root: PathBuf,
+        #[arg(long)]
+        language: String,
+    },
     /// Ask whether the lowerer uses a packet's stance: for each live Train and
     /// Validation packet of round ROUND, ask again with the stance as it is,
     /// emptied, and swapped for the next item's, and read how far the lowering
@@ -132,10 +153,58 @@ enum LoopCommand {
         #[arg(long, default_value = "http://127.0.0.1:11434")]
         ollama_url: String,
     },
+    /// Re-lower round ROUND's Validation packets through arm ARM, score them
+    /// against the items, and, with --floor ARM given two or more times (prompted
+    /// repeats of the lowering), decide against the paired noise floor of those
+    /// repeats by the panel accept rule. Prompts and answers live in
+    /// `<ROOT>/relower-<ROUND>-<ARM>`; the command exits 3 until the arm is
+    /// answered. --lowerer names the arm's model in the printed line. A
+    /// diagnostic, never a gate; records nothing; Test and Train are never
+    /// touched. Labels match [a-z0-9-]{1,32} and differ.
+    Relower {
+        root: PathBuf,
+        #[arg(long)]
+        round: u32,
+        #[arg(long)]
+        arm: String,
+        #[arg(long)]
+        lowerer: String,
+        #[arg(long)]
+        floor: Vec<String>,
+        #[arg(long, default_value = "http://127.0.0.1:11434")]
+        ollama_url: String,
+    },
+    /// Replay the accept rule over answered relower draws of round ROUND, to
+    /// measure how often it accepts, rejects or regresses what it should. Reads
+    /// the recorded lowering and each draw (--prompted: repeats of it, at least
+    /// four; --degraded: arms that should regress; --candidate: arms to rate),
+    /// answered through `weksa loop relower ROOT --round N --arm LABEL`, and
+    /// prints counts over all Validation items and over each --class
+    /// NAME=PREFIX[,PREFIX...] (items whose key starts with a prefix). Writes
+    /// no prompts; exits 1 naming the draws still unanswered. Procedure:
+    /// docs/calibration.md. A diagnostic, never a gate; records nothing; Test
+    /// and Train are never touched. Labels match [a-z0-9-]{1,32} and differ.
+    Calibrate {
+        root: PathBuf,
+        #[arg(long)]
+        round: u32,
+        #[arg(long)]
+        prompted: Vec<String>,
+        #[arg(long)]
+        degraded: Vec<String>,
+        #[arg(long)]
+        candidate: Vec<String>,
+        #[arg(long)]
+        class: Vec<String>,
+        #[arg(long, default_value = "http://127.0.0.1:11434")]
+        ollama_url: String,
+    },
     /// Run one edit-accept cycle of the run at ROOT. The stores are read only
     /// from the run's record. The editor's prompt, then the candidate round's
     /// encode prompts, then its lowering prompts are written in turn; the
-    /// command exits 3 each time until every prompt has an answer.
+    /// command exits 3 each time until every prompt has an answer. The noise
+    /// floor needs four recorded rounds under the first inventory (the recorded
+    /// round and three prompted repeats).
     Cycle {
         root: PathBuf,
         #[arg(long, default_value = "http://127.0.0.1:11434")]
@@ -173,6 +242,22 @@ enum CorpusCommand {
     Withdraw {
         key: String,
     },
+    /// Import a transcribed public-domain work: mint its cast as entities and
+    /// add each line a name-span answer covers (`docs/name-span-annotation.md`).
+    Import {
+        /// The work file: provenance, cast, lines.
+        work: PathBuf,
+        /// The annotator's answer: one `{"line": N, "marked": "..."}` per line.
+        names: PathBuf,
+        #[arg(long, requires = "generator", conflicts_with = "operator")]
+        model_family: Option<ModelFamilyArg>,
+        /// The attestation string naming the annotating model.
+        #[arg(long, requires = "model_family")]
+        generator: Option<String>,
+        /// Annotated by the operator, not a model.
+        #[arg(long)]
+        operator: bool,
+    },
 }
 
 #[derive(Subcommand)]
@@ -185,6 +270,45 @@ enum InventoryCommand {
     Proof,
     /// Admit revision 3 of the Dao De Jing test bed stores (after seed and proof).
     Dao,
+    /// Admit the speaker-state revision (Scene and Speaker features) as the
+    /// inventory's latest plus one.
+    SpeakerScene,
+    /// Admit a model's inventory draft (a JSON file, {add, retire} as the
+    /// loop's editor writes it) as the inventory's latest plus one.
+    Admit { answer: PathBuf },
+}
+
+/// The most changes `inventory admit` takes in one draft. A hand-admitted draft
+/// is reviewed whole in its cut, so the cap is not the loop editor's.
+const MAX_ADMIT_CHANGES: usize = 256;
+
+#[derive(Subcommand)]
+enum SceneCommand {
+    /// Append a scene revision for one corpus group: its one live speaker's
+    /// relation to the addressee, as Scene-slot feature values.
+    Put {
+        #[arg(long)]
+        group: String,
+        /// `entity:<slug>` of a named addressee, or `unnamed`.
+        #[arg(long)]
+        to: String,
+        /// The inventory revision the glosses resolve at.
+        #[arg(long)]
+        inventory_rev: u32,
+        /// `gloss=value`, repeated: a grade 0-1000, an option label or true/false.
+        #[arg(long = "set", value_name = "GLOSS=VALUE")]
+        set: Vec<String>,
+        #[arg(long, requires = "generator", conflicts_with = "operator")]
+        model_family: Option<ModelFamilyArg>,
+        /// The attestation string naming the annotating model.
+        #[arg(long, requires = "model_family")]
+        generator: Option<String>,
+        /// Annotated by the operator, not a model.
+        #[arg(long)]
+        operator: bool,
+    },
+    /// Text projection of the scenes for review; not a store.
+    Dump,
 }
 
 #[derive(Subcommand)]
@@ -195,6 +319,28 @@ enum EntityCommand {
     Dump,
 }
 
+#[derive(Subcommand)]
+enum OntologyCommand {
+    /// Admit a model's ontology draft (a JSON file) for one language as a
+    /// batch, numbered from the language's latest plus one and annotated as
+    /// the model that drafted it.
+    Admit {
+        answer: PathBuf,
+        #[arg(long)]
+        language: String,
+        /// The inventory revision the draft's conditions are read at.
+        #[arg(long)]
+        inventory_rev: u32,
+        #[arg(long)]
+        model_family: ModelFamilyArg,
+        /// The attestation string naming the drafting model.
+        #[arg(long)]
+        generator: String,
+    },
+    /// Text projection of the ontology for review; not a store.
+    Dump,
+}
+
 #[derive(Args)]
 struct PutArgs {
     /// `entity:<slug>`.
@@ -551,10 +697,17 @@ impl AddArgs {
             supersedes: self.supersedes,
             withdrawn: false,
             names,
+            names_by: None,
         })
     }
 }
 
+/// A draw or arm label: [a-z0-9-]{1,32}.
+fn is_label(l: &str) -> bool {
+    (1..=32).contains(&l.len())
+        && l.bytes().all(|b| b.is_ascii_lowercase() || b.is_ascii_digit() || b == b'-')
+}
+
 /// The split of an item as `Train`, `Validation`, `Test` or `excluded`.
 fn split_text(item: &CorpusItem) -> String {
     SplitScheme::V1
@@ -562,6 +715,22 @@ fn split_text(item: &CorpusItem) -> String {
         .map_or_else(|| "excluded".to_string(), |s| format!("{s:?}"))
 }
 
+/// The annotator the flags name: a model family with its generator, or the operator.
+fn annotator(
+    model_family: Option<ModelFamilyArg>,
+    generator: Option<String>,
+    operator: bool,
+) -> Result<Annotator> {
+    match (model_family, generator, operator) {
+        (Some(family), Some(generator), false) => Ok(Annotator::Model {
+            family: family.into(),
+            generator,
+        }),
+        (None, None, true) => Ok(Annotator::Operator),
+        _ => bail!("name the annotator: --model-family with --generator, or --operator"),
+    }
+}
+
 fn refused(e: StoreError) -> anyhow::Error {
     anyhow::anyhow!("{e}")
 }
@@ -601,13 +770,78 @@ fn main() -> Result<()> {
                 .map_err(refused)?;
             println!("{outcome:?} {key}");
         }
+        Command::Corpus(CorpusCommand::Import {
+            work,
+            names,
+            model_family,
+            generator,
+            operator,
+        }) => {
+            let annotator = annotator(model_family, generator, operator)?;
+            let draft = WorkDraft::parse(&std::fs::read_to_string(&work)?)?;
+            let mut marked = Vec::new();
+            for (i, line) in std::fs::read_to_string(&names)?.lines().enumerate() {
+                if line.trim().is_empty() {
+                    continue;
+                }
+                marked.push(
+                    MarkedLine::parse(line)
+                        .map_err(|e| anyhow::anyhow!("names line {}: {e}", i + 1))?,
+                );
+            }
+            let (new_entities, items) = draft.into_import(&marked, &annotator)?;
+            // Every document passes the real doors on scratch copies of the
+            // stores before the first write, so a refusal leaves them untouched.
+            let scratch = std::env::temp_dir().join(format!("weksa-import-{}", std::process::id()));
+            std::fs::create_dir_all(&scratch)?;
+            let dry = (|| -> Result<()> {
+                let copy = |from: &Path, name: &str| -> Result<PathBuf> {
+                    let to = scratch.join(name);
+                    if from.exists() {
+                        std::fs::copy(from, &to)?;
+                    }
+                    Ok(to)
+                };
+                let mut entities = EntityStore::open(&copy(&cli.entities, "e.cc")?)?;
+                let mut store = CorpusStore::open(&copy(&cli.corpus, "c.cc")?)?;
+                for e in new_entities.clone() {
+                    entities
+                        .put(e)
+                        .map_err(|e| anyhow::anyhow!("a cast entity: {e}"))?;
+                }
+                for item in items.clone() {
+                    let key = item.id.clone();
+                    store.add(item, &entities).map_err(|e| match e {
+                        StoreError::Refused(StoreRefusal::S6TextHeld { held_by, .. }) => {
+                            anyhow::anyhow!("{key} repeats the text of {held_by}")
+                        }
+                        e => anyhow::anyhow!("{key}: {e}"),
+                    })?;
+                }
+                Ok(())
+            })();
+            let _ = std::fs::remove_dir_all(&scratch);
+            dry?;
+            let mut entities = EntityStore::open(&cli.entities)?;
+            for e in new_entities {
+                let id = e.id.clone();
+                let outcome = entities.put(e).map_err(refused)?;
+                println!("{outcome:?} {id}");
+            }
+            let mut store = CorpusStore::open(&cli.corpus)?;
+            for item in items {
+                let (key, split) = (item.id.clone(), split_text(&item));
+                let outcome = store.add(item, &entities).map_err(refused)?;
+                println!("{outcome:?} {key} {split}");
+            }
+        }
         Command::Corpus(CorpusCommand::Dump) => {
             for i in CorpusStore::open(&cli.corpus)?.all()? {
                 let split = split_text(&i);
                 let withdrawn = if i.withdrawn { " withdrawn" } else { "" };
                 println!(
-                    "{} [{} {} group={} {split}{withdrawn}]\n  {:?}\n  names: {:?}\n  source: {:?}",
-                    i.id, i.language, i.speaker, i.group, i.text, i.names, i.source
+                    "{} [{} {} group={} {split}{withdrawn}]\n  {:?}\n  names: {:?} by {:?}\n  source: {:?}",
+                    i.id, i.language, i.speaker, i.group, i.text, i.names, i.names_by, i.source
                 );
             }
         }
@@ -648,6 +882,48 @@ fn main() -> Result<()> {
                 println!("{} {:?}\n  forms: {:?}", e.id, e.origin, e.forms);
             }
         }
+        Command::Ontology(OntologyCommand::Admit {
+            answer,
+            language,
+            inventory_rev,
+            model_family,
+            generator,
+        }) => {
+            let text = std::fs::read_to_string(&answer).context("the draft would not read")?;
+            let draft = OntologyDraft::parse(&text)?;
+            let mut store = OntologyStore::open(&cli.ontology)?;
+            let first = store
+                .all()?
+                .iter()
+                .filter(|e| e.language == language)
+                .map(|e| e.n)
+                .max()
+                .unwrap_or(0)
+                + 1;
+            let annotator = Annotator::Model {
+                family: model_family.into(),
+                generator,
+            };
+            let entries = draft.into_entries(&language, inventory_rev, first, &annotator);
+            let count = entries.len();
+            let inventory = InventoryStore::open(&cli.inventory)?;
+            let outcome = store.admit(entries, &inventory).map_err(refused)?;
+            println!("{outcome:?} {count} entries of {language}");
+        }
+        Command::Ontology(OntologyCommand::Dump) => {
+            for e in OntologyStore::open(&cli.ontology)?.all()? {
+                println!(
+                    "{} {} rev:{} {:?}\n  when: {:?}\n  {}\n  e.g. {:?}",
+                    e.key(),
+                    e.layer.name(),
+                    e.inventory_rev,
+                    e.annotator,
+                    e.when,
+                    e.choice,
+                    e.examples
+                );
+            }
+        }
         Command::Inventory(InventoryCommand::Seed) => {
             let (rev, entries) = seed();
             let count = entries.len();
@@ -664,6 +940,152 @@ fn main() -> Result<()> {
                 .map_err(refused)?;
             println!("admitted rev:2 with {count} entries");
         }
+        Command::Inventory(InventoryCommand::SpeakerScene) => {
+            let store = InventoryStore::open(&cli.inventory)?;
+            let latest = store
+                .inventory()?
+                .latest()
+                .map(|r| r.n)
+                .context("the inventory holds no revision")?;
+            let (rev, entries) = speaker_scene_revision(latest + 1);
+            let (n, count) = (rev.n, entries.len());
+            let mut store = store;
+            store.admit_revision(rev, entries).map_err(refused)?;
+            println!("admitted rev:{n} with {count} entries");
+        }
+        Command::Inventory(InventoryCommand::Admit { answer }) => {
+            let text = std::fs::read_to_string(&answer).context("the draft would not read")?;
+            let draft = EditDraft::parse(&text)?;
+            let mut store = InventoryStore::open(&cli.inventory)?;
+            let inventory = store.inventory()?;
+            let latest = inventory
+                .latest()
+                .map(|r| r.n)
+                .context("the inventory holds no revision")?;
+            let (rev, entries) = draft
+                .into_revision(&inventory, latest, MAX_ADMIT_CHANGES)
+                .context("the draft makes no change or more than the cap")?;
+            let (n, count) = (rev.n, entries.len());
+            store.admit_revision(rev, entries).map_err(refused)?;
+            println!("admitted rev:{n} with {count} entries");
+        }
+        Command::Scene(SceneCommand::Put {
+            group,
+            to,
+            inventory_rev,
+            set,
+            model_family,
+            generator,
+            operator,
+        }) => {
+            let annotator = annotator(model_family, generator, operator)?;
+            let inventory_store = InventoryStore::open(&cli.inventory)?;
+            let inventory = inventory_store.inventory()?;
+            let corpus = CorpusStore::open(&cli.corpus)?;
+            let live: Vec<CorpusItem> = corpus
+                .all()?
+                .into_iter()
+                .filter(|i| i.group == group && !i.withdrawn)
+                .collect();
+            let mut speakers: Vec<EntityId> = live.iter().map(|i| i.speaker.clone()).collect();
+            speakers.sort();
+            speakers.dedup();
+            let [from] = speakers.as_slice() else {
+                bail!("a scene group holds one live speaker; multi-party scenes wait");
+            };
+            let to = match to.as_str() {
+                "unnamed" => Party::Unnamed,
+                named => Party::Named(
+                    EntityId::parse(named).map_err(|_| anyhow::anyhow!("the addressee is unnamed or an entity id"))?,
+                ),
+            };
+            let mut features = Vec::new();
+            for pair in &set {
+                let bad = || anyhow::anyhow!("a --set is gloss=value of a live Scene feature");
+                let (gloss, value) = pair.split_once('=').ok_or_else(bad)?;
+                let entry = inventory
+                    .entries()
+                    .find(|e| {
+                        e.family() == Family::Feature
+                            && e.gloss == gloss
+                            && e.live_at(inventory_rev)
+                            && e.applies_to.contains(&Slot::Scene)
+                    })
+                    .ok_or_else(bad)?;
+                let value = match entry.value_kind.as_ref().ok_or_else(bad)? {
+                    ValueKind::Grade => FeatValue::Grade(
+                        Grade::new(value.parse().map_err(|_| bad())?).map_err(|_| bad())?,
+                    ),
+                    ValueKind::Options(_) => {
+                        FeatValue::Option(OptionLabel::parse(value).map_err(|_| bad())?)
+                    }
+                    ValueKind::Flag => FeatValue::Flag(value.parse().map_err(|_| bad())?),
+                };
+                features.push(FeatureValue { feature: entry.id, value });
+            }
+            let mut participants = vec![from.clone()];
+            if let Party::Named(a) = &to
+                && a != from
+            {
+                participants.push(a.clone());
+            }
+            let mut state = SpeakerStateStore::open(&cli.speaker_state)?;
+            let latest = state.scene(&group)?;
+            let mut scene = Scene {
+                group,
+                n: latest.as_ref().map_or(1, |l| l.n + 1),
+                inventory_rev,
+                participants,
+                relations: vec![PairRelation { from: from.clone(), to, features }],
+                annotator,
+            };
+            if let Some(l) = &latest {
+                let same = Scene { n: l.n, ..scene.clone() };
+                if &same == l {
+                    println!("unchanged");
+                    return Ok(());
+                }
+            }
+            scene.n = latest.map_or(1, |l| l.n + 1);
+            let key = weksa::speaker::scene_key(&scene.group, scene.n);
+            let outcome = state
+                .put_scene(scene, &inventory_store, &corpus, &EntityStore::open(&cli.entities)?)
+                .map_err(refused)?;
+            println!("{outcome:?} {key}");
+        }
+        Command::Scene(SceneCommand::Dump) => {
+            let inventory = InventoryStore::open(&cli.inventory)?.inventory()?;
+            let gloss = |f: &FeatureValue| {
+                let name = inventory.entry(&f.feature).map_or("?", |e| e.gloss.as_str());
+                match &f.value {
+                    FeatValue::Grade(g) => format!("{name}={}", g.get()),
+                    FeatValue::Option(l) => format!("{name}={l}"),
+                    FeatValue::Flag(b) => format!("{name}={b}"),
+                }
+            };
+            for s in SpeakerStateStore::open(&cli.speaker_state)?.all_scenes()? {
+                let who = match &s.annotator {
+                    Annotator::Operator => "Operator".to_string(),
+                    Annotator::Model { family, generator } => format!("Model {family:?} {generator}"),
+                };
+                let people: Vec<&str> = s.participants.iter().map(|p| p.as_str()).collect();
+                println!(
+                    "scene:{}@{} rev:{} {who} [{}]",
+                    s.group,
+                    s.n,
+                    s.inventory_rev,
+                    people.join(",")
+                );
+                for r in &s.relations {
+                    let to = match &r.to {
+                        Party::Named(e) => e.as_str().to_string(),
+                        Party::Unnamed => "unnamed".to_string(),
+                    };
+                    let feats: Vec<String> = r.features.iter().map(&gloss).collect();
+                    println!("  {}->{to} {}", r.from, feats.join(" "));
+                }
+            }
+        }
         Command::Inventory(InventoryCommand::Dao) => {
             let (rev, entries) = weksa::daodejing::revision();
             let count = entries.len();
@@ -779,6 +1201,8 @@ fn main() -> Result<()> {
                     corpus: &cli.corpus,
                     inventory: &cli.inventory,
                     entities: &cli.entities,
+                    ontology: &cli.ontology,
+                    speaker_state: &cli.speaker_state,
                 },
                 &answerer,
                 &embed_model,
@@ -791,10 +1215,7 @@ fn main() -> Result<()> {
         Command::Loop(LoopCommand::Round { root, ollama_url }) => {
             let unreadable = |_| anyhow::anyhow!("a store would not read");
             let mut run = RunStores::open(&root)?;
-            let mut files = AnswerFiles::new(
-                run.next_round_dir().map_err(unreadable)?,
-                run.record().model.clone(),
-            );
+            let mut files = run.answer_files(run.next_round_dir().map_err(unreadable)?)?;
             let scorer = Scorer::new(OllamaEmbedder::new(&ollama_url, &run.record().embedder));
             match round(&mut run, &mut files, &scorer)? {
                 RoundOutcome::Unanswered { prompts } => {
@@ -814,10 +1235,11 @@ fn main() -> Result<()> {
             ollama_url,
         }) => {
             let run = RunStores::open(&root)?;
-            let model = run.record().model.clone();
-            let mut recorded =
-                RecordedAnswers::new(root.join(format!("round-{round}")), model.clone());
-            let mut files = AnswerFiles::new(run.ablation_dir(round), model);
+            let mut recorded = RecordedAnswers::new(
+                root.join(format!("round-{round}")),
+                run.record().model.clone(),
+            );
+            let mut files = run.answer_files(run.ablation_dir(round))?;
             let scorer = Scorer::new(OllamaEmbedder::new(&ollama_url, &run.record().embedder));
             match run.stance_ablation(round, &mut recorded, &mut files, &scorer)? {
                 AblationOutcome::Unanswered { prompts } => {
@@ -838,9 +1260,159 @@ fn main() -> Result<()> {
                 }
             }
         }
+        Command::Loop(LoopCommand::Relower {
+            root,
+            round,
+            arm,
+            lowerer,
+            floor,
+            ollama_url,
+        }) => {
+            if !is_label(&arm)
+                || floor.iter().any(|f| !is_label(f) || *f == arm)
+                || floor.iter().enumerate().any(|(i, f)| floor[..i].contains(f))
+            {
+                anyhow::bail!("arm and floor labels must match [a-z0-9-]{{1,32}} and differ");
+            }
+            let run = RunStores::open(&root)?;
+            let mut recorded = RecordedAnswers::new(
+                root.join(format!("round-{round}")),
+                run.record().model.clone(),
+            );
+            let mut files = run.answer_files(run.relower_dir(round, &arm))?;
+            let mut floor_ports: Vec<RecordedAnswers> = floor
+                .iter()
+                .map(|f| RecordedAnswers::new(run.relower_dir(round, f), run.record().model.clone()))
+                .collect();
+            let mut floor_dyn: Vec<&mut dyn ModelPort> =
+                floor_ports.iter_mut().map(|p| p as &mut dyn ModelPort).collect();
+            let scorer = Scorer::new(OllamaEmbedder::new(&ollama_url, &run.record().embedder));
+            match run.relower(
+                round,
+                &arm,
+                &mut recorded,
+                &mut files,
+                &mut floor_dyn,
+                &scorer,
+            )? {
+                RelowerOutcome::Unanswered { prompts } => {
+                    for digest in &prompts {
+                        println!("unanswered {digest}");
+                    }
+                    println!("unanswered {} prompts", prompts.len());
+                    std::process::exit(3);
+                }
+                RelowerOutcome::Read { languages, verdict } => {
+                    for l in languages {
+                        println!(
+                            "{}",
+                            run.labelled(&format!("{} arm={arm} lowerer={lowerer}", l.line()))
+                        );
+                    }
+                    if let Some(v) = verdict {
+                        println!("verdict {v:?}");
+                    }
+                }
+            }
+        }
+        Command::Loop(LoopCommand::Calibrate {
+            root,
+            round,
+            prompted,
+            degraded,
+            candidate,
+            class,
+            ollama_url,
+        }) => {
+            let labels: Vec<&String> = prompted.iter().chain(&degraded).chain(&candidate).collect();
+            if labels.iter().any(|l| !is_label(l))
+                || labels.iter().enumerate().any(|(i, l)| labels[..i].contains(l))
+            {
+                anyhow::bail!("draw labels must match [a-z0-9-]{{1,32}} and differ");
+            }
+            if prompted.len() < FLOOR_ARMS_MIN + 1 {
+                anyhow::bail!("at least {} --prompted labels are needed", FLOOR_ARMS_MIN + 1);
+            }
+            let mut classes: Vec<(String, Vec<String>)> = Vec::new();
+            for c in &class {
+                let Some((name, prefixes)) = c.split_once('=') else {
+                    anyhow::bail!("--class is NAME=PREFIX[,PREFIX...]");
+                };
+                if !is_label(name)
+                    || name == "all"
+                    || classes.iter().any(|(n, _)| n == name)
+                    || prefixes.split(',').any(str::is_empty)
+                {
+                    anyhow::bail!("--class is NAME=PREFIX[,PREFIX...] with a new label NAME other than all");
+                }
+                classes.push((name.to_string(), prefixes.split(',').map(String::from).collect()));
+            }
+            let run = RunStores::open(&root)?;
+            let scorer = Scorer::new(OllamaEmbedder::new(&ollama_url, &run.record().embedder));
+            match run.calibrate(round, &prompted, &degraded, &candidate, &classes, &scorer)? {
+                CalibrateOutcome::Unanswered(missing) => {
+                    for (label, n) in &missing {
+                        println!("unanswered {label} {n}");
+                    }
+                    eprintln!(
+                        "answer it through weksa loop relower ROOT --round N --arm LABEL first"
+                    );
+                    std::process::exit(1);
+                }
+                CalibrateOutcome::Read { unusable, classes } => {
+                    println!(
+                        "{}",
+                        run.labelled(&format!(
+                            "calibrate draws prompted={} degraded={} candidate={} floor-arms={FLOOR_ARMS_MIN} unusable={unusable}",
+                            prompted.len(),
+                            degraded.len(),
+                            candidate.len(),
+                        ))
+                    );
+                    for c in classes {
+                        let items: String = c
+                            .languages
+                            .iter()
+                            .map(|l| format!(" {} n={} skipped={}", l.language, l.n, l.skipped))
+                            .collect();
+                        let t = &c.trials;
+                        println!("{}", run.labelled(&format!("calibrate class={} items{items}", c.name)));
+                        println!(
+                            "{}",
+                            run.labelled(&format!(
+                                "calibrate class={} prompted trials={} nogain={} accepted={} regressed={} noise={:.4}",
+                                c.name, t.prompted.trials, t.prompted.nogain, t.prompted.accepted, t.prompted.regressed, t.noise
+                            ))
+                        );
+                        for (side, k) in t.r_roles() {
+                            println!(
+                                "{}",
+                                run.labelled(&format!("calibrate class={} prompted-{side} {}", c.name, k.line()))
+                            );
+                        }
+                        for line in c.degraded_lines(&degraded) {
+                            println!("{}", run.labelled(&format!("calibrate class={} {line}", c.name)));
+                        }
+                        println!(
+                            "{}",
+                            run.labelled(&format!(
+                                "calibrate class={} candidate trials={} accepted={} nogain={} regressed={}",
+                                c.name, t.candidate.trials, t.candidate.accepted, t.candidate.nogain, t.candidate.regressed
+                            ))
+                        );
+                        for (label, k) in candidate.iter().zip(&t.candidate_arms) {
+                            println!(
+                                "{}",
+                                run.labelled(&format!("calibrate class={} candidate={label} {}", c.name, k.line()))
+                            );
+                        }
+                    }
+                }
+            }
+        }
         Command::Loop(LoopCommand::Recall { root }) => {
             let run = RunStores::open(&root)?;
-            let mut files = AnswerFiles::new(run.recall_dir(), run.record().model.clone());
+            let mut files = run.answer_files(run.recall_dir())?;
             match run.recall(&mut files)? {
                 RecallOutcome::Unanswered { prompts } => {
                     for digest in &prompts {
@@ -852,13 +1424,28 @@ fn main() -> Result<()> {
                 RecallOutcome::Read(reading) => println!("{}", reading.line()),
             }
         }
+        Command::Loop(LoopCommand::MintOntology { root, language }) => {
+            let run = RunStores::open(&root)?;
+            let mut files = run.answer_files(run.ontology_mint_dir())?;
+            match run.mint_ontology(&mut files, &language)? {
+                OntologyMintOutcome::Unanswered { prompt } => {
+                    println!("unanswered {prompt}");
+                    std::process::exit(3);
+                }
+                OntologyMintOutcome::Drafted { prompt, entries } => println!(
+                    "drafted {entries} entries {}",
+                    run.ontology_mint_dir().join(format!("{prompt}.answer")).display()
+                ),
+                OntologyMintOutcome::Refused { code } => {
+                    println!("{code}");
+                    std::process::exit(1);
+                }
+            }
+        }
         Command::Loop(LoopCommand::Cycle { root, ollama_url }) => {
             let unreadable = |_| anyhow::anyhow!("a store would not read");
             let mut run = RunStores::open(&root)?;
-            let mut files = AnswerFiles::new(
-                run.next_cycle_dir().map_err(unreadable)?,
-                run.record().model.clone(),
-            );
+            let mut files = run.answer_files(run.next_cycle_dir().map_err(unreadable)?)?;
             let scorer = Scorer::new(OllamaEmbedder::new(&ollama_url, &run.record().embedder));
             match cycle(&mut run, &mut files, &scorer)? {
                 CycleOutcome::Unanswered { prompts } => {
diff --git a/crates/weksa/src/model.rs b/crates/weksa/src/model.rs
index 1a79449..a9af4fa 100644
--- a/crates/weksa/src/model.rs
+++ b/crates/weksa/src/model.rs
@@ -7,6 +7,7 @@ use std::io::ErrorKind;
 use std::path::PathBuf;
 
 use crate::context::Prompt;
+use crate::store::normalized;
 
 /// A model answering [`Prompt`]s and nothing else.
 pub trait ModelPort {
@@ -20,6 +21,8 @@ pub trait ModelPort {
 pub enum PortError {
     /// Nobody has answered yet.
     Unanswered,
+    /// The prompt holds the text of an item in a Test group. It is neither written nor answered.
+    Withheld,
     Io(ErrorKind),
 }
 
@@ -27,6 +30,7 @@ impl fmt::Display for PortError {
     fn fmt(&self, f: &mut fmt::Formatter<'_>) -> fmt::Result {
         match self {
             PortError::Unanswered => f.write_str("the prompt is unanswered"),
+            PortError::Withheld => f.write_str("the prompt holds Test item text"),
             PortError::Io(kind) => write!(f, "io error {kind:?}"),
         }
     }
@@ -40,14 +44,31 @@ impl std::error::Error for PortError {}
 pub struct AnswerFiles {
     dir: PathBuf,
     model: String,
+    withheld: Vec<String>,
 }
 
 impl AnswerFiles {
-    pub fn new(dir: PathBuf, model: String) -> Self {
-        Self { dir, model }
+    /// Refuses (`PortError::Withheld`) any prompt that holds the text of one of
+    /// `withheld`, before it reads or writes a file: the one door a prompt
+    /// leaves the loop through, so a Test sentence cannot reach a model by it.
+    pub fn new(dir: PathBuf, model: String, withheld: Vec<String>) -> Self {
+        Self { dir, model, withheld }
     }
 }
 
+/// Normalised length from which a Test text is matched. Every live Test text is
+/// longer; a shorter one ("Stop.") would match any prompt that says "Stop. Then
+/// ...", so a Test item that short is not caught here.
+const LONG: usize = 12;
+
+/// Whether `prompt` holds `text`, by the corpus door's own sameness
+/// ([`normalized`]: NFKC, case fold, spacing and punctuation dropped): a
+/// re-cased, re-spaced, wrapped or width-changed copy still counts.
+fn holds(prompt: &str, text: &str) -> bool {
+    let key = normalized(text);
+    key.chars().count() >= LONG && normalized(prompt).contains(&key)
+}
+
 /// Answers read from one directory and nothing else: `<digest>.answer` is the
 /// reply to the prompt whose digest is `<digest>`. A prompt with no file is
 /// [`PortError::Unanswered`]; this port never creates or writes anything. The
@@ -86,6 +107,9 @@ impl ModelPort for AnswerFiles {
 
     fn answer(&mut self, prompt: &Prompt) -> Result<String, PortError> {
         let io = |e: std::io::Error| PortError::Io(e.kind());
+        if self.withheld.iter().any(|t| holds(prompt.text(), t)) {
+            return Err(PortError::Withheld);
+        }
         let digest = prompt.digest();
         match RecordedAnswers::new(self.dir.clone(), self.model.clone()).answer(prompt) {
             Err(PortError::Unanswered) => {}
diff --git a/crates/weksa/src/ontology.rs b/crates/weksa/src/ontology.rs
new file mode 100644
index 0000000..154c562
--- /dev/null
+++ b/crates/weksa/src/ontology.rs
@@ -0,0 +1,207 @@
+//! The language ontology: per target language, the choices its culture makes
+//! about word, grammar, discourse, sound and script for a speaker in a stance
+//! (ruling `persona-drives-ontology`). An entry says when it applies (feature
+//! conditions over the lowering view's stance, discourse and scene relation) and what it
+//! chooses. `select` is the only reader that decides which entries a lowering
+//! prompt carries, and it runs only inside `Prompt::lower`;
+//! `OntologyStore::admit` is the only writer. Entries are immutable.
+
+use cultcache_rs::DatabaseEntry;
+use schemars::JsonSchema;
+use serde::{Deserialize, Serialize};
+
+use crate::inventory::{InvId, Slot};
+use crate::packet::{FeatValue, FeatureValue, Grade};
+use crate::speaker::Annotator;
+use crate::validate::LoweringInput;
+
+pub const MAX_CONDITIONS: usize = 4;
+pub const MAX_EXAMPLES: usize = 3;
+pub const MAX_CHOICE_BYTES: usize = 200;
+pub const MAX_EXAMPLE_BYTES: usize = 120;
+pub const MAX_ENTRIES_PER_LANGUAGE: usize = 64;
+
+/// Which part of the language an entry shapes.
+#[derive(Clone, Copy, Debug, PartialEq, Eq, Serialize, Deserialize, JsonSchema)]
+pub enum Layer {
+    Lexicon,
+    Grammar,
+    Discourse,
+    Phonology,
+    Orthography,
+}
+
+impl Layer {
+    pub fn name(self) -> &'static str {
+        match self {
+            Layer::Lexicon => "lexicon",
+            Layer::Grammar => "grammar",
+            Layer::Discourse => "discourse",
+            Layer::Phonology => "phonology",
+            Layer::Orthography => "orthography",
+        }
+    }
+}
+
+/// What a feature's value must be for a condition to hold.
+#[derive(Clone, Debug, PartialEq, Eq, Serialize, Deserialize, JsonSchema)]
+pub enum Test {
+    AtLeast(Grade),
+    AtMost(Grade),
+    Is(FeatValue),
+    /// Holds when the feature is absent or a grade at most `g`: a bound that
+    /// costs nothing where the feature is unrated. `AtMost` still fails on an
+    /// absent feature.
+    AtMostOrUnset(Grade),
+}
+
+/// One feature of one slot of the view, tested. `Stance`, `Discourse` and
+/// `Scene` reach a lowering view; `Speaker` does not yet.
+#[derive(Clone, Debug, PartialEq, Eq, Serialize, Deserialize, JsonSchema)]
+pub struct Condition {
+    pub slot: Slot,
+    pub feature: InvId,
+    pub test: Test,
+}
+
+impl Condition {
+    /// Whether this condition holds over a slot's feature values: the one
+    /// evaluator `select` and the corpus tests share.
+    pub fn holds(&self, features: &[FeatureValue]) -> bool {
+        let Some(found) = features.iter().find(|f| f.feature == self.feature) else {
+            return matches!(self.test, Test::AtMostOrUnset(_));
+        };
+        match (&self.test, &found.value) {
+            (Test::AtLeast(g), FeatValue::Grade(v)) => v >= g,
+            (Test::AtMost(g) | Test::AtMostOrUnset(g), FeatValue::Grade(v)) => v <= g,
+            (Test::Is(want), v) => want == v,
+            _ => false,
+        }
+    }
+
+    /// The feature value this condition names, as the inventory check reads it.
+    pub(crate) fn as_value(&self) -> FeatureValue {
+        FeatureValue {
+            feature: self.feature,
+            value: match &self.test {
+                Test::AtLeast(g) | Test::AtMost(g) | Test::AtMostOrUnset(g) => FeatValue::Grade(*g),
+                Test::Is(v) => v.clone(),
+            },
+        }
+    }
+}
+
+/// One choice of one language. Key `onto:<language>:<n>`.
+///
+/// The store judges the form of an entry's text (bounds, normalization, no
+/// control or format character) and never its meaning: no door judges text
+/// (ruling `leak-owned-by-flow-and-scorer-3`). No Train-only ontology mint
+/// exists yet, so a seed or a drafted entry is checked against held-out text by
+/// nothing today; follow-up `leak-diagnostic-in-round` owns that diagnostic.
+#[derive(Clone, Debug, PartialEq, Eq, JsonSchema, DatabaseEntry)]
+#[cultcache(type = "weksa.ontology_entry")]
+pub struct OntologyEntry {
+    #[cultcache(key = 0)]
+    pub language: String,
+    /// The entry's number within its language, from 1.
+    #[cultcache(key = 1)]
+    pub n: u32,
+    /// The revision, of the inventory the entry was admitted through, at which the
+    /// store read its conditions: provenance only; a run reads the conditions'
+    /// features at its own head.
+    #[cultcache(key = 2)]
+    pub inventory_rev: u32,
+    #[cultcache(key = 3)]
+    pub layer: Layer,
+    /// Every condition must hold; none means the entry always applies.
+    #[cultcache(key = 4)]
+    pub when: Vec<Condition>,
+    #[cultcache(key = 5)]
+    pub choice: String,
+    #[cultcache(key = 6)]
+    pub examples: Vec<String>,
+    #[cultcache(key = 7)]
+    pub annotator: Annotator,
+}
+
+/// `onto:<language>:<n>`.
+pub fn ontology_key(language: &str, n: u32) -> String {
+    format!("onto:{language}:{n}")
+}
+
+impl OntologyEntry {
+    pub fn key(&self) -> String {
+        ontology_key(&self.language, self.n)
+    }
+}
+
+/// Every entry of the run's ontology store, by language then number.
+#[derive(Clone, Debug, Default, PartialEq, Eq)]
+pub struct Ontology {
+    entries: Vec<OntologyEntry>,
+}
+
+impl Ontology {
+    pub fn empty() -> Self {
+        Self::default()
+    }
+
+    pub(crate) fn of(mut entries: Vec<OntologyEntry>) -> Self {
+        entries.sort_by(|a, b| (&a.language, a.n).cmp(&(&b.language, b.n)));
+        Self { entries }
+    }
+
+    pub fn entries(&self) -> &[OntologyEntry] {
+        &self.entries
+    }
+}
+
+/// The entries of exactly `language` whose every condition holds against the
+/// view's stance, discourse and scene-relation features (the scene's only when
+/// `with_scene` selected a relation), in `n` order. An absent feature meets no
+/// condition except `AtMostOrUnset`. Nothing else of the view is read.
+pub fn select<'a>(
+    o: &'a Ontology,
+    language: &str,
+    input: &LoweringInput,
+) -> Vec<&'a OntologyEntry> {
+    o.entries
+        .iter()
+        .filter(|e| e.language == language)
+        .filter(|e| {
+            e.when.iter().all(|c| match c.slot {
+                Slot::Stance => c.holds(&input.stance().features),
+                Slot::Discourse => c.holds(&input.discourse().features),
+                Slot::Scene => c.holds(input.scene()),
+                _ => false,
+            })
+        })
+        .collect()
+}
+
+#[cfg(test)]
+mod tests {
+    use super::*;
+
+    fn cond(test: Test) -> Condition {
+        Condition { slot: Slot::Discourse, feature: InvId::parse("feature:7").unwrap(), test }
+    }
+    fn has(v: FeatValue) -> Vec<FeatureValue> {
+        vec![FeatureValue { feature: InvId::parse("feature:7").unwrap(), value: v }]
+    }
+    fn grade(g: u16) -> Grade {
+        Grade::new(g).unwrap()
+    }
+
+    #[test]
+    fn at_most_or_unset_holds_when_absent_or_at_most_and_nothing_else() {
+        let c = cond(Test::AtMostOrUnset(grade(799)));
+        assert!(c.holds(&[]));
+        assert!(c.holds(&has(FeatValue::Grade(grade(799)))));
+        assert!(c.holds(&has(FeatValue::Grade(grade(0)))));
+        assert!(!c.holds(&has(FeatValue::Grade(grade(800)))));
+        assert!(!c.holds(&has(FeatValue::Flag(true))));
+        // AtMost keeps its meaning: an absent feature fails it.
+        assert!(!cond(Test::AtMost(grade(799))).holds(&[]));
+    }
+}
diff --git a/crates/weksa/src/run.rs b/crates/weksa/src/run.rs
index a1b879d..7e2609d 100644
--- a/crates/weksa/src/run.rs
+++ b/crates/weksa/src/run.rs
@@ -40,22 +40,29 @@ use unicode_segmentation::UnicodeSegmentation;
 
 use crate::context::{EditFeedback, EncoderOffer, Prompt, TrainItems};
 use crate::corpus::{CorpusItem, CorpusItemId, ModelFamily, Source};
-use crate::encode::{EditDraft, LoweringDraft, PacketDraft, encoder_id};
-use crate::form::{is_attestation, is_slug};
-use crate::model::{ModelPort, PortError};
+use crate::encode::{
+    EditDraft, LoweringDraft, MAX_EDIT_CHANGES, OntologyDraft, PacketDraft, encoder_id,
+};
+use crate::form::{is_attestation, is_language_tag, is_slug};
+use crate::model::{AnswerFiles, ModelPort, PortError, RecordedAnswers};
 use crate::packet::{Packet, Stance};
-use crate::score::{CHRF_VERSION, chrf, Embedder, ItemScore, ScoreInput, Scorer, SplitMean, aggregate};
+use crate::score::{CHRF_VERSION, chrf, Embedder, ItemScore, ScoreInput, Scorer, SplitMean, aggregate, validation_items};
 use crate::split::{Split, SplitScheme, fnv1a64, fnv1a64_of, hex16};
 use crate::store::{
-    CorpusStore, EntityStore, InventoryStore, PacketStore, StoreError, open_cache_over,
+    CorpusStore, EntityStore, InventoryStore, OntologyStore, PacketStore, SpeakerStateStore,
+    StoreError,
+    check_ontology_entry, open_cache_over,
 };
-use crate::validate::LoweringInput;
+use crate::inventory::Slot;
+use crate::validate::{LoweringInput, feature_refusals};
 
 /// The digest of the prompt builder's source: `context.rs`, then `split.rs`,
 /// whose scheme and digest function decide which lines the prompt holds as
 /// Train and name every prompt, then `lower.rs`, whose `EntityForms` port and
 /// `entity()` the lowering prompt reads, then `packet.rs`, whose serde
-/// shapes the lowering prompt prints as the packet. Each file enters the digest
+/// shapes the lowering prompt prints as the packet, then `ontology.rs`, whose
+/// entry shape and `select` decide which ontology lines the lowering prompt
+/// prints. Each file enters the digest
 /// behind its length, so the parts cannot be re-cut into other parts with the
 /// same digest. Any edit to any of them, comments included, ends a run; code
 /// outside those files is not covered.
@@ -64,6 +71,7 @@ pub const PROMPT_SOURCE_DIGEST: u64 = fnv1a64_of(&[
     include_bytes!("split.rs"),
     include_bytes!("lower.rs"),
     include_bytes!("packet.rs"),
+    include_bytes!("ontology.rs"),
 ]);
 
 /// The least composite gain an edit must show over item noise to be kept, and
@@ -125,6 +133,20 @@ pub struct RunRecord {
     /// language is never offered, minted from, probed or scored.
     #[cultcache(key = 14)]
     pub panel: Vec<String>,
+    /// Canonical absolute path of the ontology store: read-only for the run,
+    /// pinned by `ontology_digest`.
+    #[cultcache(key = 15)]
+    pub ontology: String,
+    /// 16 hex of the ontology file's bytes.
+    #[cultcache(key = 16)]
+    pub ontology_digest: String,
+    /// Canonical absolute path of the speaker-state store (scenes): read-only
+    /// for the run, pinned by `speaker_state_digest`.
+    #[cultcache(key = 17)]
+    pub speaker_state: String,
+    /// 16 hex of the speaker-state file's bytes.
+    #[cultcache(key = 18)]
+    pub speaker_state_digest: String,
 }
 
 /// How a run's lowering prompts reach the model that answers them (rulings
@@ -224,9 +246,18 @@ pub struct LanguageRound {
     pub validation_refused: RefusalCounts,
 }
 
+/// One panel language's Validation scores in a round, in corpus order: numbers
+/// only, no item key and no text. Only `run.rs` reads them (the paired floor).
+#[derive(Clone, Debug, PartialEq, Serialize, Deserialize, JsonSchema)]
+pub struct LanguageScores {
+    pub language: String,
+    pub scores: Vec<ItemScore>,
+}
+
 /// One scored round. It holds no text and no Test reading: per-item rows for
-/// Train only, Validation only as means and refusal counts by stage. Only
-/// `run::round` builds one.
+/// Train only; Validation as means and refusal counts by stage, and as
+/// per-item scores (numbers only, private to this module). Only `run::round`
+/// builds one.
 ///
 /// ```
 /// fn f(r: &weksa::run::RoundRecord) -> u32 { r.n() }
@@ -255,6 +286,7 @@ pub struct LanguageRound {
 ///         parse_reasons: vec![],
 ///         own_family: 0,
 ///         languages: vec![],
+///         validation_scores: vec![],
 ///     }
 /// }
 /// ```
@@ -314,6 +346,12 @@ pub struct RoundRecord {
     // Key 20 is `own_family`; the per-language readings take 21.
     #[cultcache(key = 21)]
     languages: Vec<LanguageRound>,
+    /// Each panel language's live Validation scores in corpus order, a refused
+    /// item as 0. Private with no getter: only `run.rs` (the floor) reads them,
+    /// so a leak outside it is a compile error. A run from before has none.
+    #[cultcache(key = 22, default)]
+    #[schemars(default)]
+    validation_scores: Vec<LanguageScores>,
 }
 
 impl RoundRecord {
@@ -429,6 +467,8 @@ impl RoundRecord {
 pub enum DriftOf {
     Corpus,
     Entities,
+    Ontology,
+    SpeakerState,
     Prompts,
     Model,
     Embedder,
@@ -450,11 +490,14 @@ pub enum RunError {
     /// The inventory store holds no revision.
     NoInventory,
     Io(ErrorKind),
+    /// A prompt held the text of a Test item and was refused before any file.
+    Withheld,
     /// A store or the run file would not read or write.
     Store,
     /// The embedder failed.
     Embed,
-    /// Rounds 1 and 2 are not two plain replicates under the run's first inventory.
+    /// Rounds 1 to [`FLOOR_ARMS_MIN`] + 1 are not all plain replicates under the run's first
+    /// inventory, or hold no per-item scores.
     NoFloor,
     /// A round has no Validation reading.
     NoValidation,
@@ -464,6 +507,16 @@ pub enum RunError {
     /// The panel is empty, repeats or misspells a language, or names one with no
     /// live Train or Validation item in the pinned corpus.
     Panel,
+    /// An ontology entry of a panel language does not read against the run's
+    /// head inventory at its revision.
+    Ontology,
+    /// A scene does not read against the run's inventory.
+    SpeakerState,
+    /// The floor arm of a relower holds no answer to a prompt; it is a
+    /// reference, never written to, and must be answered whole first.
+    FloorUnanswered,
+    /// A relower was given fewer floor arms than [`FLOOR_ARMS_MIN`].
+    FloorArms,
 }
 
 impl fmt::Display for RunError {
@@ -473,18 +526,29 @@ impl fmt::Display for RunError {
             RunError::NoRun => f.write_str("the root holds no run"),
             RunError::Malformed(what) => write!(f, "malformed {what}"),
             RunError::Drift(DriftOf::Prompts) => f.write_str(
-                "drift in Prompts (the prompt source digest covers context.rs, split.rs, lower.rs and packet.rs)",
+                "drift in Prompts (the prompt source digest covers context.rs, split.rs, lower.rs, packet.rs and ontology.rs)",
             ),
             RunError::Drift(of) => write!(f, "drift in {of:?}"),
             RunError::NoInventory => f.write_str("the inventory holds no revision"),
             RunError::Io(kind) => write!(f, "io error {kind:?}"),
+            RunError::Withheld => f.write_str("a prompt holds Test item text; it was neither written nor answered"),
             RunError::Store => f.write_str("a store would not read or write"),
             RunError::Unrecorded => f.write_str(
                 "the round holds no answer to a lowering prompt rebuilt now: the prompt digest drifted or the head inventory moved since the round",
             ),
             RunError::Embed => f.write_str("the embedder failed"),
-            RunError::NoFloor => f.write_str("the run has no noise floor: record two rounds first"),
+            RunError::NoFloor => f.write_str("the run has no noise floor: record four rounds under the first inventory first"),
             RunError::NoValidation => f.write_str("a reading has no validation item"),
+            RunError::Ontology => f.write_str(
+                "an ontology entry of a panel language does not read against the run's inventory",
+            ),
+            RunError::SpeakerState => {
+                f.write_str("a scene does not read against the run's inventory")
+            }
+            RunError::FloorArms => f.write_str("a floor needs three or more floor arms; fewer measure no noise"),
+            RunError::FloorUnanswered => {
+                f.write_str("the floor arm holds no answer to a lowering prompt; answer it whole first")
+            }
             RunError::Panel => f.write_str(
                 "the panel is empty, repeats or misspells a language, or names one with no live Train or Validation item",
             ),
@@ -500,12 +564,14 @@ impl fmt::Debug for RunError {
 
 impl std::error::Error for RunError {}
 
-/// The three stores a run pins.
+/// The five stores a run pins.
 #[derive(Clone, Copy)]
 pub struct RunPaths<'a> {
     pub corpus: &'a Path,
     pub inventory: &'a Path,
     pub entities: &'a Path,
+    pub ontology: &'a Path,
+    pub speaker_state: &'a Path,
 }
 
 /// A run's open stores, reopened only from its record. The one public producer
@@ -517,6 +583,8 @@ pub struct RunStores {
     corpus: CorpusStore,
     inventory: InventoryStore,
     entities: EntityStore,
+    ontology: OntologyStore,
+    speaker_state: SpeakerStateStore,
 }
 
 /// The run's own copy of the inventory, made at `create`.
@@ -530,6 +598,12 @@ fn check_pins(cache: &CultCache, root: &Path, record: &RunRecord) -> Result<(),
     if file_digest(&record.entities).as_ref() != Some(&record.entity_digest) {
         return Err(RunError::Drift(DriftOf::Entities));
     }
+    if file_digest(&record.ontology).as_ref() != Some(&record.ontology_digest) {
+        return Err(RunError::Drift(DriftOf::Ontology));
+    }
+    if file_digest(&record.speaker_state).as_ref() != Some(&record.speaker_state_digest) {
+        return Err(RunError::Drift(DriftOf::SpeakerState));
+    }
     let (path, digest, _) = head_of(cache, root, record)?;
     if file_digest_at(&path).as_ref() != Some(&digest) {
         return Err(RunError::Drift(DriftOf::Inventory));
@@ -651,7 +725,10 @@ impl RunStores {
         panel.sort();
         // A tag no item carries (misspelt, wrong case, not a tag) is refused by
         // `check_panel` once the corpus is open.
-        if panel.is_empty() || panel.windows(2).any(|w| w[0] == w[1]) {
+        if panel.is_empty()
+            || panel.windows(2).any(|w| w[0] == w[1])
+            || !panel.iter().all(|t| is_language_tag(t))
+        {
             return Err(RunError::Panel);
         }
         let cache = run_cache(root)?;
@@ -663,6 +740,10 @@ impl RunStores {
             corpus: canonical(paths.corpus)?,
             inventory: canonical(paths.inventory)?,
             entities: canonical(paths.entities)?,
+            ontology: canonical(paths.ontology)?,
+            ontology_digest: String::new(),
+            speaker_state: canonical(paths.speaker_state)?,
+            speaker_state_digest: String::new(),
             corpus_digest: String::new(),
             entity_digest: String::new(),
             prompt_digest: hex16(PROMPT_SOURCE_DIGEST),
@@ -684,11 +765,15 @@ impl RunStores {
                 corpus_digest: file_digest(&record.corpus).ok_or(RunError::Store)?,
                 entity_digest: file_digest(&record.entities).ok_or(RunError::Store)?,
                 inventory_digest: file_digest_at(&head).ok_or(RunError::Store)?,
+                ontology_digest: file_digest(&record.ontology).ok_or(RunError::Store)?,
+                speaker_state_digest: file_digest(&record.speaker_state).ok_or(RunError::Store)?,
                 ..record
             };
             between();
             let mut run = Self::with(root, cache, record)?;
             run.check_panel()?;
+            run.check_ontology()?;
+            run.check_scenes()?;
             // The stores were read between the digests: unless they still match
             // the pins, what was opened is not what was pinned. Nothing is
             // recorded for a run that did not pin.
@@ -739,6 +824,9 @@ impl RunStores {
             corpus: CorpusStore::open(Path::new(&record.corpus)).map_err(store)?,
             inventory: InventoryStore::open(&head).map_err(store)?,
             entities: EntityStore::open(Path::new(&record.entities)).map_err(store)?,
+            ontology: OntologyStore::open(Path::new(&record.ontology)).map_err(store)?,
+            speaker_state: SpeakerStateStore::open(Path::new(&record.speaker_state))
+                .map_err(store)?,
             cache,
             record,
         })
@@ -748,6 +836,51 @@ impl RunStores {
         &self.record
     }
 
+    /// Every ontology entry of a panel language reads against the run's head
+    /// inventory: every condition's feature is live at the head in the
+    /// condition's slot and fits its test. An entry's `inventory_rev` names a
+    /// revision of the inventory it was admitted through, and beds number
+    /// revisions independently, so a run never reads it.
+    fn check_ontology(&self) -> Result<(), RunError> {
+        let inventory = self.inventory.inventory().map_err(|_| RunError::Store)?;
+        let entries = self.ontology.all().map_err(|_| RunError::Store)?;
+        entries
+            .iter()
+            .filter(|e| self.record.panel.contains(&e.language))
+            .try_for_each(|e| {
+                let head = inventory.latest().map(|r| r.n).ok_or(RunError::Ontology)?;
+                check_ontology_entry(e, &inventory, head).map_err(|_| RunError::Ontology)
+            })
+    }
+
+    /// Every scene's relation features read against the run's head inventory
+    /// in slot `Scene`, as [`check_ontology`](Self::check_ontology) reads
+    /// entries: the scene's `inventory_rev` is admission provenance a run never reads.
+    fn check_scenes(&self) -> Result<(), RunError> {
+        let inventory = self.inventory.inventory().map_err(|_| RunError::Store)?;
+        let scenes = self.speaker_state.all_scenes().map_err(|_| RunError::Store)?;
+        if scenes.is_empty() {
+            return Ok(());
+        }
+        let head = inventory.latest().map(|r| r.n).ok_or(RunError::SpeakerState)?;
+        for r in scenes.iter().flat_map(|s| &s.relations) {
+            if !feature_refusals(&inventory, head, &r.features, Slot::Scene).is_empty() {
+                return Err(RunError::SpeakerState);
+            }
+        }
+        Ok(())
+    }
+
+    /// The one door by which a loop view gets its scene: `with_scene` over the
+    /// run's pinned speaker-state and corpus stores.
+    fn assembled(
+        &self,
+        view: LoweringInput,
+        inventory: &InventoryStore,
+    ) -> Result<LoweringInput, StoreError> {
+        view.with_scene(&inventory.inventory()?, &self.speaker_state, &self.corpus)
+    }
+
     /// Every panel language holds a live Train and a live Validation item.
     fn check_panel(&self) -> Result<(), RunError> {
         let items = self.corpus.all().map_err(|_| RunError::Store)?;
@@ -831,6 +964,13 @@ impl RunStores {
             .collect())
     }
 
+    /// The answer door for prompts in `dir`: refuses a prompt that holds the text
+    /// of any item in a Test group of the corpus, in any language.
+    pub fn answer_files(&self, dir: PathBuf) -> anyhow::Result<AnswerFiles> {
+        let withheld = self.corpus.test_texts()?;
+        Ok(AnswerFiles::new(dir, self.record.model.clone(), withheld))
+    }
+
     /// The recorded rounds, in order.
     pub fn rounds(&self) -> anyhow::Result<Vec<RoundRecord>> {
         let mut rounds = self.cache.get_all::<RoundRecord>()?;
@@ -1016,7 +1156,8 @@ impl RunStores {
                 }
                 Err(PortError::Unanswered) => unanswered.push(prompt.digest()),
                 Err(PortError::Io(ErrorKind::InvalidData)) => scores.push((language, None)),
-                Err(PortError::Io(kind)) => return Err(RunError::Io(kind)),
+                Err(PortError::Withheld) => return Err(RunError::Withheld),
+        Err(PortError::Io(kind)) => return Err(RunError::Io(kind)),
             }
         }
         if !unanswered.is_empty() {
@@ -1055,6 +1196,66 @@ impl RunStores {
     }
 }
 
+/// What an ontology mint came to: the call's prompt digest, never an entry
+/// admitted.
+#[derive(Debug, PartialEq, Eq)]
+pub enum OntologyMintOutcome {
+    /// The prompt is written; nobody has answered it.
+    Unanswered { prompt: String },
+    /// The answer reads as a draft of `entries` entries; the answer file is the
+    /// draft, for `weksa ontology admit`.
+    Drafted { prompt: String, entries: usize },
+    /// Nothing asked, or the answer is no draft: a closed code.
+    Refused { code: &'static str },
+}
+
+impl RunStores {
+    /// Asks `model` to draft ontology entries for `language` from the run's
+    /// Train items of that language. Writes the prompt and answer files of
+    /// `model` and nothing else: the draft is admitted, if ever, by
+    /// `weksa ontology admit` into a copy of the ontology, never here.
+    pub fn mint_ontology(
+        &self,
+        model: &mut dyn ModelPort,
+        language: &str,
+    ) -> Result<OntologyMintOutcome, RunError> {
+        let store = |_| RunError::Store;
+        if !self.record.panel.iter().any(|tag| tag == language) {
+            return Ok(OntologyMintOutcome::Refused { code: "language-not-in-panel" });
+        }
+        let inventory = self.inventory.inventory().map_err(store)?;
+        let rev = inventory.latest().ok_or(RunError::NoInventory)?.n;
+        let ontology = self.ontology.ontology().map_err(store)?;
+        let train = self.train().map_err(store)?;
+        // A panel language has a live Train item (`create` requires it and the
+        // corpus is pinned), so no prompt here is a store that broke its pin.
+        let prompt = Prompt::mint_ontology(&train, language, &inventory, rev, &ontology)
+            .ok_or(RunError::Malformed("ontology-mint train"))?;
+        match model.answer(&prompt) {
+            Ok(answer) => Ok(match OntologyDraft::parse(&answer) {
+                Ok(draft) => OntologyMintOutcome::Drafted {
+                    prompt: prompt.digest(),
+                    entries: draft.entries.len(),
+                },
+                Err(e) => OntologyMintOutcome::Refused { code: e.class.code() },
+            }),
+            Err(PortError::Unanswered) => Ok(OntologyMintOutcome::Unanswered {
+                prompt: prompt.digest(),
+            }),
+            Err(PortError::Io(ErrorKind::InvalidData)) => {
+                Ok(OntologyMintOutcome::Refused { code: "invalid-data" })
+            }
+            Err(PortError::Withheld) => Err(RunError::Withheld),
+        Err(PortError::Io(kind)) => Err(RunError::Io(kind)),
+        }
+    }
+
+    /// `<root>/ontology-mint`, where a mint's prompts and answers live.
+    pub fn ontology_mint_dir(&self) -> PathBuf {
+        self.root.join("ontology-mint")
+    }
+}
+
 /// What the lowerer's answer did to each variant of a packet's stance, per
 /// split. Means only; no key, text or stance value.
 #[derive(Clone, Debug, PartialEq)]
@@ -1142,6 +1343,7 @@ fn asked(port: &mut dyn ModelPort, prompt: &Prompt) -> Result<Asked, RunError> {
             .map_or(Asked::Unusable, |d| Asked::Text(d.text))),
         Err(PortError::Io(ErrorKind::InvalidData)) => Ok(Asked::Unusable),
         Err(PortError::Unanswered) => Ok(Asked::Waiting),
+        Err(PortError::Withheld) => Err(RunError::Withheld),
         Err(PortError::Io(kind)) => Err(RunError::Io(kind)),
     }
 }
@@ -1161,6 +1363,66 @@ type HeldSplit = (String, Split, Vec<(CorpusItem, Packet)>);
 type Lowered = (String, String, String, [Option<String>; 2]);
 
 impl RunStores {
+    /// The live items of each panel language in each listed split with their
+    /// round-`n` packets, per language then split, sorted by item key. A round
+    /// that is absent or a cycle's is `Malformed("round")`. Test is never held.
+    fn held_splits(&self, n: u32, splits: &[Split]) -> Result<Vec<HeldSplit>, RunError> {
+        let store = |_| RunError::Store;
+        self.rounds()
+            .map_err(store)?
+            .into_iter()
+            .find(|r| r.n() == n && r.cycle().is_none())
+            .ok_or(RunError::Malformed("round"))?;
+        let round_packets = PacketStore::open(&self.root.join(format!("round-{n}")).join("packets.cc"))
+            .map_err(store)?
+            .all()
+            .map_err(store)?;
+        let mut held: Vec<HeldSplit> = Vec::new();
+        for tag in &self.record.panel {
+            for split in splits {
+                held.push((tag.clone(), *split, Vec::new()));
+            }
+        }
+        for packet in round_packets {
+            let item = self
+                .corpus
+                .get(packet.provenance.corpus_item.as_str())
+                .map_err(store)?
+                .ok_or(RunError::Store)?;
+            for (language, split, items) in &mut held {
+                if *language == item.language && SplitScheme::V1.live(&item) == Some(*split) {
+                    items.push((item.clone(), packet.clone()));
+                }
+            }
+        }
+        for (_, _, items) in &mut held {
+            items.sort_by(|a, b| a.0.id.as_str().cmp(b.0.id.as_str()));
+        }
+        Ok(held)
+    }
+
+    /// The lowering prompt of `packet` for `item`: admitted into `store`,
+    /// assembled and lowered. The one builder for the round's prompt, which
+    /// ablation and relower must reproduce byte for byte. `None` when the
+    /// lowering prompt itself is refused, as it was for the round.
+    fn lowering_prompt(
+        &self,
+        store: &mut PacketStore,
+        packet: Packet,
+        item: &CorpusItem,
+        inventory: &crate::Inventory,
+        ontology: &crate::Ontology,
+    ) -> Result<Option<Prompt>, RunError> {
+        let packet_item = packet.provenance.corpus_item.clone();
+        let view = store
+            .admit(packet, &self.inventory, &self.corpus, &self.entities)
+            .map_err(|_| RunError::Store)?;
+        let view = self
+            .assembled(view, &self.inventory)
+            .map_err(|_| RunError::Store)?;
+        Ok(Prompt::lower(&view, &packet_item, &item.speaker, &item.language, inventory, &self.entities, ontology).ok())
+    }
+
     /// `<root>/ablation-<n>`, where a stance ablation's prompts, answers and
     /// variant packet stores live.
     pub fn ablation_dir(&self, n: u32) -> PathBuf {
@@ -1171,7 +1433,9 @@ impl RunStores {
     /// Train and Validation packet of plain round `n`, per panel language, asks the lowerer again
     /// (`model`, the replay), with the packet's stance emptied (drop) and with
     /// the next item's stance in its split (permute), and reads how far the
-    /// lowering moves against the round's own answer (`recorded`). Test and
+    /// lowering moves against the round's own answer (`recorded`). The variant
+    /// stance also changes which ontology entries are selected, so the figure is
+    /// the stance's whole effect on the lowering, packet and ontology together. Test and
     /// withdrawn items are never asked. Records nothing and writes nothing in
     /// `round-<n>`; the variant stores are rebuilt each call. An answer that
     /// is not a usable lowering drops its pair and is counted in `unusable`.
@@ -1184,12 +1448,10 @@ impl RunStores {
     ) -> Result<AblationOutcome, RunError> {
         let store = |_| RunError::Store;
         check_drift(self, model, scorer)?;
-        self.rounds()
-            .map_err(store)?
-            .into_iter()
-            .find(|r| r.n() == n && r.cycle().is_none())
-            .ok_or(RunError::Malformed("round"))?;
+        // A refused round writes nothing: the round is read before any folder is made.
+        let mut splits = self.held_splits(n, &[Split::Train, Split::Validation])?;
         let inventory = self.inventory.inventory().map_err(store)?;
+        let ontology = self.ontology.ontology().map_err(store)?;
 
         let dir = self.ablation_dir(n);
         std::fs::create_dir_all(&dir).map_err(|e| RunError::Io(e.kind()))?;
@@ -1204,46 +1466,17 @@ impl RunStores {
             PacketStore::open(&dir.join("permute.cc")).map_err(store)?,
         ];
 
-        // Live Train and Validation packets, in item key order within a split.
-        let round_packets = PacketStore::open(&self.root.join(format!("round-{n}")).join("packets.cc"))
-            .map_err(store)?
-            .all()
-            .map_err(store)?;
-        let mut splits: Vec<HeldSplit> = Vec::new();
-        for tag in &self.record.panel {
-            for split in [Split::Train, Split::Validation] {
-                splits.push((tag.clone(), split, Vec::new()));
-            }
-        }
-        for packet in round_packets {
-            let item = self
-                .corpus
-                .get(packet.provenance.corpus_item.as_str())
-                .map_err(store)?
-                .ok_or(RunError::Store)?;
-            for (language, split, held) in &mut splits {
-                if *language == item.language && SplitScheme::V1.live(&item) == Some(*split) {
-                    held.push((item.clone(), packet.clone()));
-                }
-            }
-        }
-
         let mut waiting: Vec<String> = Vec::new();
         let mut readings = Vec::new();
         // Texts per split: (item text, recorded, replay, [drop, permute]).
         let mut texts: Vec<Vec<Lowered>> = Vec::new();
         let mut unusable = vec![0u32; splits.len()];
         for (at, (_, _, held)) in splits.iter_mut().enumerate() {
-            held.sort_by(|a, b| a.0.id.as_str().cmp(b.0.id.as_str()));
             let mut rows = Vec::new();
             for (i, (item, packet)) in held.iter().enumerate() {
-                let packet_item = packet.provenance.corpus_item.clone();
                 let mut prompt_of = |slot: usize, packet: Packet| -> Result<Prompt, RunError> {
-                    let view = stores[slot]
-                        .admit(packet, &self.inventory, &self.corpus, &self.entities)
-                        .map_err(|_| RunError::Store)?;
-                    Prompt::lower(&view, &packet_item, &item.language, &inventory, &self.entities)
-                        .map_err(|_| RunError::Store)
+                    self.lowering_prompt(&mut stores[slot], packet, item, &inventory, &ontology)?
+                        .ok_or(RunError::Store)
                 };
                 let base = prompt_of(0, packet.clone())?;
                 let mut variants: [Option<Prompt>; 2] = [None, None];
@@ -1252,13 +1485,11 @@ impl RunStores {
                     p.stance = Stance::default();
                     variants[0] = Some(prompt_of(1, p)?);
                 }
-                if held.len() > 1 {
-                    let mut p = packet.clone();
-                    p.stance = held[(i + 1) % held.len()].1.stance.clone();
-                    let prompt = prompt_of(2, p)?;
-                    if prompt.digest() != base.digest() {
-                        variants[1] = Some(prompt);
-                    }
+                let mut p = packet.clone();
+                p.stance = held[(i + 1) % held.len()].1.stance.clone();
+                let prompt = prompt_of(2, p)?;
+                if prompt.digest() != base.digest() {
+                    variants[1] = Some(prompt);
                 }
                 // The round's own answer must exist; a missing one is not a gap to ask for.
                 let recorded_text = match asked(recorded, &base)? {
@@ -1358,6 +1589,566 @@ impl RunStores {
     }
 }
 
+/// One panel language's relower reading: Validation items only.
+#[derive(Clone, Debug, PartialEq)]
+pub struct RelowerReading {
+    pub language: String,
+    /// Live Validation items of the language read: those with a round packet
+    /// whose lowering prompt the round could build. Every reading below is over
+    /// these items, so recorded, arm and floor stay comparable.
+    pub n: u32,
+    /// Live Validation items of the language not read: refused by the round
+    /// before admission (no packet) or at the lowering prompt. They are in no
+    /// reading, so `recorded` can differ from the round's own Validation
+    /// reading, which scores them 0.
+    pub skipped: u32,
+    /// Arm answers that were not a usable lowering; each scored 0.
+    pub unusable: u32,
+    /// Floor-arm answers that were not a usable lowering, over every floor arm;
+    /// each scored 0, which widens `floor`. Zero without floor arms.
+    pub floor_unusable: u32,
+    /// The round's own lowering, read against the items.
+    pub recorded: Reading,
+    pub arm: Reading,
+    /// [`paired_floor`] of the recorded lowering against the floor arms, when
+    /// floor arms were given.
+    pub floor: Option<Reading>,
+}
+
+impl RelowerReading {
+    pub fn line(&self) -> String {
+        let show = |r: &Reading| {
+            format!("chrf={:.2} meaning={:.3} composite={:.4}", r.chrf, r.meaning, r.composite)
+        };
+        let floor = self
+            .floor
+            .as_ref()
+            .map_or(String::new(), |f| {
+                format!(" | floor {} unusable={}", show(f), self.floor_unusable)
+            });
+        format!(
+            "relower {} n={} skipped={} unusable={} recorded {} | arm {}{floor}",
+            self.language,
+            self.n,
+            self.skipped,
+            self.unusable,
+            show(&self.recorded),
+            show(&self.arm),
+        )
+    }
+}
+
+#[derive(Debug)]
+pub enum RelowerOutcome {
+    Unanswered { prompts: Vec<String> },
+    /// Per panel language in panel order; the verdict only when a floor arm was given.
+    Read { languages: Vec<RelowerReading>, verdict: Option<Verdict> },
+}
+
+impl RunStores {
+    /// `<root>/relower-<n>-<arm>`, where an arm's prompts and answers live.
+    pub fn relower_dir(&self, n: u32, arm: &str) -> PathBuf {
+        self.root.join(format!("relower-{n}-{arm}"))
+    }
+
+    /// A diagnostic like [`recall`](Self::recall) and
+    /// [`stance_ablation`](Self::stance_ablation), never a gate: it serves the
+    /// distil decision, whether a tuned lowerer is worth keeping against the
+    /// prompted one (calibration-pending: see the map). Asks `arm` the byte-identical lowering prompts of round `n`'s live
+    /// Validation items, reads the arm and the round's own lowering
+    /// (`recorded`) against the items, and, given `floors` (three or more
+    /// prompted repeats of the recorded lowering, so the floor is lowering-only
+    /// noise), decides by [`decide_panel`] over (recorded, arm,
+    /// [`paired_floor`]). Only
+    /// the model of `arm` is unpinned; the embedder is checked. An arm answer
+    /// that is not a usable lowering scores 0 and is counted in `unusable`.
+    /// Records nothing; `arm_label` names only where the scratch packet store
+    /// lives, in the arm's directory.
+    pub fn relower<E: Embedder>(
+        &self,
+        n: u32,
+        arm_label: &str,
+        recorded: &mut dyn ModelPort,
+        arm: &mut dyn ModelPort,
+        floors: &mut [&mut dyn ModelPort],
+        scorer: &Scorer<E>,
+    ) -> Result<RelowerOutcome, RunError> {
+        check_embedder(self, scorer)?;
+        if (1..FLOOR_ARMS_MIN).contains(&floors.len()) {
+            return Err(RunError::FloorArms);
+        }
+        let dir = self.relower_dir(n, arm_label);
+        // Ports in the order the prompts are asked: recorded, floors, arm.
+        let floor_count = floors.len();
+        let mut ports: Vec<&mut dyn ModelPort> = vec![recorded];
+        for f in floors.iter_mut() {
+            let f: &mut dyn ModelPort = &mut **f;
+            ports.push(f);
+        }
+        ports.push(arm);
+        let drawn = self.read_draws(n, &dir.join("base.cc"), &mut ports, scorer)?;
+        let arm_at = floor_count + 1;
+        if drawn.waiting[1..arm_at].iter().any(|w| !w.is_empty()) {
+            return Err(RunError::FloorUnanswered);
+        }
+        if !drawn.waiting[arm_at].is_empty() {
+            return Ok(RelowerOutcome::Unanswered { prompts: drawn.waiting[arm_at].clone() });
+        }
+        let mut languages = Vec::new();
+        for l in &drawn.languages {
+            let of_port = |p: usize| -> Vec<ItemScore> { l.items.iter().map(|(_, s)| s[p].clone()).collect() };
+            let rec = of_port(0);
+            let floor_scores: Vec<Vec<ItemScore>> = (1..arm_at).map(of_port).collect();
+            languages.push(RelowerReading {
+                language: l.language.clone(),
+                n: l.items.len() as u32,
+                skipped: l.skipped,
+                unusable: l.unusable[arm_at],
+                floor_unusable: l.unusable[1..arm_at].iter().sum(),
+                recorded: reading_of(&rec)?,
+                arm: reading_of(&of_port(arm_at))?,
+                floor: if floor_count == 0 { None } else { Some(paired_floor(&rec, &floor_scores)) },
+            });
+        }
+        let verdict = if floor_count > 0 {
+            let panel: Vec<(Reading, Reading, Reading)> = languages
+                .iter()
+                .filter_map(|l| Some((l.recorded, l.arm, l.floor?)))
+                .collect();
+            Some(decide_panel(&panel))
+        } else {
+            None
+        };
+        Ok(RelowerOutcome::Read { languages, verdict })
+    }
+
+    /// Asks every port, in the order given, each live Validation item's
+    /// byte-identical lowering prompt of round `n` and scores the answers against
+    /// the items in one [`Scorer::score`] call: the one owner of per-item
+    /// scoring for [`relower`](Self::relower) and
+    /// [`calibrate`](Self::calibrate). An answer that is not a usable lowering
+    /// scores 0. Port 0 is the recorded lowering, which must be answered
+    /// (`Unrecorded` at once); any other port that is not is listed in
+    /// `waiting`, and nothing is scored. `scratch` is the packet store the
+    /// prompts are built in, removed and reopened here; its directory is
+    /// created here, after the round is found.
+    fn read_draws<E: Embedder>(
+        &self,
+        n: u32,
+        scratch: &Path,
+        ports: &mut [&mut dyn ModelPort],
+        scorer: &Scorer<E>,
+    ) -> Result<Drawn, RunError> {
+        let store = |_| RunError::Store;
+        let held = self.held_splits(n, &[Split::Validation])?;
+        let inventory = self.inventory.inventory().map_err(store)?;
+        let ontology = self.ontology.ontology().map_err(store)?;
+        if let Some(dir) = scratch.parent() {
+            std::fs::create_dir_all(dir).map_err(|e| RunError::Io(e.kind()))?;
+        }
+        for suffix in ["", ".lock"] {
+            let mut name = scratch.as_os_str().to_owned();
+            name.push(suffix);
+            let _ = std::fs::remove_file(PathBuf::from(name));
+        }
+        let mut scratch = PacketStore::open(scratch).map_err(store)?;
+
+        // Per language, per item: the item id and text, then each port's lowering
+        // (`None` when unusable or unanswered).
+        let mut waiting: Vec<Vec<String>> = vec![Vec::new(); ports.len()];
+        type Row = (String, String, Vec<Option<String>>);
+        let mut rows: Vec<Vec<Row>> = Vec::new();
+        for (_, _, items) in &held {
+            let mut language_rows = Vec::new();
+            for (item, packet) in items {
+                // An item the round could not lower has no prompt to ask; it is skipped
+                // and counted, not scored.
+                let Some(prompt) =
+                    self.lowering_prompt(&mut scratch, packet.clone(), item, &inventory, &ontology)?
+                else {
+                    continue;
+                };
+                let mut texts = Vec::new();
+                for (p, port) in ports.iter_mut().enumerate() {
+                    texts.push(match asked(&mut **port, &prompt)? {
+                        Asked::Text(t) => Some(t),
+                        Asked::Unusable => None,
+                        Asked::Waiting if p == 0 => return Err(RunError::Unrecorded),
+                        Asked::Waiting => {
+                            let d = prompt.digest();
+                            if !waiting[p].contains(&d) {
+                                waiting[p].push(d);
+                            }
+                            None
+                        }
+                    });
+                }
+                language_rows.push((item.id.as_str().to_string(), item.text.clone(), texts));
+            }
+            rows.push(language_rows);
+        }
+        if waiting.iter().any(|w| !w.is_empty()) {
+            return Ok(Drawn { languages: Vec::new(), waiting });
+        }
+
+        // One score call: each usable lowering against its item, in row order.
+        let mut inputs: Vec<ScoreInput> = Vec::new();
+        for (_, reference, texts) in rows.iter().flatten() {
+            for output in texts.iter().flatten() {
+                inputs.push(ScoreInput { reference, output });
+            }
+        }
+        let mut scores = if inputs.is_empty() {
+            Vec::new()
+        } else {
+            scorer.score(&inputs).map_err(|_| RunError::Embed)?
+        }
+        .into_iter();
+        let live = self.corpus.all().map_err(store)?;
+        let mut languages = Vec::new();
+        for ((language, _, _), language_rows) in held.iter().zip(rows) {
+            let mut unusable = vec![0u32; ports.len()];
+            let mut items = Vec::new();
+            for (id, _, texts) in language_rows {
+                let mut item_scores = Vec::new();
+                for (p, t) in texts.iter().enumerate() {
+                    item_scores.push(match t {
+                        Some(_) => scores.next().ok_or(RunError::Store)?,
+                        None => {
+                            unusable[p] += 1;
+                            ItemScore { chrf: 0.0, meaning: Some(0.0) }
+                        }
+                    });
+                }
+                items.push((id, item_scores));
+            }
+            let live_validation = live
+                .iter()
+                .filter(|i| &i.language == language && SplitScheme::V1.live(i) == Some(Split::Validation))
+                .count() as u32;
+            languages.push(DrawnLanguage {
+                language: language.clone(),
+                skipped: live_validation - items.len() as u32,
+                items,
+                unusable,
+            });
+        }
+        Ok(Drawn { languages, waiting })
+    }
+}
+
+/// One panel language of [`RunStores::read_draws`].
+struct DrawnLanguage {
+    language: String,
+    /// Live Validation items of the language with no lowering prompt.
+    skipped: u32,
+    /// Per read item in key order: its id and one score per port.
+    items: Vec<(String, Vec<ItemScore>)>,
+    /// Per port, answers that were not a usable lowering.
+    unusable: Vec<u32>,
+}
+
+struct Drawn {
+    /// Per panel language in panel order; empty while any port is waiting.
+    languages: Vec<DrawnLanguage>,
+    /// Per port, the digests of the prompts it holds no answer to.
+    waiting: Vec<Vec<String>>,
+}
+
+/// A reading over per-item scores; `NoValidation` without items.
+fn reading_of(scored: &[ItemScore]) -> Result<Reading, RunError> {
+    Reading::of(&SplitMean {
+        count: scored.len(),
+        chrf: mean(scored.iter().map(|s| s.chrf)),
+        meaning: mean(scored.iter().filter_map(|s| s.meaning)),
+    })
+    .ok_or(RunError::NoValidation)
+}
+
+/// How trials of one kind read: counts, not rates.
+#[derive(Clone, Copy, Debug, Default, PartialEq, Eq)]
+pub struct Counts {
+    pub trials: u32,
+    pub accepted: u32,
+    pub nogain: u32,
+    pub regressed: u32,
+}
+
+impl Counts {
+    fn tally(&mut self, v: Verdict) {
+        self.trials += 1;
+        match v {
+            Verdict::Accepted => self.accepted += 1,
+            Verdict::Rejected(Why::Regressed(_)) => self.regressed += 1,
+            Verdict::Rejected(_) => self.nogain += 1,
+        }
+    }
+
+    /// The `trials=.. nogain=.. accepted=.. regressed=..` text of a calibrate line.
+    pub fn line(&self) -> String {
+        format!("trials={} nogain={} accepted={} regressed={}", self.trials, self.nogain, self.accepted, self.regressed)
+    }
+
+    fn plus(self, o: Counts) -> Counts {
+        Counts {
+            trials: self.trials + o.trials,
+            accepted: self.accepted + o.accepted,
+            nogain: self.nogain + o.nogain,
+            regressed: self.regressed + o.regressed,
+        }
+    }
+}
+
+/// What [`calibration_trials`] counted over one set of items.
+#[derive(Clone, Debug, PartialEq)]
+pub struct Trials {
+    /// Ordered (base, candidate) pairs of prompted draws, each over every floor:
+    /// the sum of the three counts below.
+    pub prompted: Counts,
+    /// The prompted trials whose candidate is the recorded lowering `R` (port 0).
+    /// `R` comes from the round, not from `relower`, so it is not exchangeable
+    /// with a repeat: every false accept of a grown-corpus calibration lived here.
+    pub r_candidate: Counts,
+    /// The prompted trials whose base is `R`.
+    pub r_base: Counts,
+    /// The prompted trials with `R` neither base nor candidate (it may sit in
+    /// the floor): the exchangeable repeats.
+    pub r_free: Counts,
+    /// Per degraded arm in the order given: the arm as the candidate.
+    pub degraded: Vec<Counts>,
+    /// Every candidate arm as the candidate, pooled: the sum of `candidate_arms`.
+    pub candidate: Counts,
+    /// Per candidate arm in the order given: the arm as the candidate. Arms of
+    /// one kind can pool unlike draws, so the pooled count is not a power.
+    pub candidate_arms: Vec<Counts>,
+    /// Per degraded arm in the order given, per language: the arm's composite
+    /// minus the mean composite of the prompted draws (the recorded lowering
+    /// included), over the items read. NaN where a language has no items.
+    pub degraded_offset: Vec<Vec<f64>>,
+    /// The mean of [`panel_noise`] over every (base, floor) choice.
+    pub noise: f64,
+}
+
+impl Trials {
+    /// The prompted trials by the recorded lowering `R`'s role, labelled as the
+    /// calibrate lines print them.
+    pub fn r_roles(&self) -> [(&'static str, Counts); 3] {
+        [("r-candidate", self.r_candidate), ("r-base", self.r_base), ("r-free", self.r_free)]
+    }
+}
+
+/// Every `k`-subset of `pool`, in order.
+fn subsets(pool: &[usize], k: usize) -> Vec<Vec<usize>> {
+    if k == 0 {
+        return vec![Vec::new()];
+    }
+    let mut out = Vec::new();
+    for (i, &first) in pool.iter().enumerate() {
+        for mut rest in subsets(&pool[i + 1..], k - 1) {
+            rest.insert(0, first);
+            out.push(rest);
+        }
+    }
+    out
+}
+
+/// The accept rule replayed over draws that are all lowerings of one round, as
+/// the live loop would meet them: [`decide_panel`] over (base, candidate,
+/// [`paired_floor`] of the base against `FLOOR_ARMS_MIN` other prompted draws),
+/// one row per language. `draws` is `[port][language][item]`; ports
+/// `0..prompted` are prompted draws (the recorded lowering first), then
+/// `degraded` and `candidate` ports follow. A language with no items reads
+/// NaN, which fails closed.
+pub fn calibration_trials(
+    draws: &[Vec<Vec<ItemScore>>],
+    prompted: usize,
+    degraded: usize,
+    candidate: usize,
+) -> Trials {
+    let languages = draws.first().map_or(0, Vec::len);
+    let rows = |b: usize, c: usize, floors: &[usize]| -> Vec<(Reading, Reading, Reading)> {
+        let read = |scores: &[ItemScore]| {
+            reading_of(scores).unwrap_or(Reading { chrf: f64::NAN, meaning: f64::NAN, composite: f64::NAN })
+        };
+        (0..languages)
+            .map(|l| {
+                let arms: Vec<Vec<ItemScore>> = floors.iter().map(|&f| draws[f][l].clone()).collect();
+                (read(&draws[b][l]), read(&draws[c][l]), paired_floor(&draws[b][l], &arms))
+            })
+            .collect()
+    };
+    let pool: Vec<usize> = (0..prompted).collect();
+    let without = |out: &[usize]| -> Vec<usize> { pool.iter().copied().filter(|p| !out.contains(p)).collect() };
+    let (mut r_candidate, mut r_base, mut r_free) = (Counts::default(), Counts::default(), Counts::default());
+    let mut candidate_arms = vec![Counts::default(); candidate];
+    let mut degraded_counts = vec![Counts::default(); degraded];
+    let (mut noise, mut noises) = (0.0, 0u32);
+    for &b in &pool {
+        for floors in subsets(&without(&[b]), FLOOR_ARMS_MIN) {
+            for (d, counts) in degraded_counts.iter_mut().enumerate() {
+                counts.tally(decide_panel(&rows(b, prompted + d, &floors)));
+            }
+            for c in prompted + degraded..prompted + degraded + candidate {
+                candidate_arms[c - prompted - degraded].tally(decide_panel(&rows(b, c, &floors)));
+            }
+            noise += panel_noise(&rows(b, b, &floors));
+            noises += 1;
+        }
+        for &c in pool.iter().filter(|&&c| c != b) {
+            for floors in subsets(&without(&[b, c]), FLOOR_ARMS_MIN) {
+                let side = if c == 0 { &mut r_candidate } else if b == 0 { &mut r_base } else { &mut r_free };
+                side.tally(decide_panel(&rows(b, c, &floors)));
+            }
+        }
+    }
+    Trials {
+        prompted: r_candidate.plus(r_base).plus(r_free),
+        r_candidate,
+        r_base,
+        r_free,
+        degraded: degraded_counts,
+        candidate: candidate_arms.iter().fold(Counts::default(), |a, &k| a.plus(k)),
+        candidate_arms,
+        degraded_offset: (0..degraded)
+            .map(|d| {
+                (0..languages)
+                    .map(|l| {
+                        let composite = |p: usize| {
+                            reading_of(&draws[p][l]).map_or(f64::NAN, |r| r.composite)
+                        };
+                        composite(prompted + d) - pool.iter().map(|&p| composite(p)).sum::<f64>() / prompted as f64
+                    })
+                    .collect()
+            })
+            .collect(),
+        noise: noise / f64::from(noises),
+    }
+}
+
+/// One panel language of a class: items read and live Validation items of the
+/// class not read.
+#[derive(Clone, Debug, PartialEq, Eq)]
+pub struct ClassLanguage {
+    pub language: String,
+    pub n: u32,
+    pub skipped: u32,
+}
+
+/// The trials over one class of items.
+#[derive(Clone, Debug, PartialEq)]
+pub struct ClassTrials {
+    pub name: String,
+    pub languages: Vec<ClassLanguage>,
+    pub trials: Trials,
+}
+
+impl ClassTrials {
+    /// The text after `calibrate class=NAME ` of each degraded arm's line, one
+    /// per `labels` entry: its Regressed count and its composite offset from the
+    /// prompted mean in each language of the class.
+    pub fn degraded_lines(&self, labels: &[String]) -> Vec<String> {
+        let t = &self.trials;
+        labels
+            .iter()
+            .zip(&t.degraded)
+            .zip(&t.degraded_offset)
+            .map(|((label, d), offsets)| {
+                let offsets: String =
+                    self.languages.iter().zip(offsets).map(|(l, o)| format!(" offset {}={o:+.4}", l.language)).collect();
+                format!("degraded={label} trials={} regressed={}{offsets}", d.trials, d.regressed)
+            })
+            .collect()
+    }
+}
+
+#[derive(Debug)]
+pub enum CalibrateOutcome {
+    /// Draw labels with the number of prompts each has no answer to.
+    Unanswered(Vec<(String, u32)>),
+    /// `unusable` over every prompted, degraded and candidate draw; `all` first,
+    /// then the classes in the order given.
+    Read { unusable: u32, classes: Vec<ClassTrials> },
+}
+
+impl RunStores {
+    /// Replays the accept rule over answered relower draws: reads every draw of
+    /// round `n` (the recorded lowering and the `relower-<n>-<label>`
+    /// directories, through [`RecordedAnswers`] only, so nothing is written
+    /// there) with [`read_draws`](Self::read_draws), and counts
+    /// [`calibration_trials`] over all items and over each class, a class being
+    /// the items whose key starts with any of its prefixes. See
+    /// `docs/calibration.md`. Records nothing; the scratch packet store is
+    /// `<root>/calibrate-<n>/base.cc`.
+    pub fn calibrate<E: Embedder>(
+        &self,
+        n: u32,
+        prompted: &[String],
+        degraded: &[String],
+        candidate: &[String],
+        classes: &[(String, Vec<String>)],
+        scorer: &Scorer<E>,
+    ) -> Result<CalibrateOutcome, RunError> {
+        check_embedder(self, scorer)?;
+        let labels: Vec<&String> = prompted.iter().chain(degraded).chain(candidate).collect();
+        let mut recorded =
+            RecordedAnswers::new(self.root.join(format!("round-{n}")), self.record.model.clone());
+        let mut draws: Vec<RecordedAnswers> = labels
+            .iter()
+            .map(|l| RecordedAnswers::new(self.relower_dir(n, l), self.record.model.clone()))
+            .collect();
+        let mut ports: Vec<&mut dyn ModelPort> = vec![&mut recorded];
+        for d in draws.iter_mut() {
+            ports.push(d);
+        }
+        let dir = self.root.join(format!("calibrate-{n}"));
+        let drawn = self.read_draws(n, &dir.join("base.cc"), &mut ports, scorer)?;
+        let missing: Vec<(String, u32)> = labels
+            .iter()
+            .zip(&drawn.waiting[1..])
+            .filter(|(_, w)| !w.is_empty())
+            .map(|(l, w)| ((*l).clone(), w.len() as u32))
+            .collect();
+        if !missing.is_empty() {
+            return Ok(CalibrateOutcome::Unanswered(missing));
+        }
+        let live = self.corpus.all().map_err(|_| RunError::Store)?;
+        let everything = [("all".to_string(), vec![String::new()])];
+        let mut out = Vec::new();
+        for (name, prefixes) in everything.iter().chain(classes) {
+            let keep = |id: &str| prefixes.iter().any(|p| id.starts_with(p.as_str()));
+            let mut by_port: Vec<Vec<Vec<ItemScore>>> = vec![Vec::new(); ports.len()];
+            let mut languages = Vec::new();
+            for l in &drawn.languages {
+                let items: Vec<&Vec<ItemScore>> =
+                    l.items.iter().filter(|(id, _)| keep(id)).map(|(_, s)| s).collect();
+                for (p, port) in by_port.iter_mut().enumerate() {
+                    port.push(items.iter().map(|s| s[p].clone()).collect());
+                }
+                let in_class = live
+                    .iter()
+                    .filter(|i| {
+                        i.language == l.language
+                            && SplitScheme::V1.live(i) == Some(Split::Validation)
+                            && keep(i.id.as_str())
+                    })
+                    .count() as u32;
+                languages.push(ClassLanguage {
+                    language: l.language.clone(),
+                    n: items.len() as u32,
+                    skipped: in_class - items.len() as u32,
+                });
+            }
+            out.push(ClassTrials {
+                name: name.clone(),
+                languages,
+                trials: calibration_trials(&by_port, prompted.len() + 1, degraded.len(), candidate.len()),
+            });
+        }
+        let unusable = drawn.languages.iter().map(|l| l.unusable[1..].iter().sum::<u32>()).sum();
+        Ok(CalibrateOutcome::Read { unusable, classes: out })
+    }
+}
+
 /// The distinct rule codes an admission refusal broke: validator rules by
 /// code, a store refusal by its variant name. Nothing from the packet or the
 /// stores is kept; an I/O failure is `io`.
@@ -1424,6 +2215,11 @@ fn check_drift<M: ModelPort + ?Sized, E: Embedder>(
     if model.model() != run.record.model {
         return Err(RunError::Drift(DriftOf::Model));
     }
+    check_embedder(run, scorer)
+}
+
+/// The embedder the run pinned is the one scoring.
+fn check_embedder<E: Embedder>(run: &RunStores, scorer: &Scorer<E>) -> Result<(), RunError> {
     if scorer.embedder().model() != run.record.embedder {
         return Err(RunError::Drift(DriftOf::Embedder));
     }
@@ -1444,6 +2240,7 @@ fn score_round<M: ModelPort, E: Embedder>(
 ) -> Result<RoundOutcome, RunError> {
     let store = |_| RunError::Store;
     let inventory = inventory_store.inventory().map_err(store)?;
+    let ontology = run.ontology.ontology().map_err(store)?;
     let rev = inventory.latest().ok_or(RunError::NoInventory)?.n;
 
     let train = run.train().map_err(store)?;
@@ -1459,7 +2256,8 @@ fn score_round<M: ModelPort, E: Embedder>(
                 answers.push((offer.key().to_string(), None))
             }
             Err(PortError::Unanswered) => unanswered.push(prompt.digest()),
-            Err(PortError::Io(kind)) => return Err(RunError::Io(kind)),
+            Err(PortError::Withheld) => return Err(RunError::Withheld),
+        Err(PortError::Io(kind)) => return Err(RunError::Io(kind)),
         }
         calls.push(Call {
             prompt: prompt.digest(),
@@ -1520,19 +2318,23 @@ fn score_round<M: ModelPort, E: Embedder>(
     // Phase 2: one lowering prompt per admitted view, answered through the
     // port. Nothing is kept unless every one is answered.
     let mut unanswered = Vec::new();
-    for (at, id, packet_key, view) in &admitted {
+    for (at, id, packet_key, view) in admitted {
         // Each item is lowered in its own language: the only reference the
         // scorer has is the item's own text.
-        let language = &items[*at].language;
-        let Ok(prompt) = Prompt::lower(view, id, language, &inventory, &run.entities) else {
-            fates[*at] = Fate::Refused(Stage::Lower, Some(packet_key.clone()));
+        let language = &items[at].language;
+        let Ok(view) = run.assembled(view, inventory_store) else {
+            fates[at] = Fate::Refused(Stage::Lower, Some(packet_key.clone()));
+            continue;
+        };
+        let Ok(prompt) = Prompt::lower(&view, &id, &items[at].speaker, language, &inventory, &run.entities, &ontology) else {
+            fates[at] = Fate::Refused(Stage::Lower, Some(packet_key.clone()));
             continue;
         };
         calls.push(Call {
             prompt: prompt.digest(),
             items: prompt.item_keys().to_vec(),
         });
-        fates[*at] = match model.answer(&prompt) {
+        fates[at] = match model.answer(&prompt) {
             Ok(answer) => match LoweringDraft::parse(&answer) {
                 Ok(draft) if draft.usable() => {
                     Fate::Lowered(draft.text, packet_key.clone())
@@ -1549,6 +2351,10 @@ fn score_round<M: ModelPort, E: Embedder>(
                 }
                 continue;
             }
+            Err(PortError::Withheld) => {
+                discard_packets(dir);
+                return Err(RunError::Withheld);
+            }
             Err(PortError::Io(kind)) => {
                 discard_packets(dir);
                 return Err(RunError::Io(kind));
@@ -1606,6 +2412,7 @@ fn score_round<M: ModelPort, E: Embedder>(
 
     let mut train_rows = Vec::new();
     let mut languages: Vec<LanguageRound> = Vec::new();
+    let mut validation_scores: Vec<LanguageScores> = Vec::new();
     for tag in &run.record.panel {
         let of: Vec<(&CorpusItem, ItemScore)> = scored
             .iter()
@@ -1613,6 +2420,10 @@ fn score_round<M: ModelPort, E: Embedder>(
             .cloned()
             .collect();
         let means = aggregate(&of);
+        validation_scores.push(LanguageScores {
+            language: tag.clone(),
+            scores: validation_items(&of),
+        });
         languages.push(LanguageRound {
             language: tag.clone(),
             train_mean: means.train,
@@ -1690,10 +2501,17 @@ fn score_round<M: ModelPort, E: Embedder>(
             .collect(),
         own_family,
         languages,
+        validation_scores,
     };
     Ok(RoundOutcome::Recorded(record))
 }
 
+/// The composite of one chrF (0 to 100) and one meaning: their mean, chrF as a
+/// fraction. The one formula for a split mean's [`Reading`] and a per-item score.
+fn composite_of(chrf: f64, meaning: f64) -> f64 {
+    (chrf / 100.0 + meaning) / 2.0
+}
+
 /// One validation reading: chrF 0 to 100, meaning 0 to 1, and their composite.
 #[derive(Clone, Copy, Debug, PartialEq, Serialize, Deserialize, JsonSchema)]
 pub struct Reading {
@@ -1714,7 +2532,7 @@ impl Reading {
         Some(Self {
             chrf,
             meaning,
-            composite: (chrf / 100.0 + meaning) / 2.0,
+            composite: composite_of(chrf, meaning),
         })
     }
 }
@@ -1766,8 +2584,11 @@ fn nano(x: f64) -> i64 {
 /// otherwise read as unchanged); a metric that falls by more than its
 /// tolerance (the floor, at least one step) regresses that metric; the
 /// composite falling by more than max(its floor, one [`LADDER_STEP`])
-/// regresses the composite. Means count a refused Validation item as 0, so
-/// refusing a weak item cannot raise a reading. Differences are compared in
+/// regresses the composite. Regression compares the readings it is given
+/// and counts nothing itself: a round's reading counts a refused item as 0
+/// ([`round`], `score_round`), so refusing a weak item cannot
+/// raise it, while a relower or calibrate reading is over the items that have a
+/// lowering prompt only and counts the rest in `skipped`, not as 0. Differences are compared in
 /// billionths ([`nano`]), so a fall of exactly the tolerance is a tie.
 fn regression(base: &Reading, candidate: &Reading, floor: &Reading) -> Option<Metric> {
     let finite = |r: &Reading| r.chrf.is_finite() && r.meaning.is_finite() && r.composite.is_finite();
@@ -1803,7 +2624,11 @@ pub fn decide(base: &Reading, candidate: &Reading, floor: &Reading) -> Verdict {
 /// decides whether a language regressed (any regression rejects; the first in
 /// panel order names the metric), and the gain test is [`decide`]'s for one
 /// language and, for two or more, the panel's: the sum over languages of the
-/// composite deltas (billionths) must exceed one [`LADDER_STEP`]. A language
+/// composite deltas (billionths) must exceed the larger of one [`LADDER_STEP`]
+/// and the noise of that sum, the root of the languages' composite floors
+/// squared (independent languages; a one-language panel's noise is its floor,
+/// as in [`decide`]). Without that noise term a prompted repeat of the base
+/// lowering read Accepted in 40% of the calibration trials on `distil-base` at `FLOOR_Z` 3. A language
 /// may lose up to its own noise floor if the panel nets more than a step; the
 /// rule gives up strict Pareto non-regression, which on noisy per-language
 /// readings ratchets every base to a favourable draw and strangles the loop
@@ -1831,13 +2656,21 @@ pub fn decide_panel(rows: &[(Reading, Reading, Reading)]) -> Verdict {
         .iter()
         .map(|(base, candidate, _)| nano(candidate.composite - base.composite))
         .sum();
-    if net > nano(LADDER_STEP) {
+    if net > nano(panel_noise(rows).max(LADDER_STEP)) {
         Verdict::Accepted
     } else {
         Verdict::Rejected(Why::NoGain)
     }
 }
 
+/// The noise of a sum of independent languages' differences: the root of the
+/// sum of their composite floors squared, over one `(base, candidate, floor)`
+/// row per language. A one-language panel's noise is its floor. The one owner
+/// of the term, for [`decide_panel`] and the calibration.
+pub fn panel_noise(rows: &[(Reading, Reading, Reading)]) -> f64 {
+    rows.iter().map(|(_, _, floor)| floor.composite.powi(2)).sum::<f64>().sqrt()
+}
+
 /// One panel language's row of a cycle: the head's Validation reading, the
 /// candidate's (none when the edit never reached a round), the language's
 /// measured floor and the threshold derived from it. The threshold decides only
@@ -2000,40 +2833,97 @@ pub enum CycleOutcome {
     Decided(Decision),
 }
 
-/// The spread of each panel language's Validation reading between rounds 1 and
-/// 2: two independent encodings under the run's first inventory and one spec,
-/// measured once per run, in panel order.
+/// The cycle's noise floor, per panel language in panel order: [`paired_floor`]
+/// of round 1 (the recorded lowering, the head's establishing round) against
+/// rounds 2 to [`FLOOR_ARMS_MIN`] + 1 (the prompted repeats), each round's
+/// private per-item Validation scores. A replicate is a round with no cycle
+/// under the run's first inventory; the floor is measured once per run. A
+/// replicate that is missing, or holds no scores for a language, is
+/// [`RunError::NoFloor`].
 fn floor_of(
     rounds: &[RoundRecord],
     record: &RunRecord,
 ) -> Result<Vec<(String, Reading)>, RunError> {
-    let replicate = |n: u32, tag: &str| {
-        let round = rounds
+    let replicate = |n: u32| {
+        rounds
             .iter()
             .find(|r| {
                 r.n == n && r.cycle.is_none() && r.inventory_digest == record.inventory_digest
             })
-            .ok_or(RunError::NoFloor)?;
-        let language = round.language(tag).ok_or(RunError::NoValidation)?;
-        Reading::of(&language.validation_mean).ok_or(RunError::NoValidation)
+            .ok_or(RunError::NoFloor)
     };
+    let replicates = (1..=FLOOR_ARMS_MIN as u32 + 1)
+        .map(replicate)
+        .collect::<Result<Vec<_>, _>>()?;
     record
         .panel
         .iter()
         .map(|tag| {
-            let (a, b) = (replicate(1, tag)?, replicate(2, tag)?);
-            Ok((
-                tag.clone(),
-                Reading {
-                    chrf: (a.chrf - b.chrf).abs(),
-                    meaning: (a.meaning - b.meaning).abs(),
-                    composite: (a.composite - b.composite).abs(),
-                },
-            ))
+            let language = replicates[0].language(tag).ok_or(RunError::NoValidation)?;
+            Reading::of(&language.validation_mean).ok_or(RunError::NoValidation)?;
+            let scores = |round: &RoundRecord| {
+                round
+                    .validation_scores
+                    .iter()
+                    .find(|s| &s.language == tag)
+                    .map(|s| s.scores.clone())
+                    .ok_or(RunError::NoFloor)
+            };
+            let recorded = scores(replicates[0])?;
+            let arms = replicates[1..]
+                .iter()
+                .map(|r| scores(r))
+                .collect::<Result<Vec<_>, _>>()?;
+            Ok((tag.clone(), paired_floor(&recorded, &arms)))
         })
         .collect()
 }
 
+/// How many standard errors of a prompted-vs-prompted mean difference the
+/// relower floor is wide, and the fewest floor arms (prompted repeats of the
+/// recorded lowering) it is measured over. Calibrated on `runs/distil-base`
+/// (eight prompted draws of 14 en-US and 14 ja-JP Validation items, 28
+/// unordered pairs): with three floor arms a prompted repeat reads NoGain in
+/// 92% of the trials (bootstrap 95% over draws 80 to 100%), Regressed 8% and
+/// Accepted 0%; a "Yes." arm and a mild degradation (one detail blurred per
+/// utterance) read Regressed in 100% (each a single fixed draw), and a subtler
+/// one in 75% (50 to 100%): at 14 items a mean composite drop near 0.04 against
+/// a floor near 0.06 is flagged only some of the time. `FLOOR_Z` was chosen on
+/// that data, so the rates are in-sample.
+pub const FLOOR_Z: f64 = 3.0;
+pub const FLOOR_ARMS_MIN: usize = 3;
+
+/// The lowering-only noise floor of a relower: `FLOOR_Z` standard errors of the
+/// mean per-item difference between the recorded lowering and a repeat of it,
+/// metric by metric. Each floor arm gives one paired sample of per-item
+/// differences; their variances are pooled over the arms, so the floor rests on
+/// `arms * (n - 1)` degrees of freedom instead of the one coincidental
+/// difference of means a two-run spread is (which reads 0 whenever the two
+/// means happen to meet, and then a one-step dip regresses). Paired per item,
+/// after Koehn (2004). NaN (fail closed in [`decide`]) when there are fewer
+/// than two items or no arm (0/0), and when an arm is ragged.
+pub fn paired_floor(recorded: &[ItemScore], arms: &[Vec<ItemScore>]) -> Reading {
+    let n = recorded.len();
+    if n < 2 || arms.iter().any(|a| a.len() != n) {
+        return Reading { chrf: f64::NAN, meaning: f64::NAN, composite: f64::NAN };
+    }
+    let pooled = |of: &dyn Fn(&ItemScore) -> f64| {
+        let variance = |arm: &Vec<ItemScore>| {
+            let d: Vec<f64> = recorded.iter().zip(arm).map(|(r, a)| of(r) - of(a)).collect();
+            let mean = d.iter().sum::<f64>() / n as f64;
+            d.iter().map(|x| (x - mean).powi(2)).sum::<f64>() / (n - 1) as f64
+        };
+        let v = arms.iter().map(variance).sum::<f64>() / arms.len() as f64;
+        FLOOR_Z * (v / n as f64).sqrt()
+    };
+    let meaning = |s: &ItemScore| s.meaning.unwrap_or(0.0);
+    Reading {
+        chrf: pooled(&|s| s.chrf),
+        meaning: pooled(&meaning),
+        composite: pooled(&|s| composite_of(s.chrf, meaning(s))),
+    }
+}
+
 /// Each panel language's Validation reading in `round`, in panel order.
 fn readings_of(
     round: &RoundRecord,
@@ -2096,6 +2986,7 @@ pub fn cycle<M: ModelPort, E: Embedder>(
                 prompts: vec![prompt.digest()],
             });
         }
+        Err(PortError::Withheld) => return Err(RunError::Withheld),
         Err(PortError::Io(kind)) => return Err(RunError::Io(kind)),
     };
 
@@ -2137,7 +3028,7 @@ pub fn cycle<M: ModelPort, E: Embedder>(
     let Some(draft) = answer.as_deref().and_then(|a| EditDraft::parse(a).ok()) else {
         return reject(run, Why::EditParse);
     };
-    let Some((revision, entries)) = draft.into_revision(&inventory, base_rev) else {
+    let Some((revision, entries)) = draft.into_revision(&inventory, base_rev, MAX_EDIT_CHANGES) else {
         return reject(run, Why::EditAdmit);
     };
     let candidate_rev = revision.n;
@@ -2219,10 +3110,124 @@ fn discard_inventory(dir: &Path) {
     }
 }
 
+#[cfg(test)]
+mod mutants;
+
 #[cfg(test)]
 mod tests {
     use super::*;
 
+    fn scored(chrf: f64, meaning: f64) -> ItemScore {
+        ItemScore { chrf, meaning: Some(meaning) }
+    }
+
+    /// A draw over `[language][item]`: `base` plus a per-draw, per-item wobble.
+    fn draw(languages: usize, items: usize, base: f64, wobble: f64, seed: usize) -> Vec<Vec<ItemScore>> {
+        (0..languages)
+            .map(|l| {
+                (0..items)
+                    .map(|i| {
+                        let w = wobble * (((i * 7 + seed * 3 + l) % 5) as f64 - 2.0) / 2.0;
+                        scored((100.0 * (base + w)).clamp(0.0, 100.0), (base + w).clamp(0.0, 1.0))
+                    })
+                    .collect()
+            })
+            .collect()
+    }
+
+    /// A wobble-free draw whose items all score `bases[language]` (chrF as a percentage, meaning as a fraction).
+    fn flat(bases: [f64; 2], items: usize) -> Vec<Vec<ItemScore>> {
+        bases.iter().map(|&b| (0..items).map(|_| scored(100.0 * b, b)).collect()).collect()
+    }
+
+    #[test]
+    fn arm_reports_attribute_each_arm_and_language() {
+        // R (port 0) is above the five other prompted draws; the two languages differ everywhere.
+        let mut draws = vec![flat([0.8, 0.7], 8)];
+        draws.extend((0..5).map(|_| flat([0.6, 0.6], 8)));
+        // Degraded arms: composites differ per arm and per language.
+        draws.push(flat([0.5, 0.2], 8));
+        draws.push(flat([0.1, 0.4], 8));
+        // Candidate arms: far above, level with the prompted, far below.
+        draws.push(flat([0.95, 0.95], 8));
+        draws.push(flat([0.6, 0.6], 8));
+        draws.push(flat([0.05, 0.05], 8));
+        let t = calibration_trials(&draws, 6, 2, 3);
+        // Offsets: arm minus the mean over all six prompted ports (R included): en 0.6333, ja 0.6167.
+        let want = [[0.5 - 3.8 / 6.0, 0.2 - 3.7 / 6.0], [0.1 - 3.8 / 6.0, 0.4 - 3.7 / 6.0]];
+        for (got, want) in t.degraded_offset.iter().flatten().zip(want.iter().flatten()) {
+            assert!((got - want).abs() < 1e-9, "{:?} against {want:?}", t.degraded_offset);
+        }
+        // Each arm keeps its own counts: the high arm gains, the level one gains nothing, the low one regresses.
+        let [high, level, low] = [t.candidate_arms[0], t.candidate_arms[1], t.candidate_arms[2]];
+        assert_eq!((high.trials, level.trials, low.trials), (60, 60, 60));
+        assert_eq!(high.accepted, 60);
+        assert_eq!(level.accepted, 0);
+        assert_eq!(low.regressed, 60);
+        assert_eq!(t.candidate, high.plus(level).plus(low));
+        // The printed lines keep each arm with its label and each offset with its language.
+        let class = ClassTrials {
+            name: "all".into(),
+            languages: ["en-US", "ja-JP"].map(|l| ClassLanguage { language: l.into(), n: 8, skipped: 0 }).into(),
+            trials: t,
+        };
+        let lines = class.degraded_lines(&["mild-1".to_string(), "mild-2".to_string()]);
+        assert_eq!(lines[0], "degraded=mild-1 trials=60 regressed=60 offset en-US=-0.1333 offset ja-JP=-0.4167");
+        assert_eq!(lines[1], "degraded=mild-2 trials=60 regressed=60 offset en-US=-0.5333 offset ja-JP=-0.2167");
+    }
+
+    #[test]
+    fn calibration_trials_count_every_choice_and_read_the_fixed_cases() {
+        // Six prompted draws, two degraded, three candidates, two languages of 8 items.
+        let mut draws: Vec<_> = (0..6).map(|s| draw(2, 8, 0.6, 0.02, s)).collect();
+        draws.extend((0..2).map(|_| draw(2, 8, 0.0, 0.0, 0)));
+        draws.extend((0..3).map(|s| draw(2, 8, 0.8, 0.02, s)));
+        let t = calibration_trials(&draws, 6, 2, 3);
+        assert_eq!(t.prompted.trials, 120);
+        // R is port 0: 20 pairs with R as candidate, 20 as base, 20 between the other five, 4 floors each.
+        assert_eq!((t.r_candidate.trials, t.r_base.trials, t.r_free.trials), (20, 20, 80));
+        assert_eq!(t.prompted.trials, t.r_candidate.trials + t.r_base.trials + t.r_free.trials);
+        assert_eq!(t.degraded.iter().map(|d| d.trials).collect::<Vec<_>>(), [60, 60]);
+        assert_eq!(t.candidate.trials, 6 * 10 * 3);
+        assert!(t.noise > 0.0);
+        // An all-zero draw regresses against any base, in every trial.
+        assert!(t.degraded.iter().all(|d| d.regressed == d.trials));
+        // A far better draw is accepted in every trial.
+        assert_eq!(t.candidate.accepted, t.candidate.trials);
+
+        // Per-arm candidate counts sum to the pooled ones; a degraded draw of
+        // all zeros sits below the prompted mean (0.6 chrF and meaning) in both languages.
+        assert_eq!(t.candidate_arms.len(), 3);
+        assert_eq!(t.candidate_arms.iter().map(|k| k.trials).sum::<u32>(), t.candidate.trials);
+        assert_eq!(t.candidate_arms.iter().fold(Counts::default(), |a, &k| a.plus(k)), t.candidate);
+        assert_eq!((t.degraded_offset.len(), t.degraded_offset[0].len()), (2, 2));
+        assert!(t.degraded_offset.iter().flatten().all(|o| (*o + 0.6).abs() < 0.05), "{:?}", t.degraded_offset);
+        // R (port 0) scores above the other prompted draws: it is Accepted as a
+        // candidate and Regressed as a base, and the trials without it read NoGain.
+        let mut r_high: Vec<_> = (0..6).map(|s| draw(2, 8, if s == 0 { 0.8 } else { 0.6 }, 0.02, s)).collect();
+        let t = calibration_trials(&r_high, 6, 0, 0);
+        let [(cl, c), (bl, b), (fl, f)] = t.r_roles();
+        assert_eq!((cl, bl, fl), ("r-candidate", "r-base", "r-free"));
+        assert_eq!((c.accepted, c.regressed), (c.trials, 0));
+        assert_eq!((b.regressed, b.accepted), (b.trials, 0));
+        assert_eq!((f.nogain, f.trials), (80, 80));
+        assert_eq!(b.line(), "trials=20 nogain=0 accepted=0 regressed=20");
+        assert_eq!(c.line(), "trials=20 nogain=0 accepted=20 regressed=0");
+        assert_eq!(f.line(), "trials=80 nogain=80 accepted=0 regressed=0");
+        r_high.clear();
+
+        // Identical prompted draws: nothing to gain, nothing regressed, no noise.
+        let same: Vec<_> = (0..6).map(|_| draw(2, 8, 0.6, 0.02, 1)).collect();
+        let t = calibration_trials(&same, 6, 0, 0);
+        assert_eq!((t.prompted.trials, t.prompted.nogain), (120, 120));
+        assert_eq!(t.noise, 0.0);
+
+        // A class of one item has no floor: every trial fails closed.
+        let one: Vec<_> = (0..6).map(|s| draw(2, 1, 0.6, 0.02, s)).collect();
+        let t = calibration_trials(&one, 6, 0, 0);
+        assert_eq!((t.prompted.trials, t.prompted.regressed), (120, 120));
+    }
+
     /// The twin of the `RoundRecord` literal in its compile_fail doctest: the
     /// same fields, compiling here because the fields are private to this module.
     #[test]
@@ -2244,6 +3249,7 @@ mod tests {
             parse_reasons: vec![],
             own_family: 0,
             languages: vec![],
+            validation_scores: vec![],
         };
         assert_eq!(r.n(), 1);
     }
@@ -2405,6 +3411,55 @@ mod tests {
         assert_eq!(decide(&base, &gain(0.506), &floor), rejected(Why::NoGain));
     }
 
+    #[test]
+    fn paired_floor_is_z_standard_errors_of_the_paired_difference() {
+        let item = |chrf: f64, meaning: f64| ItemScore { chrf, meaning: Some(meaning) };
+        let recorded = [item(60.0, 0.8), item(40.0, 0.6), item(50.0, 0.7), item(30.0, 0.5)];
+        // An arm that differs by a constant has no spread of differences: a
+        // shifted mean is the thing the floor is read against, not noise.
+        let shifted: Vec<ItemScore> = recorded.iter().map(|s| item(s.chrf - 5.0, s.meaning.unwrap() - 0.1)).collect();
+        let f = paired_floor(&recorded, &[shifted.clone(), shifted.clone(), shifted]);
+        assert!(f.chrf.abs() < 1e-9 && f.meaning.abs() < 1e-9 && f.composite.abs() < 1e-9, "{f:?}");
+        // Differences 2, -2, 2, -2 on chrF: sample variance 16/3, standard error
+        // sqrt(16/3/4), FLOOR_Z of it; arms pool, so a second equal arm changes nothing.
+        let wobble_arm = |recorded: &[ItemScore]| -> Vec<ItemScore> {
+            recorded
+                .iter()
+                .enumerate()
+                .map(|(i, s)| item(s.chrf - if i % 2 == 0 { 2.0 } else { -2.0 }, s.meaning.unwrap()))
+                .collect()
+        };
+        let wobble = wobble_arm(&recorded);
+        let want = FLOOR_Z * (16.0_f64 / 3.0 / 4.0).sqrt();
+        let one = paired_floor(&recorded, std::slice::from_ref(&wobble));
+        let two = paired_floor(&recorded, &[wobble.clone(), wobble.clone()]);
+        assert!((one.chrf - want).abs() < 1e-9 && (two.chrf - want).abs() < 1e-9, "{one:?} {two:?}");
+        assert!(one.meaning.abs() < 1e-9);
+        // Composite per item is (chrF / 100 + meaning) / 2: the wobble moves chrF
+        // by 2 and meaning by 0, so the composite wobbles by 0.01.
+        assert!((one.composite - FLOOR_Z * (0.01_f64 * 0.01 * 4.0 / 3.0 / 4.0).sqrt()).abs() < 1e-9, "{one:?}");
+        // Arms pool by the mean of their variances: one wobbling arm and one
+        // exact repeat give the root of half the variance.
+        let exact = recorded.to_vec();
+        let mixed = paired_floor(&recorded, &[wobble.clone(), exact]);
+        assert!((mixed.chrf - FLOOR_Z * (16.0_f64 / 3.0 / 2.0 / 4.0).sqrt()).abs() < 1e-9, "{mixed:?}");
+        // The calibrated constants, pinned apart from the formula.
+        assert_eq!((FLOOR_Z, FLOOR_ARMS_MIN), (3.0, 3));
+        // Under two items, no arms or a ragged arm there is no floor: NaN fails
+        // closed in `decide`.
+        for f in [
+            paired_floor(&recorded[..1], &[vec![item(1.0, 1.0)]]),
+            paired_floor(&recorded, &[]),
+            paired_floor(&recorded, &[vec![item(1.0, 1.0)]]),
+        ] {
+            assert!(f.composite.is_nan());
+            assert_eq!(
+                decide(&reading(50.0, 0.5, 0.5), &reading(50.0, 0.5, 0.9), &f),
+                Verdict::Rejected(Why::Regressed(Metric::Composite))
+            );
+        }
+    }
+
     #[test]
     fn decide_panel_table() {
         let zero = reading(0.0, 0.0, 0.0);
@@ -2458,9 +3513,8 @@ mod tests {
         assert_eq!(net(LADDER_STEP + 6e-10), Verdict::Accepted);
         assert_eq!(net(LADDER_STEP + 2e-9), Verdict::Accepted);
         // Liveness: no language need pass its own threshold. Two languages each
-        // gaining 0.6 of a step at zero floor accept; so does one gaining two
-        // steps under a 0.02 floor (its own threshold) with the others flat; so
-        // does a gain with another language falling inside its own floor.
+        // gaining 0.6 of a step at zero floor accept; so does a gain past the
+        // noise of the sum with another language falling inside its own floor.
         let each = 0.6 * LADDER_STEP;
         assert_eq!(
             decide_panel(&[
@@ -2469,27 +3523,32 @@ mod tests {
             ]),
             Verdict::Accepted
         );
+        // The sum must also clear its own noise: the root of the floors squared
+        // (0.02 and 0.02 give 0.0283), not just a step. A repeat of the base
+        // lowering gains that much by chance.
         let big_floor = reading(0.0, 0.0, 0.02);
-        assert_eq!(
-            decide_panel(&[(base, reading(50.0, 0.5, 0.5 + 2.0 * LADDER_STEP), big_floor), (base, flat, big_floor)]),
-            Verdict::Accepted
-        );
+        let sum_of = |gain: f64| {
+            decide_panel(&[(base, reading(50.0, 0.5, 0.5 + gain), big_floor), (base, flat, big_floor)])
+        };
+        assert_eq!(sum_of(0.02), rejected(Why::NoGain), "past a step, under the noise of the sum");
+        assert_eq!(sum_of(0.028), rejected(Why::NoGain));
+        assert_eq!(sum_of(0.029), Verdict::Accepted);
         let own_floor = reading(0.0, 0.0, 0.004);
+        assert_eq!(
+            decide_panel(&[
+                (base, reading(50.0, 0.5, 0.55), reading(0.0, 0.0, 0.03)),
+                (base, reading(50.0, 0.5, 0.497), own_floor)
+            ]),
+            Verdict::Accepted,
+            "a fall inside the language's floor, net 0.047 over a noise of 0.0303"
+        );
         assert_eq!(
             decide_panel(&[
                 (base, reading(50.0, 0.5, 0.51), reading(0.0, 0.0, 0.03)),
                 (base, reading(50.0, 0.5, 0.497), own_floor)
             ]),
-            Verdict::Accepted,
-            "a fall inside the language's floor, net 0.007"
-        );
-        // The same fall with the net exactly a step rejects.
-        assert_eq!(
-            decide_panel(&[
-                (base, reading(50.0, 0.5, 0.508), reading(0.0, 0.0, 0.03)),
-                (base, reading(50.0, 0.5, 0.497), own_floor)
-            ]),
-            rejected(Why::NoGain)
+            rejected(Why::NoGain),
+            "net 0.007 is under the noise"
         );
         // The sum is over the deltas, with each language's fall counted.
         assert_eq!(
@@ -2677,7 +3736,12 @@ mod tests {
         }
     }
 
-    fn replicate(n: u32, digest: &str, chrf: f64, meaning: f64) -> RoundRecord {
+    /// A round under `digest` holding per-item Validation scores for each language
+    /// given; its means are those scores' means.
+    fn replicate(n: u32, digest: &str, scored: &[(&str, &[ItemScore])]) -> RoundRecord {
+        let mean = |of: &dyn Fn(&ItemScore) -> f64, scores: &[ItemScore]| {
+            scores.iter().map(of).sum::<f64>() / scores.len() as f64
+        };
         RoundRecord {
             n,
             inventory_rev: 1,
@@ -2694,18 +3758,28 @@ mod tests {
             admit_rules: vec![],
             parse_reasons: vec![],
             own_family: 0,
-            languages: vec![LanguageRound {
-                language: "en-US".into(),
-                train_mean: SplitMean::default(),
-                train_scored: 0,
-                validation_mean: SplitMean {
-                    count: 2,
-                    chrf: Some(chrf),
-                    meaning: Some(meaning),
-                },
-                validation_scored: 2,
-                validation_refused: RefusalCounts::default(),
-            }],
+            languages: scored
+                .iter()
+                .map(|(language, scores)| LanguageRound {
+                    language: language.to_string(),
+                    train_mean: SplitMean::default(),
+                    train_scored: 0,
+                    validation_mean: SplitMean {
+                        count: scores.len(),
+                        chrf: Some(mean(&|s| s.chrf, scores)),
+                        meaning: Some(mean(&|s| s.meaning.unwrap_or(0.0), scores)),
+                    },
+                    validation_scored: scores.len() as u32,
+                    validation_refused: RefusalCounts::default(),
+                })
+                .collect(),
+            validation_scores: scored
+                .iter()
+                .map(|(language, scores)| LanguageScores {
+                    language: language.to_string(),
+                    scores: scores.to_vec(),
+                })
+                .collect(),
         }
     }
 
@@ -2725,45 +3799,110 @@ mod tests {
             lowerer_reach: LowererReach::ToolLessRelay,
             answerer_family: ModelFamily::Unrecorded,
             panel: vec!["en-US".into()],
+            ontology: String::new(),
+            ontology_digest: String::new(),
+            speaker_state: String::new(),
+            speaker_state_digest: String::new(),
         }
     }
 
-    /// The floor is the spread of each field of the two replicates, the composite
-    /// as the spread of the composites: with chrF up and meaning down it is not
-    /// a function of the other two spreads' magnitudes.
+    /// The floor is the paired floor of round 1 against rounds 2 to 4, per
+    /// language, from their per-item scores: a number worked by hand here, so a
+    /// floor that pairs against the last round, reads a fifth round or counts
+    /// a non-replicate cannot pass.
     #[test]
-    fn the_floor_is_the_spread_of_each_field_of_the_two_replicates() {
+    fn the_floor_is_paired_over_four_replicates() {
+        let item = |chrf: f64, meaning: f64| ItemScore { chrf, meaning: Some(meaning) };
+        let shifted = |base: &[ItemScore], by: [f64; 4]| -> Vec<ItemScore> {
+            base.iter().zip(by).map(|(s, d)| item(s.chrf + d, s.meaning.unwrap())).collect()
+        };
+        let one = [item(60.0, 0.5), item(40.0, 0.5), item(50.0, 0.5), item(30.0, 0.5)];
+        // The repeats differ from round 1 by (2,-2,2,-2), (-2,2,-2,2) and (3,0,-3,0):
+        // chrF difference variances 16/3, 16/3 and 6, pooled 50/9 over n = 4.
+        let two = shifted(&one, [2.0, -2.0, 2.0, -2.0]);
+        let three = shifted(&one, [-2.0, 2.0, -2.0, 2.0]);
+        let four = shifted(&one, [3.0, 0.0, -3.0, 0.0]);
+        let ja = [item(10.0, 0.9), item(20.0, 0.1), item(30.0, 0.9), item(40.0, 0.1)];
+        let en = |n: u32, s: &[ItemScore]| replicate(n, "d1", &[("en-US", s)]);
+        let rounds = [en(1, &one), en(2, &two), en(3, &three), en(4, &four)];
         let record = record_of("d1");
-        let rounds = [replicate(1, "d1", 60.0, 0.5), replicate(2, "d1", 50.0, 0.7)];
+
         let floors = floor_of(&rounds, &record).unwrap();
         assert_eq!(floors.len(), 1);
-        let floor = floors[0].1;
-        // composites 0.55 and 0.6.
-        assert_eq!(floor.chrf, 10.0);
-        assert!((floor.meaning - 0.2).abs() < 1e-12);
-        assert!(
-            (floor.composite - 0.05).abs() < 1e-12,
-            "{}",
-            floor.composite
-        );
+        assert_eq!(floors[0].0, "en-US");
+        let want = FLOOR_Z * (50.0_f64 / 9.0 / 4.0).sqrt();
+        assert!((floors[0].1.chrf - want).abs() < 1e-9, "{:?}", floors[0].1);
+        assert!(floors[0].1.meaning.abs() < 1e-9);
+        // Composite moves by chrF / 200: variances scale by 1 / 200^2.
+        assert!((floors[0].1.composite - want / 200.0).abs() < 1e-9);
 
-        // The order of the replicates does not matter, and a third round, or a
-        // round under another inventory or from a cycle, is not a replicate.
-        let mut other = replicate(2, "d2", 0.0, 0.0);
-        let mut cycle = replicate(2, "d1", 0.0, 0.0);
+        // The order of the slice does not matter. A fifth round, a round under
+        // another inventory and a cycle's round are not replicates.
+        let loud: Vec<ItemScore> = (0..4).map(|i| item(f64::from(i) * 25.0, 1.0)).collect();
+        let mut cycle = en(3, &loud);
         cycle.cycle = Some(1);
-        other.n = 2;
-        let rounds = [
-            replicate(3, "d1", 0.0, 0.0),
-            other,
+        let rounds_noisy = [
+            en(5, &loud),
+            replicate(2, "d2", &[("en-US", &loud)]),
             cycle,
-            replicate(2, "d1", 50.0, 0.7),
-            replicate(1, "d1", 60.0, 0.5),
+            en(4, &four),
+            en(2, &two),
+            en(3, &three),
+            en(1, &one),
         ];
-        assert_eq!(floor_of(&rounds, &record).unwrap(), floors);
+        assert_eq!(floor_of(&rounds_noisy, &record).unwrap(), floors);
+
+        // Any of rounds 1 to 4 missing, from a cycle, under another digest or
+        // without a scores entry for the language is no floor.
+        for gone in 0..4 {
+            let kept: Vec<RoundRecord> =
+                rounds.iter().enumerate().filter(|(i, _)| *i != gone).map(|(_, r)| r.clone()).collect();
+            assert_eq!(floor_of(&kept, &record).err(), Some(RunError::NoFloor), "{gone}");
+            let mut stripped = rounds.to_vec();
+            stripped[gone].validation_scores.clear();
+            assert_eq!(floor_of(&stripped, &record).err(), Some(RunError::NoFloor), "{gone}");
+            let mut other = rounds.to_vec();
+            other[gone].inventory_digest = "d2".into();
+            assert_eq!(floor_of(&other, &record).err(), Some(RunError::NoFloor), "{gone}");
+            let mut cycled = rounds.to_vec();
+            cycled[gone].cycle = Some(1);
+            assert_eq!(floor_of(&cycled, &record).err(), Some(RunError::NoFloor), "{gone}");
+        }
+        assert_eq!(floor_of(&rounds[..3], &record).err(), Some(RunError::NoFloor));
+        // Round 1 with no Validation reading at all is NoValidation.
+        let mut empty = rounds.to_vec();
+        empty[0].languages.clear();
+        assert_eq!(floor_of(&empty, &record).err(), Some(RunError::NoValidation));
+
+        // Two languages are floored apart; a ragged one is NaN (the verdict fails
+        // closed) without spoiling the other, and a language missing from one
+        // replicate's scores is no floor.
+        let mut both = record_of("d1");
+        both.panel = vec!["en-US".into(), "ja-JP".into()];
+        let two_languages = |n: u32, e: &[ItemScore], j: &[ItemScore]| {
+            replicate(n, "d1", &[("en-US", e), ("ja-JP", j)])
+        };
+        let mut rounds2 = [
+            two_languages(1, &one, &ja),
+            two_languages(2, &two, &ja),
+            two_languages(3, &three, &ja),
+            two_languages(4, &four, &ja),
+        ];
+        let floors2 = floor_of(&rounds2, &both).unwrap();
+        assert_eq!(floors2[0].1, floors[0].1);
+        assert_eq!(floors2[1], ("ja-JP".to_string(), Reading { chrf: 0.0, meaning: 0.0, composite: 0.0 }));
+        rounds2[2].validation_scores[1].scores.pop();
+        let ragged = floor_of(&rounds2, &both).unwrap();
+        assert_eq!(ragged[0].1, floors[0].1);
+        assert!(ragged[1].1.composite.is_nan());
+        rounds2[2].validation_scores.pop();
+        assert_eq!(floor_of(&rounds2, &both).err(), Some(RunError::NoFloor));
+
+        // The text names the count of rounds the constant gives.
+        assert_eq!(FLOOR_ARMS_MIN + 1, 4);
         assert_eq!(
-            floor_of(&rounds[..3], &record).err(),
-            Some(RunError::NoFloor)
+            RunError::NoFloor.to_string(),
+            "the run has no noise floor: record four rounds under the first inventory first"
         );
     }
 
@@ -2816,7 +3955,7 @@ mod tests {
     }
 
     /// Answers the Dao encode prompts from `answers` by item, the candidate
-    /// inventory's (rev 4) from the good drafts, and the editor with one concept.
+    /// inventory's (rev 5) from the good drafts, and the editor with one concept.
     struct Fake {
         degraded: HashMap<String, String>,
         good: HashMap<String, String>,
@@ -2843,7 +3982,7 @@ mod tests {
                 };
                 return Ok(format!(r#"{{"text":"{text}"}}"#));
             }
-            let answers = if prompt.text().contains("\n\ninventory rev:4\n") {
+            let answers = if prompt.text().contains("\n\ninventory rev:5\n") {
                 &self.good
             } else {
                 &self.degraded
@@ -2915,6 +4054,10 @@ mod tests {
                 copy("inventory.cc", "i.cc"),
                 copy("entity.cc", "e.cc"),
             );
+            let ontology = dir.path().join("o.cc");
+            fs::write(&ontology, [0x90]).unwrap();
+            let speaker_state = dir.path().join("s.cc");
+            fs::write(&speaker_state, [0x90]).unwrap();
             let root = dir.path().join("run");
             let mut run = RunStores::create(
                 &root,
@@ -2923,6 +4066,8 @@ mod tests {
                     corpus: &corpus,
                     inventory: &inventory,
                     entities: &entities,
+                    ontology: &ontology,
+                    speaker_state: &speaker_state,
                 },
                 "fake-model",
                 "bag",
@@ -2932,7 +4077,8 @@ mod tests {
             )
             .unwrap();
             let mut model = fake();
-            for _ in 0..2 {
+            let replicates = FLOOR_ARMS_MIN + 1;
+            for _ in 0..replicates {
                 let out = round(&mut run, &mut model, &Scorer::new(Bag)).unwrap();
                 assert!(matches!(out, RoundOutcome::Recorded(_)));
             }
@@ -2950,7 +4096,7 @@ mod tests {
             let decisions = reloaded.get_all::<Decision>().unwrap().len();
             assert_eq!(
                 (rounds, decisions),
-                if fail_at == 1 { (2, 0) } else { (3, 1) },
+                if fail_at == 1 { (replicates, 0) } else { (replicates + 1, 1) },
                 "write {fail_at} refused"
             );
             assert_eq!(out.is_ok(), fail_at == 2);
diff --git a/crates/weksa/src/run/mutants.rs b/crates/weksa/src/run/mutants.rs
new file mode 100644
index 0000000..75b1e63
--- /dev/null
+++ b/crates/weksa/src/run/mutants.rs
@@ -0,0 +1,21 @@
+//! Pins for private functions of `run.rs` that the doors reach only through a
+//! whole run.
+
+use super::*;
+
+/// A line is probed only when it has at least four words, and then it is
+/// split in two near its byte middle, the pieces trimmed.
+#[test]
+fn a_recall_line_splits_from_four_words_and_not_before() {
+    assert_eq!(recall_split("one two three"), None);
+    assert_eq!(recall_split(""), None);
+    assert_eq!(
+        recall_split("one two three four"),
+        Some(("one two".to_string(), "three four".to_string()))
+    );
+    // No spaces: each ideograph is a word, the split falls at the middle.
+    assert_eq!(
+        recall_split("天地不仁以万物为刍狗"),
+        Some(("天地不仁以".to_string(), "万物为刍狗".to_string()))
+    );
+}
diff --git a/crates/weksa/src/schema.rs b/crates/weksa/src/schema.rs
index 21add8f..4fea40d 100644
--- a/crates/weksa/src/schema.rs
+++ b/crates/weksa/src/schema.rs
@@ -4,6 +4,7 @@
 use crate::corpus::CorpusItem;
 use crate::entity::Entity;
 use crate::inventory::{InventoryEntry, InventoryRevision};
+use crate::ontology::OntologyEntry;
 use crate::packet::Packet;
 use crate::run::{Decision, RoundRecord, RunRecord};
 use crate::speaker::{Scene, Speaker};
@@ -25,6 +26,7 @@ pub fn published() -> Vec<(String, String)> {
         published_for::<Entity>(),
         published_for::<Speaker>(),
         published_for::<Scene>(),
+        published_for::<OntologyEntry>(),
         published_for::<RunRecord>(),
         published_for::<RoundRecord>(),
         published_for::<Decision>(),
diff --git a/crates/weksa/src/score/mod.rs b/crates/weksa/src/score/mod.rs
index c1033a4..e411d7c 100644
--- a/crates/weksa/src/score/mod.rs
+++ b/crates/weksa/src/score/mod.rs
@@ -28,7 +28,7 @@ pub struct ScoreInput<'a> {
     pub output: &'a str,
 }
 
-#[derive(Clone, Debug, PartialEq)]
+#[derive(Clone, Debug, PartialEq, Serialize, Deserialize, JsonSchema)]
 pub struct ItemScore {
     /// chrF of the output against the reference.
     pub chrf: f64,
@@ -131,13 +131,18 @@ pub struct Aggregate {
     pub validation: SplitMean,
 }
 
-/// The mean of the scores of the items read in split `want`.
-fn split_mean(scored: &[(&CorpusItem, ItemScore)], want: Split) -> SplitMean {
-    let of: Vec<&ItemScore> = scored
+/// The scores of the items read in split `want`, in list order.
+fn scores_in<'a>(scored: &'a [(&CorpusItem, ItemScore)], want: Split) -> Vec<&'a ItemScore> {
+    scored
         .iter()
         .filter(|(item, _)| SplitScheme::V1.live(item) == Some(want))
         .map(|(_, score)| score)
-        .collect();
+        .collect()
+}
+
+/// The mean of the scores of the items read in split `want`.
+fn split_mean(scored: &[(&CorpusItem, ItemScore)], want: Split) -> SplitMean {
+    let of = scores_in(scored, want);
     let average = |values: Vec<f64>| {
         (!values.is_empty()).then(|| values.iter().sum::<f64>() / values.len() as f64)
     };
@@ -157,6 +162,12 @@ pub fn aggregate(scored: &[(&CorpusItem, ItemScore)]) -> Aggregate {
     }
 }
 
+/// The Validation items' scores in list order, numbers only: no key, no text.
+/// A refused item arrives scored 0 and keeps its position.
+pub fn validation_items(scored: &[(&CorpusItem, ItemScore)]) -> Vec<ItemScore> {
+    scores_in(scored, Split::Validation).into_iter().cloned().collect()
+}
+
 /// The Test split's readings, scalars only: no item key, no minted string, no
 /// pair. The checkpoint decision (convergence-test) needs numbers; a key beside
 /// a minted string is the handle an edit step would act on. The only producer
@@ -249,6 +260,31 @@ mod tests {
         item(key, text, &group_in(split), model)
     }
 
+    #[test]
+    fn validation_items_keeps_validation_only_in_order() {
+        let train = in_split("item:t:1", UNRELATED, Split::Train, false);
+        let first = in_split("item:v:1", "first words", Split::Validation, false);
+        let refused = in_split("item:v:2", "second words", Split::Validation, false);
+        let last = in_split("item:v:3", "third words", Split::Validation, false);
+        let mut gone = in_split("item:v:4", "withdrawn words", Split::Validation, false);
+        gone.withdrawn = true;
+        let test = in_split("item:c:1", HELD_OUT, Split::Test, false);
+        let scored = [
+            (&train, score(10.0, Some(0.1))),
+            (&first, score(40.0, Some(0.4))),
+            (&test, score(60.0, Some(0.6))),
+            (&refused, score(0.0, Some(0.0))),
+            (&gone, score(90.0, Some(0.9))),
+            (&last, score(80.0, None)),
+        ];
+        let got = validation_items(&scored);
+        assert_eq!(
+            got,
+            [score(40.0, Some(0.4)), score(0.0, Some(0.0)), score(80.0, None)]
+        );
+        assert_eq!(got.len(), aggregate(&scored).validation.count);
+    }
+
     #[test]
     fn test_readings_at_checkpoint() {
         let train_item = in_split("item:t:1", UNRELATED, Split::Train, false);
diff --git a/crates/weksa/src/speaker.rs b/crates/weksa/src/speaker.rs
index c2e0e58..0f44d13 100644
--- a/crates/weksa/src/speaker.rs
+++ b/crates/weksa/src/speaker.rs
@@ -71,6 +71,8 @@ pub struct Scene {
     /// The revision, from 1.
     #[cultcache(key = 1)]
     pub n: u32,
+    /// The revision, of the inventory the scene was admitted through, at which
+    /// `put_scene` read its features: provenance only; a run never reads it.
     #[cultcache(key = 2)]
     pub inventory_rev: u32,
     #[cultcache(key = 3)]
diff --git a/crates/weksa/src/split.rs b/crates/weksa/src/split.rs
index 898439d..20f971d 100644
--- a/crates/weksa/src/split.rs
+++ b/crates/weksa/src/split.rs
@@ -172,6 +172,9 @@ impl Checkpoint {
     }
 }
 
+#[cfg(test)]
+mod mutants;
+
 /// Item builders for the unit tests that live in `src`: the twins of
 /// `tests/common`'s `group_in_bucket`, `item_in`, `cast` and `model`.
 #[cfg(test)]
@@ -208,6 +211,7 @@ pub(crate) mod fixture {
             language: "en-US".into(),
             speaker: EntityId::parse("entity:nibu").unwrap(),
             names: vec![],
+            names_by: None,
             group: group.into(),
             prior_turns: vec![],
             source,
diff --git a/crates/weksa/src/split/mutants.rs b/crates/weksa/src/split/mutants.rs
new file mode 100644
index 0000000..99cde9f
--- /dev/null
+++ b/crates/weksa/src/split/mutants.rs
@@ -0,0 +1,11 @@
+//! Pins of private items of `split` found unpinned by mutation testing.
+
+use super::Checkpoint;
+
+/// A checkpoint reports the round it was declared at, whatever the round.
+#[test]
+fn a_checkpoint_reports_its_round() {
+    assert_eq!(Checkpoint::for_test(7).round(), 7);
+    assert_eq!(Checkpoint::for_test(0).round(), 0);
+    assert_eq!(Checkpoint::for_test(1).round(), 1);
+}
diff --git a/crates/weksa/src/store.rs b/crates/weksa/src/store.rs
index 16b7ccd..e942a66 100644
--- a/crates/weksa/src/store.rs
+++ b/crates/weksa/src/store.rs
@@ -12,6 +12,7 @@ use unicode_normalization::{UnicodeNormalization, char::is_combining_mark, is_nf
 use unicode_segmentation::UnicodeSegmentation;
 
 use crate::corpus::{CorpusItem, CorpusItemId, Source, item_key, key_slug};
+use crate::split::{Split, SplitScheme};
 use crate::entity::{Entity, EntityOrigin, Pronunciation};
 use crate::form::{
     is_attestation, is_calendar_date, is_joining_only, is_language_tag, is_refused_format, is_slug,
@@ -19,7 +20,11 @@ use crate::form::{
 use crate::inventory::{
     Change, InvId, Inventory, InventoryEntry, InventoryRevision, Slot, revision_key,
 };
-use crate::packet::{EntityId, Packet};
+use crate::ontology::{
+    MAX_CONDITIONS, MAX_CHOICE_BYTES, MAX_ENTRIES_PER_LANGUAGE, MAX_EXAMPLE_BYTES, MAX_EXAMPLES,
+    Ontology, OntologyEntry, Test,
+};
+use crate::packet::{EntityId, FeatValue, Packet};
 use crate::speaker::{Annotator, MAX_PARTICIPANTS, Party, Scene, Speaker, scene_key, speaker_key};
 use crate::validate::{LoweringInput, Refusal, feature_refusals, validate};
 
@@ -244,6 +249,17 @@ impl CorpusStore {
         Ok(items)
     }
 
+    /// The text of every item in a Test group, any language, withdrawn and
+    /// model-written ones included: what no prompt may hold.
+    pub fn test_texts(&self) -> anyhow::Result<Vec<String>> {
+        Ok(self
+            .all()?
+            .into_iter()
+            .filter(|item| SplitScheme::V1.of_bucket(SplitScheme::V1.bucket(&item.group)) == Split::Test)
+            .map(|item| item.text)
+            .collect())
+    }
+
     pub fn get(&self, key: &str) -> anyhow::Result<Option<CorpusItem>> {
         self.cache.get::<CorpusItem>(key)
     }
@@ -328,6 +344,9 @@ impl CorpusStore {
         if let Some(why) = empty_attestation(&item.source) {
             return Err(malformed(&item.id, why));
         }
+        if let Some(by) = &item.names_by {
+            check_annotator(&item.id, by)?;
+        }
         check_entities(&item, entities)?;
         for held in self.all()? {
             if normalized(&held.text) == text && item.supersedes.as_deref() != Some(&held.id) {
@@ -471,13 +490,13 @@ pub(crate) fn normalized(text: &str) -> String {
 }
 
 /// The one-to-one folds `normalized` adds to NFKC and case folding, applied
-/// before the case fold (U+0130 would otherwise fold to i plus a combining dot,
-/// which the key keeps as a mark).
+/// before the case fold. (U+0130 needs no arm: it folds to i plus a combining
+/// dot, and the `dotless` loop in `normalized` drops that dot after an `i`, so
+/// the key is plain `i`.)
 fn fold_variant(c: char) -> impl Iterator<Item = char> {
     let one = |c: char| (c, None);
     let (first, second) = match c {
         '\u{131}' => one('i'),
-        '\u{130}' => one('I'),
         // Voiced katakana wa, wi, we, wo: the hiragana (U+308F-3092) plus the
         // combining voiced mark, which is how NFKC spells the hiragana forms.
         '\u{30f7}'..='\u{30fa}' => (
@@ -1207,3 +1226,137 @@ fn check_next(key: &str, latest: u32, got: u32) -> Result<(), StoreError> {
     }
     Ok(())
 }
+
+/// The language ontology: immutable entries admitted in all-or-nothing
+/// batches. The only writer of `weksa.ontology_entry`.
+pub struct OntologyStore {
+    cache: CultCache,
+}
+
+impl OntologyStore {
+    pub fn open(path: &Path) -> anyhow::Result<Self> {
+        Ok(Self {
+            cache: open_cache(path, |c| c.register_entry_type::<OntologyEntry>())?,
+        })
+    }
+
+    /// Every entry, by language then number.
+    pub fn all(&self) -> anyhow::Result<Vec<OntologyEntry>> {
+        Ok(self.ontology()?.entries().to_vec())
+    }
+
+    pub fn ontology(&self) -> anyhow::Result<Ontology> {
+        Ok(Ontology::of(self.cache.get_all::<OntologyEntry>()?))
+    }
+
+    /// Admits a batch whole or not at all; an identical replay of stored
+    /// entries is `Unchanged`. Per language the batch's numbers run the
+    /// language's latest plus one, consecutively, to at most
+    /// `MAX_ENTRIES_PER_LANGUAGE` entries in all. Every entry passes
+    /// [`check_ontology_entry`] against the inventory before any is put. No
+    /// message echoes an entry's text.
+    pub fn admit(
+        &mut self,
+        batch: Vec<OntologyEntry>,
+        inventory: &InventoryStore,
+    ) -> Result<AddOutcome, StoreError> {
+        let all = self.cache.get_all::<OntologyEntry>()?;
+        if batch
+            .iter()
+            .all(|e| all.iter().any(|old| old == e))
+        {
+            return Ok(AddOutcome::Unchanged);
+        }
+        let inv = inventory.inventory()?;
+        let mut counted: std::collections::BTreeMap<&str, u32> = std::collections::BTreeMap::new();
+        for e in &batch {
+            let key = e.key();
+            if !is_language_tag(&e.language) {
+                return Err(malformed(&key, "an ontology language is a language tag"));
+            }
+            let latest = match counted.get(e.language.as_str()) {
+                Some(n) => *n,
+                None => all
+                    .iter()
+                    .filter(|o| o.language == e.language)
+                    .map(|o| o.n)
+                    .max()
+                    .unwrap_or(0),
+            };
+            check_next(&key, latest, e.n)?;
+            if e.n as usize > MAX_ENTRIES_PER_LANGUAGE {
+                return Err(malformed(&key, "a language holds at most 64 entries"));
+            }
+            counted.insert(e.language.as_str(), e.n);
+            check_ontology_entry(e, &inv, e.inventory_rev)?;
+        }
+        let mut staged = Vec::new();
+        for e in &batch {
+            staged.push(self.cache.prepare_entry_named(e.key(), e)?.0);
+        }
+        self.cache.put_prepared_batch(staged)?;
+        Ok(AddOutcome::Added)
+    }
+}
+
+/// The rules of one ontology entry against an inventory: the annotator, the
+/// bounded and normalized text of the choice and examples, the condition count
+/// and each condition's feature (slot `Stance`, `Discourse` or `Scene`, a grade
+/// feature for `AtLeast`, `AtMost` and `AtMostOrUnset`, an option or flag value for `Is`) read at
+/// `rev`. The store passes the entry's own `inventory_rev` on admission; a run
+/// passes its inventory's head, because beds number revisions independently.
+pub(crate) fn check_ontology_entry(
+    e: &OntologyEntry,
+    inventory: &Inventory,
+    rev: u32,
+) -> Result<(), StoreError> {
+    let key = e.key();
+    check_annotator(&key, &e.annotator)?;
+    let text_ok = |t: &str, max: usize| {
+        (1..=max).contains(&t.len())
+            && !t.chars().any(|c| c.is_control() || is_refused_format(c))
+            && is_nfc(t)
+    };
+    if !text_ok(&e.choice, MAX_CHOICE_BYTES) {
+        return Err(malformed(
+            &key,
+            "a choice is 1 to 200 normalized bytes with no control or format character",
+        ));
+    }
+    if e.examples.len() > MAX_EXAMPLES
+        || !e.examples.iter().all(|x| text_ok(x, MAX_EXAMPLE_BYTES))
+    {
+        return Err(malformed(
+            &key,
+            "an entry has at most 3 examples of 1 to 120 normalized bytes with no control or format character",
+        ));
+    }
+    if e.when.len() > MAX_CONDITIONS {
+        return Err(malformed(&key, "an entry has at most 4 conditions"));
+    }
+    let mut out = Vec::new();
+    for c in &e.when {
+        if !matches!(c.slot, Slot::Stance | Slot::Discourse | Slot::Scene) {
+            return Err(malformed(
+                &key,
+                "a condition reads slot Stance, Discourse or Scene",
+            ));
+        }
+        if matches!(c.test, Test::Is(FeatValue::Grade(_))) {
+            return Err(malformed(&key, "Is names an option or a flag"));
+        }
+        out.extend(feature_refusals(
+            inventory,
+            rev,
+            &[c.as_value()],
+            c.slot,
+        ));
+    }
+    if e.when.is_empty() && !inventory.has_revision(rev) {
+        out.extend(feature_refusals(inventory, rev, &[], Slot::Stance));
+    }
+    if !out.is_empty() {
+        return Err(StoreError::Invalid(out));
+    }
+    Ok(())
+}
diff --git a/crates/weksa/tests/cli.rs b/crates/weksa/tests/cli.rs
index 5f75500..bfcd2d8 100644
--- a/crates/weksa/tests/cli.rs
+++ b/crates/weksa/tests/cli.rs
@@ -12,6 +12,10 @@ fn weksa(dir: &std::path::Path, args: &[&str]) -> Output {
             "./i.cc",
             "--entities",
             "./e.cc",
+            "--ontology",
+            "./o.cc",
+            "--speaker-state",
+            "./s.cc",
         ])
         .args(args)
         .output()
@@ -316,6 +320,7 @@ fn schema_writes_the_published_files() {
             "weksa.loop_decision.schema.json",
             "weksa.loop_round.schema.json",
             "weksa.loop_run.schema.json",
+            "weksa.ontology_entry.schema.json",
             "weksa.scene.schema.json",
             "weksa.speaker.schema.json"
         ]
@@ -1337,6 +1342,8 @@ fn dao_stores(dir: &std::path::Path) {
     ] {
         std::fs::copy(src.join(from), dir.join(to)).unwrap();
     }
+    std::fs::write(dir.join("o.cc"), [0x90]).unwrap();
+    std::fs::write(dir.join("s.cc"), [0x90]).unwrap();
 }
 
 #[test]
@@ -1409,7 +1416,7 @@ fn loop_open_and_unanswered_round() {
     assert!(second.status.success(), "{}", out(&second));
     assert_eq!(
         out(&second),
-        "round 1 rev 3 en-US train n=1 scored=0 chrf=0.00 meaning=0.0000 refused=1 validation n=2 scored=0 chrf=0.00 meaning=0.0000 refused parse=2 admit=0 lower=0 parse-reasons=syntaxx3 lowering=tool-less-relay\n"
+        "round 1 rev 4 en-US train n=1 scored=0 chrf=0.00 meaning=0.0000 refused=1 validation n=2 scored=0 chrf=0.00 meaning=0.0000 refused parse=2 admit=0 lower=0 parse-reasons=syntaxx3 lowering=tool-less-relay\n"
     );
 
     // The global store flags are not read by loop round: a drifted store is refused.
@@ -1445,6 +1452,50 @@ fn open_dao_run(d: &std::path::Path) {
     assert!(o.status.success(), "{}", out(&o));
 }
 
+/// `weksa loop mint-ontology`: exit 3 and a prompt file until answered, exit 0
+/// and the answer path once it is a draft, a missing language or one outside
+/// the panel refused, and nothing of the run written.
+#[test]
+fn loop_mint_ontology_protocol() {
+    let d = tempfile::tempdir().unwrap();
+    open_dao_run(d.path());
+    let root = d.path().join("canaryroot");
+    let held = |name: &str| std::fs::read(root.join(name)).unwrap();
+    let (run_cc, onto) = (held("run.cc"), std::fs::read(d.path().join("o.cc")).unwrap());
+    let mint = |args: &[&str]| weksa(d.path(), &[&["loop", "mint-ontology", "canaryroot"], args].concat());
+
+    let none = mint(&[]);
+    assert_eq!(none.status.code(), Some(2), "{}", out(&none));
+    assert!(!root.join("ontology-mint").exists());
+
+    let outside = mint(&["--language", "ja-JP"]);
+    assert_eq!(outside.status.code(), Some(1), "{}", out(&outside));
+    assert_eq!(out(&outside), "language-not-in-panel\n");
+    assert!(!root.join("ontology-mint").exists(), "a refused mint wrote a prompt");
+
+    let first = mint(&["--language", "en-US"]);
+    assert_eq!(first.status.code(), Some(3), "{}", out(&first));
+    let text = out(&first);
+    let digest = text.strip_prefix("unanswered ").unwrap().trim_end();
+    assert_eq!(digest.len(), 16, "{text}");
+    let dir = root.join("ontology-mint");
+    assert!(dir.join(format!("{digest}.prompt")).is_file());
+
+    let answer = dir.join(format!("{digest}.answer"));
+    std::fs::write(&answer, r#"{"entries":[{"layer":"Grammar","choice":"a pattern"}]}"#).unwrap();
+    let done = mint(&["--language", "en-US"]);
+    assert_eq!(done.status.code(), Some(0), "{}", out(&done));
+    assert_eq!(out(&done), format!("drafted 1 entries canaryroot/ontology-mint/{digest}.answer\n"));
+
+    std::fs::write(&answer, "not json").unwrap();
+    let bad = mint(&["--language", "en-US"]);
+    assert_eq!(bad.status.code(), Some(1), "{}", out(&bad));
+    assert_eq!(out(&bad), "syntax\n");
+
+    assert_eq!(held("run.cc"), run_cc, "the mint wrote the run record");
+    assert_eq!(std::fs::read(d.path().join("o.cc")).unwrap(), onto);
+}
+
 /// The family `loop open` pinned at `root`, read from the run record.
 fn pinned_family(d: &std::path::Path, root: &str, flag: &[&str]) -> weksa::corpus::ModelFamily {
     let mut args = vec![
@@ -1494,7 +1545,7 @@ fn loop_cycle_needs_a_floor() {
     assert!(!o.status.success());
     let text = out(&o);
     assert!(
-        text.contains("the run has no noise floor: record two rounds first"),
+        text.contains("the run has no noise floor: record four rounds under the first inventory first"),
         "{text}"
     );
     for echoed in ["canaryroot", d.path().to_str().unwrap()] {
@@ -1507,8 +1558,8 @@ fn loop_cycle_needs_a_floor() {
 fn loop_cycle_asks_then_decides() {
     let d = tempfile::tempdir().unwrap();
     open_dao_run(d.path());
-    // Two rounds of refusals: a floor of 0 and a base of 0.
-    for n in 1..=2 {
+    // Four rounds of refusals: a floor of 0 and a base of 0.
+    for n in 1..=4 {
         let first = weksa(d.path(), &["loop", "round", "canaryroot"]);
         assert_eq!(first.status.code(), Some(3), "{}", out(&first));
         for entry in std::fs::read_dir(d.path().join(format!("canaryroot/round-{n}"))).unwrap() {
@@ -1542,7 +1593,7 @@ fn loop_cycle_asks_then_decides() {
     assert!(done.status.success(), "{}", out(&done));
     assert_eq!(
         out(&done),
-        "cycle 1 rev 3->none en-US base=0.0000 candidate=none floor=0.0000 threshold=0.0050 rejected edit-parse lowering=tool-less-relay\n"
+        "cycle 1 rev 4->none en-US base=0.0000 candidate=none floor=0.0000 threshold=0.0050 rejected edit-parse lowering=tool-less-relay\n"
     );
 
     // The next cycle asks afresh in its own directory.
@@ -1727,6 +1778,200 @@ fn loop_ablate_waits_then_prints_one_line_per_split() {
     }
 }
 
+#[test]
+fn cli_loop_relower_exits_3_until_answered_and_refuses_bad_labels() {
+    let d = tempfile::tempdir().unwrap();
+    open_dao_run(d.path());
+    let url = fake_embedder();
+    let root = d.path().join("canaryroot");
+    let mut run = weksa::run::RunStores::open(&root).unwrap();
+    let scorer = weksa::Scorer::new(weksa::OllamaEmbedder::new(&url, &run.record().embedder));
+    let weksa::run::RoundOutcome::Recorded(r) = weksa::run::round(&mut run, &mut DaoModel, &scorer).unwrap()
+    else {
+        panic!("answered")
+    };
+    let said = r#"{"text":"The highest excellence is like the water."}"#;
+    for call in &r.calls()[3..] {
+        std::fs::write(root.join(format!("round-1/{}.answer", call.prompt)), said).unwrap();
+    }
+    let relower = |extra: &[&str]| {
+        weksa(
+            d.path(),
+            &[&["loop", "relower", "canaryroot", "--round", "1", "--lowerer", "tuned-x", "--ollama-url", &url], extra].concat(),
+        )
+    };
+
+    // Unanswered: exit 3, the digests, a prompt file per digest in the arm's directory.
+    let first = relower(&["--arm", "tuned"]);
+    assert_eq!(first.status.code(), Some(3), "{}", out(&first));
+    let text = out(&first);
+    let digests: Vec<&str> = text
+        .lines()
+        .filter_map(|l| l.strip_prefix("unanswered "))
+        .filter(|x| x.len() == 16)
+        .collect();
+    assert_eq!(digests.len(), 2, "the two Validation prompts: {text}");
+    for digest in &digests {
+        assert!(root.join(format!("relower-1-tuned/{digest}.prompt")).is_file());
+        std::fs::write(root.join(format!("relower-1-tuned/{digest}.answer")), said).unwrap();
+    }
+
+    // Answered: one line per language, labelled, naming the lowerer; no verdict without a floor.
+    let second = relower(&["--arm", "tuned"]);
+    assert!(second.status.success(), "{}", out(&second));
+    let text = out(&second);
+    assert!(text.starts_with("relower en-US n=2 skipped=0 unusable=0 recorded "), "{text}");
+    assert!(text.contains("arm=tuned lowerer=tuned-x"), "{text}");
+    assert!(text.contains(" lowering="), "{text}");
+    assert!(!text.contains("verdict") && !text.contains("floor"), "{text}");
+    for leaked in ["item:", "packet:", "highest excellence", "canaryroot"] {
+        assert!(!text.contains(leaked), "{text}");
+    }
+
+    // A floor arm that is not answered whole is refused, and never written to.
+    let o = relower(&["--arm", "tuned", "--floor", "second"]);
+    assert_eq!(o.status.code(), Some(1), "{}", out(&o));
+    assert!(!root.join("relower-1-second").exists());
+
+    // Fewer than three floor arms is refused: one pair measures no noise.
+    let o = relower(&["--arm", "tuned", "--floor", "second"]);
+    assert_eq!(o.status.code(), Some(1), "{}", out(&o));
+    assert!(out(&o).contains("three or more floor arms"), "{}", out(&o));
+
+    // Answered floors: a verdict line.
+    for label in ["second", "third", "fourth"] {
+        std::fs::create_dir_all(root.join(format!("relower-1-{label}"))).unwrap();
+        for digest in &digests {
+            std::fs::write(root.join(format!("relower-1-{label}/{digest}.answer")), said).unwrap();
+        }
+    }
+    let o = relower(&["--arm", "tuned", "--floor", "second", "--floor", "third", "--floor", "fourth"]);
+    assert!(o.status.success(), "{}", out(&o));
+    let text = out(&o);
+    assert!(text.contains("| floor chrf=0.00") && text.trim_end().ends_with("verdict Rejected(NoGain)"), "{text}");
+
+    // Labels: equal, uppercase, empty, too long, a path.
+    let long = "a".repeat(33);
+    for args in [
+        vec!["--arm", "same", "--floor", "same"],
+        vec!["--arm", "Upper"],
+        vec!["--arm", ""],
+        vec!["--arm", &long],
+        vec!["--arm", "../x"],
+        vec!["--arm", "tuned", "--floor", "Bad"],
+        vec!["--arm", "tuned", "--floor", "b", "--floor", "b", "--floor", "c"],
+    ] {
+        let o = relower(&args);
+        assert_eq!(o.status.code(), Some(1), "{args:?}: {}", out(&o));
+    }
+}
+
+#[test]
+fn cli_loop_calibrate_reads_answered_draws_and_refuses_unanswered_and_bad_labels() {
+    let d = tempfile::tempdir().unwrap();
+    open_dao_run(d.path());
+    let url = fake_embedder();
+    let root = d.path().join("canaryroot");
+    let mut run = weksa::run::RunStores::open(&root).unwrap();
+    let scorer = weksa::Scorer::new(weksa::OllamaEmbedder::new(&url, &run.record().embedder));
+    let weksa::run::RoundOutcome::Recorded(r) = weksa::run::round(&mut run, &mut DaoModel, &scorer).unwrap()
+    else {
+        panic!("answered")
+    };
+    let said = r#"{"text":"The highest excellence is like the water."}"#;
+    for call in &r.calls()[3..] {
+        std::fs::write(root.join(format!("round-1/{}.answer", call.prompt)), said).unwrap();
+    }
+    let calibrate = |extra: &[&str]| {
+        weksa(
+            d.path(),
+            &[&["loop", "calibrate", "canaryroot", "--round", "1", "--ollama-url", &url], extra].concat(),
+        )
+    };
+    let four = ["--prompted", "p1", "--prompted", "p2", "--prompted", "p3", "--prompted", "p4"];
+
+    // Unanswered draws: exit 1, each label with its missing count, no relower directory created.
+    let o = calibrate(&four);
+    assert_eq!(o.status.code(), Some(1), "{}", out(&o));
+    let text = out(&o);
+    for label in ["p1", "p2", "p3", "p4"] {
+        assert!(text.contains(&format!("unanswered {label} 2")), "{text}");
+        assert!(!root.join(format!("relower-1-{label}")).exists());
+    }
+    assert!(text.contains("answer it through weksa loop relower"), "{text}");
+
+    // Answer every draw through relower's door; from here the only thing that can refuse is the argument.
+    let o = weksa(
+        d.path(),
+        &["loop", "relower", "canaryroot", "--round", "1", "--lowerer", "x", "--arm", "p1", "--ollama-url", &url],
+    );
+    assert_eq!(o.status.code(), Some(3), "{}", out(&o));
+    let digests: Vec<String> = out(&o)
+        .lines()
+        .filter_map(|l| l.strip_prefix("unanswered "))
+        .filter(|x| x.len() == 16)
+        .map(String::from)
+        .collect();
+    assert_eq!(digests.len(), 2);
+    // `P1` and `a_b` are answered too, so only the label check can refuse them.
+    for label in ["p1", "p2", "p3", "p4", "bad", "cand1", "cand2", "P1", "a_b"] {
+        std::fs::create_dir_all(root.join(format!("relower-1-{label}"))).unwrap();
+        for digest in &digests {
+            std::fs::write(root.join(format!("relower-1-{label}/{digest}.answer")), said).unwrap();
+        }
+    }
+    // A draw answered in part.
+    std::fs::create_dir_all(root.join("relower-1-part")).unwrap();
+    std::fs::write(root.join(format!("relower-1-part/{}.answer", digests[0])), said).unwrap();
+    let o = calibrate(&["--prompted", "p1", "--prompted", "p2", "--prompted", "p3", "--prompted", "part"]);
+    assert_eq!(o.status.code(), Some(1), "{}", out(&o));
+    assert!(out(&o).contains("unanswered part 1") && !out(&o).contains("unanswered p1"), "{}", out(&o));
+
+    // Refusals, every draw answered: the baseline reads, each variant differs by one fault.
+    assert!(calibrate(&four).status.success());
+    for args in [
+        vec!["--prompted", "p1", "--prompted", "p2", "--prompted", "p3"],
+        vec!["--prompted", "p1", "--prompted", "p2", "--prompted", "p3", "--prompted", "p3"],
+        vec!["--prompted", "p1", "--prompted", "p2", "--prompted", "p3", "--prompted", "p4", "--degraded", "p4"],
+        vec!["--prompted", "p1", "--prompted", "p2", "--prompted", "p3", "--prompted", "p4", "--candidate", "bad", "--degraded", "bad"],
+        vec!["--prompted", "P1", "--prompted", "p2", "--prompted", "p3", "--prompted", "p4"],
+        vec!["--prompted", "a_b", "--prompted", "p2", "--prompted", "p3", "--prompted", "p4"],
+        [&four[..], &["--class", "all=item:"]].concat(),
+        [&four[..], &["--class", "noequals"]].concat(),
+        [&four[..], &["--class", "Old=item:a"]].concat(),
+        [&four[..], &["--class", "old=item:a,"]].concat(),
+        [&four[..], &["--class", "old=item:a", "--class", "old=item:b"]].concat(),
+    ] {
+        let o = calibrate(&args);
+        assert_eq!(o.status.code(), Some(1), "{args:?}: {}", out(&o));
+        assert!(!out(&o).contains("unanswered"), "{args:?} must be refused for itself: {}", out(&o));
+    }
+
+    let o = calibrate(
+        &[&four[..], &["--degraded", "bad", "--candidate", "cand1", "--candidate", "cand2", "--class", "old=item:daodejing"]].concat(),
+    );
+    assert!(o.status.success(), "{}", out(&o));
+    let text = out(&o);
+    assert!(text.starts_with("calibrate draws prompted=4 degraded=1 candidate=2 floor-arms=3 unusable=0"), "{text}");
+    assert!(text.contains("calibrate class=all items en-US n=2 skipped=0"), "{text}");
+    assert!(text.contains("calibrate class=all prompted trials=20 nogain=20 accepted=0 regressed=0"), "{text}");
+    for side in ["r-candidate trials=4", "r-base trials=4", "r-free trials=12"] {
+        assert!(text.contains(&format!("calibrate class=all prompted-{side} nogain=")), "{text}");
+    }
+    assert!(text.contains("calibrate class=old degraded=bad trials=20 regressed=0 offset en-US=+0.0000"), "{text}");
+    // The class=all lines in print order: prompted, its three R roles, degraded, pooled candidate, each candidate arm.
+    let all: Vec<&str> = text.lines().filter(|l| l.contains("calibrate class=all ")).collect();
+    let kinds = ["items", "prompted trials", "prompted-r-candidate", "prompted-r-base", "prompted-r-free", "degraded=bad", "candidate trials", "candidate=cand1", "candidate=cand2"];
+    assert_eq!(all.len(), kinds.len(), "{text}");
+    for (line, kind) in all.iter().zip(kinds) {
+        assert!(line.contains(&format!("class=all {kind}")), "{kind}: {line}");
+    }
+    assert!(all[7].contains("candidate=cand1 trials=20 nogain=20 accepted=0 regressed=0"), "{}", all[7]);
+    for leaked in ["item:daodejing", "packet:", "highest excellence", "canaryroot"] {
+        assert!(!text.contains(leaked), "{text}");
+    }
+}
+
 #[test]
 fn loop_ablate_without_the_rounds_answers_says_so() {
     let d = tempfile::tempdir().unwrap();
@@ -1763,3 +2008,286 @@ fn panel_and_language_are_required() {
     assert!(!o.status.success());
     assert!(out(&o).contains("--language"), "{}", out(&o));
 }
+
+#[test]
+fn ontology_admit_and_dump() {
+    let d = tempfile::tempdir().unwrap();
+    dao_stores(d.path());
+    let draft = |name: &str, body: &str| {
+        std::fs::write(d.path().join(name), body).unwrap();
+    };
+    draft(
+        "good.json",
+        r#"{"entries": [{"layer": "Discourse", "when": [{"slot": "Stance", "feature": "feature:18", "test": {"AtLeast": 600}}], "choice": "SOFTCHOICE", "examples": ["EXAMPLETEXT"]}, {"layer": "Lexicon", "choice": "plain"}]}"#,
+    );
+    let admit = |file: &str| {
+        weksa(
+            d.path(),
+            &[
+                "ontology", "admit", file, "--language", "ja-JP", "--inventory-rev", "1",
+                "--model-family", "anthropic", "--generator", "a drafting model",
+            ],
+        )
+    };
+    let o = admit("good.json");
+    assert!(o.status.success(), "{}", out(&o));
+    let o = weksa(d.path(), &["ontology", "dump"]);
+    let text = out(&o);
+    assert_eq!(text.matches("onto:ja-JP:").count(), 2, "{text}");
+    for want in ["onto:ja-JP:1", "onto:ja-JP:2", "Anthropic", "a drafting model", "SOFTCHOICE", "EXAMPLETEXT", "Stance"] {
+        assert!(text.contains(want), "{want}: {text}");
+    }
+    // A second draft numbers on from the language's latest.
+    let o = admit("good.json");
+    assert!(o.status.success(), "{}", out(&o));
+    assert!(out(&weksa(d.path(), &["ontology", "dump"])).contains("onto:ja-JP:4"));
+    // A refused draft writes nothing and echoes no choice text.
+    draft(
+        "bad.json",
+        r#"{"entries": [{"layer": "Discourse", "when": [{"slot": "Stance", "feature": "feature:9999", "test": {"AtLeast": 600}}], "choice": "LEAKYCHOICE"}]}"#,
+    );
+    let before = out(&weksa(d.path(), &["ontology", "dump"]));
+    let o = admit("bad.json");
+    assert!(!o.status.success());
+    assert!(!out(&o).contains("LEAKYCHOICE"), "{}", out(&o));
+    assert_eq!(out(&weksa(d.path(), &["ontology", "dump"])), before);
+}
+
+#[test]
+fn scene_put_and_dump() {
+    let d = tempfile::tempdir().unwrap();
+    cast_entities(d.path(), &["nibu", "brokkr"]);
+    for step in ["seed", "proof", "speaker-scene"] {
+        let o = weksa(d.path(), &["inventory", step]);
+        assert!(o.status.success(), "{}", out(&o));
+    }
+    let mut add = ADD.to_vec();
+    add.extend(["--persona", "nibu", "--fixture", "f.yaml", "--author", "Ada Writer"]);
+    let o = weksa(d.path(), &add);
+    assert!(o.status.success(), "{}", out(&o));
+    let put = |group: &str, to: &str, sets: &[&str]| {
+        let mut args = vec![
+            "scene", "put", "--group", group, "--to", to, "--inventory-rev", "3",
+            "--model-family", "anthropic", "--generator", "a scene annotator",
+        ];
+        for s in sets {
+            args.extend(["--set", s]);
+        }
+        weksa(d.path(), &args)
+    };
+    let sets = ["relative_status=above", "intimacy=200", "in_group=false"];
+    let o = put("scene-1", "unnamed", &sets);
+    assert!(o.status.success(), "{}", out(&o));
+    let dump = out(&weksa(d.path(), &["scene", "dump"]));
+    for want in ["scene:scene-1@1", "rev:3", "Anthropic", "a scene annotator", "entity:nibu->unnamed", "relative_status=above", "intimacy=200", "in_group=false"] {
+        assert!(dump.contains(want), "{want}: {dump}");
+    }
+    // A repeat is unchanged and writes nothing.
+    let o = put("scene-1", "unnamed", &sets);
+    assert!(out(&o).contains("unchanged"), "{}", out(&o));
+    assert_eq!(out(&weksa(d.path(), &["scene", "dump"])), dump);
+    // A changed value is the next revision.
+    let o = put("scene-1", "unnamed", &["relative_status=level", "intimacy=200", "in_group=false"]);
+    assert!(o.status.success(), "{}", out(&o));
+    assert!(out(&weksa(d.path(), &["scene", "dump"])).contains("scene:scene-1@2"));
+    // An unknown gloss and an unknown group are refused and not echoed.
+    for (group, set) in [("scene-1", "canarygloss=1"), ("canarygroup", "intimacy=1")] {
+        let before = out(&weksa(d.path(), &["scene", "dump"]));
+        let o = put(group, "unnamed", &[set]);
+        assert!(!o.status.success());
+        assert!(!out(&o).contains("canary"), "{}", out(&o));
+        assert_eq!(out(&weksa(d.path(), &["scene", "dump"])), before);
+    }
+    // A group with two live speakers is refused: multi-party scenes wait.
+    let mut two = add.clone();
+    let at = two.iter().position(|a| *a == "entity:nibu").unwrap();
+    two[at] = "entity:brokkr";
+    let at = two.iter().position(|a| *a == "nibu").unwrap();
+    two[at] = "brokkr";
+    two.retain(|a| *a != "Mind the hatch.");
+    let at = two.iter().position(|a| *a == "--text").unwrap() + 1;
+    two.insert(at, "Brokkr speaks.");
+    let o = weksa(d.path(), &two);
+    assert!(o.status.success(), "{}", out(&o));
+    let o = put("scene-1", "unnamed", &sets);
+    assert!(!o.status.success());
+    assert!(!out(&o).contains("scene-1"), "{}", out(&o));
+}
+
+#[test]
+fn inventory_admit_numbers_a_draft_and_refuses_an_empty_one() {
+    let d = tempfile::tempdir().unwrap();
+    assert!(weksa(d.path(), &["inventory", "seed"]).status.success());
+    let path = |name: &str, text: &str| {
+        let p = d.path().join(name);
+        std::fs::write(&p, text).unwrap();
+        p.to_str().unwrap().to_owned()
+    };
+    let before = out(&weksa(d.path(), &["inventory", "dump"]));
+
+    for (name, text) in [("empty.json", "{}"), ("junk.json", "not json at all")] {
+        let refused = weksa(d.path(), &["inventory", "admit", &path(name, text)]);
+        assert!(!refused.status.success(), "{}", out(&refused));
+        assert_eq!(before, out(&weksa(d.path(), &["inventory", "dump"])));
+    }
+
+    let draft = path(
+        "draft.json",
+        r#"{"add":[{"family":"Concept","gloss":"bath_house"},{"family":"Frame","gloss":"fly_a_kite"}]}"#,
+    );
+    let admitted = weksa(d.path(), &["inventory", "admit", &draft]);
+    assert!(admitted.status.success(), "{}", out(&admitted));
+    assert!(out(&admitted).contains("admitted rev:2 with 2 entries"));
+    let dump = out(&weksa(d.path(), &["inventory", "dump"]));
+    assert!(dump.contains("bath_house") && dump.contains("fly_a_kite"), "{dump}");
+}
+
+#[test]
+fn inventory_admit_cap_is_256_and_a_refusal_writes_nothing() {
+    let d = tempfile::tempdir().unwrap();
+    assert!(weksa(d.path(), &["inventory", "seed"]).status.success());
+    let draft = |name: &str, n: usize| {
+        let adds: Vec<String> = (0..n)
+            .map(|i| format!(r#"{{"family":"Concept","gloss":"cap_probe_{i}"}}"#))
+            .collect();
+        let p = d.path().join(name);
+        std::fs::write(&p, format!(r#"{{"add":[{}]}}"#, adds.join(","))).unwrap();
+        p.to_str().unwrap().to_owned()
+    };
+    let before = out(&weksa(d.path(), &["inventory", "dump"]));
+
+    let refused = weksa(d.path(), &["inventory", "admit", &draft("over.json", 257)]);
+    assert!(!refused.status.success(), "{}", out(&refused));
+    assert_eq!(before, out(&weksa(d.path(), &["inventory", "dump"])));
+
+    let admitted = weksa(d.path(), &["inventory", "admit", &draft("cap.json", 256)]);
+    assert!(admitted.status.success(), "{}", out(&admitted));
+    assert!(out(&admitted).contains("admitted rev:2 with 256 entries"));
+}
+
+#[test]
+fn corpus_import_labels_spans_and_is_idempotent() {
+    let d = tempfile::tempdir().unwrap();
+    let work = d.path().join("work.json");
+    std::fs::write(
+        &work,
+        r#"{"slug":"lantern-wager","language":"en-US","admitted_on":"2026-11-13",
+        "source":{"PublicDomain":{"work":"The Lantern Wager","author":"A. Invented","edition_url":"https://example.invalid/lantern","licence":"public domain","jurisdiction":"US","translator":"none","edition_year":1890}},
+        "cast":[{"entity":"entity:orsa","forms":["Orsa"]},{"entity":"entity:tamsin","forms":["Tamsin","Tam"]}],
+        "lines":[{"group":"s1","speaker":"entity:orsa","text":"Tamsin, bring the lantern."},
+                 {"group":"s1","speaker":"entity:tamsin","text":"Orsa, I will not."}]}"#,
+    )
+    .unwrap();
+    let names = d.path().join("names.jsonl");
+    std::fs::write(
+        &names,
+        concat!(
+            r#"{"line":1,"marked":"[[entity:tamsin|Tamsin]], bring the lantern."}"#, "\n\n",
+            r#"{"line":2,"marked":"[[entity:orsa|Orsa]], I will not."}"#, "\n",
+        ),
+    )
+    .unwrap();
+    let (w, n) = (work.to_str().unwrap(), names.to_str().unwrap());
+    let bare = weksa(d.path(), &["corpus", "import", w, n]);
+    assert!(!bare.status.success());
+    let flags = ["--model-family", "anthropic", "--generator", "a name annotator"];
+    let run = || weksa(d.path(), &[&["corpus", "import", w, n][..], &flags].concat());
+    let first = run();
+    assert!(first.status.success(), "{}", out(&first));
+    let text = out(&first);
+    assert!(text.contains("Added item:lantern-wager:1 ") && text.contains("Added item:lantern-wager:2 "), "{text}");
+    assert!(text.contains("Added entity:orsa"), "{text}");
+    let second = out(&run());
+    assert!(second.contains("Unchanged item:lantern-wager:1 ") && !second.contains("Added"), "{second}");
+    let dump = out(&weksa(d.path(), &["corpus", "dump"]));
+    assert!(dump.contains("by Some(Model"), "{dump}");
+}
+
+const LANTERN_CAST: &str = r#""cast":[{"entity":"entity:orsa","forms":["Orsa"]},{"entity":"entity:tamsin","forms":["Tamsin","Tam"]}]"#;
+const LANTERN_SOURCE: &str = r#""source":{"PublicDomain":{"work":"The Lantern Wager","author":"A. Invented","edition_url":"https://example.invalid/lantern","licence":"public domain","jurisdiction":"US","translator":"none","edition_year":1890}}"#;
+
+/// Writes a work of `lines` (text per line, all said by Orsa) and an answer of
+/// `marked` per line, returns both paths.
+fn lantern(dir: &std::path::Path, lines: &[&str], marked: &[&str]) -> (String, String) {
+    let ls: Vec<String> = lines
+        .iter()
+        .map(|t| format!(r#"{{"group":"s1","speaker":"entity:orsa","text":"{t}"}}"#))
+        .collect();
+    let work = dir.join("w.json");
+    std::fs::write(
+        &work,
+        format!(
+            r#"{{"slug":"lantern-wager","language":"en-US","admitted_on":"2026-11-13",{LANTERN_SOURCE},{LANTERN_CAST},"lines":[{}]}}"#,
+            ls.join(",")
+        ),
+    )
+    .unwrap();
+    let names = dir.join("n.jsonl");
+    let rows: Vec<String> = marked
+        .iter()
+        .enumerate()
+        .map(|(i, m)| format!(r#"{{"line":{},"marked":"{m}"}}"#, i + 1))
+        .collect();
+    std::fs::write(&names, rows.join("\n")).unwrap();
+    (work.to_str().unwrap().into(), names.to_str().unwrap().into())
+}
+
+const MODEL: [&str; 4] = ["--model-family", "anthropic", "--generator", "a name annotator"];
+
+#[test]
+fn a_refused_import_writes_nothing_and_a_redraw_imports() {
+    let d = tempfile::tempdir().unwrap();
+    let lines = ["Tamsin, bring the lantern.", "Tamsin's lantern, said Orsa."];
+    let (w, n) = lantern(d.path(), &lines, &["[[entity:tamsin|Tamsin]], bring the lantern.", "[[entity:tamsin|Tamsin's]] lantern, said Orsa."]);
+    let import = |w: &str, n: &str| weksa(d.path(), &[&["corpus", "import", w, n][..], &MODEL].concat());
+    let bad = import(&w, &n);
+    assert!(!bad.status.success());
+    assert_eq!(out(&weksa(d.path(), &["corpus", "dump"])).trim(), "");
+    assert!(!d.path().join("e.cc").exists() || EntityStore::open(&d.path().join("e.cc")).unwrap().all().unwrap().is_empty());
+    // The redrawn answer, different on line 1 too, imports.
+    let (w, n) = lantern(d.path(), &lines, &["Tamsin, bring the lantern.", "[[entity:tamsin|Tamsin]]'s lantern, said Orsa."]);
+    let good = import(&w, &n);
+    assert!(good.status.success(), "{}", out(&good));
+    assert!(out(&good).contains("Added item:lantern-wager:2"));
+}
+
+#[test]
+fn a_work_repeating_a_line_is_refused_naming_both_lines() {
+    let d = tempfile::tempdir().unwrap();
+    let (w, n) = lantern(d.path(), &["No, my lord.", "No, my lord!", "Quiet, both of you."], &["No, my lord.", "No, my lord!", "Quiet, both of you."]);
+    let o = weksa(d.path(), &[&["corpus", "import", &w, &n][..], &MODEL].concat());
+    assert!(!o.status.success());
+    let err = String::from_utf8_lossy(&o.stderr).to_string();
+    assert!(err.contains("item:lantern-wager:2") && err.contains("item:lantern-wager:1"), "{err}");
+    assert_eq!(out(&weksa(d.path(), &["corpus", "dump"])).trim(), "");
+}
+
+#[test]
+fn the_annotator_flags_decide_the_label() {
+    let d = tempfile::tempdir().unwrap();
+    let (w, n) = lantern(d.path(), &["Quiet, both of you."], &["Quiet, both of you."]);
+    let none = weksa(d.path(), &["corpus", "import", &w, &n]);
+    assert!(!none.status.success());
+    let blank = weksa(d.path(), &["corpus", "import", &w, &n, "--model-family", "anthropic", "--generator", " "]);
+    assert!(!blank.status.success());
+    assert_eq!(out(&weksa(d.path(), &["corpus", "dump"])).trim(), "");
+    let op = weksa(d.path(), &["corpus", "import", &w, &n, "--operator"]);
+    assert!(op.status.success(), "{}", out(&op));
+    let dump = out(&weksa(d.path(), &["corpus", "dump"]));
+    assert!(dump.contains("by Some(Operator)"), "{dump}");
+}
+
+#[test]
+fn an_import_refused_on_a_cast_entity_leaves_both_stores_untouched() {
+    let d = tempfile::tempdir().unwrap();
+    // entity:tamsin is already held by a cast origin, so the work's PublicDomain
+    // claim on it (cast position 2, after orsa) is refused by EntityStore::put.
+    cast_entities(d.path(), &["tamsin"]);
+    let (w, n) = lantern(d.path(), &["Quiet, both of you."], &["Quiet, both of you."]);
+    let before = std::fs::read(d.path().join("e.cc")).unwrap();
+    let o = weksa(d.path(), &[&["corpus", "import", &w, &n][..], &MODEL].concat());
+    assert!(!o.status.success());
+    assert!(String::from_utf8_lossy(&o.stderr).contains("a cast entity"), "{}", String::from_utf8_lossy(&o.stderr));
+    assert_eq!(std::fs::read(d.path().join("e.cc")).unwrap(), before);
+    assert!(!d.path().join("c.cc").exists() || CorpusStore::open(&d.path().join("c.cc")).unwrap().all().unwrap().is_empty());
+}
diff --git a/crates/weksa/tests/common/mod.rs b/crates/weksa/tests/common/mod.rs
index b7b7c7e..8ee0596 100644
--- a/crates/weksa/tests/common/mod.rs
+++ b/crates/weksa/tests/common/mod.rs
@@ -114,6 +114,44 @@ pub fn entities_in(dir: &std::path::Path) -> EntityStore {
     store
 }
 
+/// An empty ontology store at `<dir>/ontology.cc`, made if absent.
+pub fn ontology_in(dir: &std::path::Path) -> std::path::PathBuf {
+    let path = dir.join("ontology.cc");
+    if !path.exists() {
+        std::fs::write(&path, [0x90]).unwrap();
+    }
+    path
+}
+
+/// A new inventory store at `path` holding the Dao inventory as it stood at
+/// rev 3 (seed, proof, the Dao revision): the loop tests' fixed head, whose
+/// round and candidate revisions they pin. The committed
+/// `data/daodejing/inventory.cc` is rev 4 and is read by the corpus tests.
+pub fn dao_rev3_at(path: &std::path::Path) {
+    let mut store = weksa::InventoryStore::open(path).unwrap();
+    for (rev, entries) in [
+        weksa::inventory::seed(),
+        weksa::inventory::proof_revision(),
+        weksa::daodejing::revision(),
+    ] {
+        store.admit_revision(rev, entries).unwrap();
+    }
+}
+
+/// An empty speaker-state store beside `ontology` (same directory), made if absent.
+pub fn speaker_state_beside(ontology: &std::path::Path) -> std::path::PathBuf {
+    let path = ontology.with_file_name("speaker-state.cc");
+    if !path.exists() {
+        std::fs::write(&path, [0x90]).unwrap();
+    }
+    path
+}
+
+/// An empty speaker-state store at `<dir>/speaker-state.cc`, made if absent.
+pub fn speaker_state_in(dir: &std::path::Path) -> std::path::PathBuf {
+    speaker_state_beside(&dir.join("ontology.cc"))
+}
+
 /// A run over the stores `world()` and `corpus()` keep in `dir`: `c.cc`,
 /// `i.cc` and `entities.cc`. Read at the call, so create it after the items.
 /// The run's en-US panel needs a live Train and a live Validation item: a
@@ -125,6 +163,7 @@ pub fn run_over(dir: &std::path::Path) -> weksa::run::RunStores {
         }
     }
     let entities = entities_in(dir);
+    ontology_in(dir);
     let mut corpus = CorpusStore::open(&dir.join("c.cc")).unwrap();
     for (n, split) in [(1, weksa::Split::Train), (2, weksa::Split::Validation)] {
         let held = corpus
@@ -147,6 +186,8 @@ pub fn run_over(dir: &std::path::Path) -> weksa::run::RunStores {
             corpus: &dir.join("c.cc"),
             inventory: &dir.join("i.cc"),
             entities: &dir.join("entities.cc"),
+            ontology: &dir.join("ontology.cc"),
+            speaker_state: &speaker_state_beside(&dir.join("ontology.cc")),
         },
         "fake-model",
         "bag",
@@ -164,6 +205,7 @@ pub fn item_in(key: &str, text: &str, group: &str, source: Source) -> CorpusItem
         language: "en-US".into(),
         speaker: eid("nibu"),
         names: vec![],
+        names_by: None,
         group: group.into(),
         prior_turns: vec![],
         source,
@@ -230,6 +272,7 @@ pub fn world() -> World {
     let dir = tempfile::tempdir().unwrap();
     let mut corpus = CorpusStore::open(&dir.path().join("c.cc")).unwrap();
     let entities = entities_in(dir.path());
+    ontology_in(dir.path());
     let train = group_in_bucket(10);
     let mut first = item_in("item:nibu:1", "Nibu says mind the hatch.", &train, cast());
     first.names = vec![NameSpan {
diff --git a/crates/weksa/tests/context.rs b/crates/weksa/tests/context.rs
index 0103149..d2550de 100644
--- a/crates/weksa/tests/context.rs
+++ b/crates/weksa/tests/context.rs
@@ -537,16 +537,18 @@ mod lowering {
     use weksa::daodejing::packets;
     use weksa::entity::{Entity, EntityOrigin, LanguageForms};
     use weksa::packet::{EntityId, Packet, proof_packet};
+    use weksa::packet::Grade;
     use weksa::{
-        CorpusItemId, CorpusStore, EntityForms, EntityStore, Inventory, InventoryStore,
-        LowerError, LoweringInput, PacketStore,
+        Annotator, Condition, CorpusItemId, CorpusStore, EntityForms, EntityStore, Inventory,
+        InventoryStore, Layer, LowerError, LoweringInput, OntologyEntry, OntologyStore, PacketStore, Test, select,
     };
 
     fn data(sub: &str) -> PathBuf {
         Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data").join(sub)
     }
 
-    fn admitted(
+    /// The admitted view, its scene never read.
+    fn admitted_unread(
         packet: Packet,
         inv: &InventoryStore,
         corpus: &str,
@@ -560,6 +562,37 @@ mod lowering {
             .unwrap()
     }
 
+    /// The admitted view with its scene read over an empty speaker-state store.
+    fn admitted(
+        packet: Packet,
+        inv: &InventoryStore,
+        corpus: &str,
+        entities: &EntityStore,
+    ) -> LoweringInput {
+        let view = admitted_unread(packet, inv, corpus, entities);
+        let dir = tempfile::tempdir().unwrap();
+        let state = weksa::SpeakerStateStore::open(&dir.path().join("s.cc")).unwrap();
+        let corpus = CorpusStore::open(&data(corpus)).unwrap();
+        view.with_scene(&inv.inventory().unwrap(), &state, &corpus).unwrap()
+    }
+
+    #[test]
+    fn lowering_prompt_refuses_an_unread_scene() {
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let entities = EntityStore::open(&data("entity/entity.cc")).unwrap();
+        let inv = cast.inventory().unwrap();
+        let item = CorpusItemId::parse("item:nibu:1").unwrap();
+        let held = Held(vec![nibu(&[("en-US", &["Nibu"])])]);
+        let unread = admitted_unread(proof_packet(), &cast, "corpus/corpus.cc", &entities);
+        let empty = weksa::Ontology::empty();
+        assert_eq!(
+            Prompt::lower(&unread, &item, &away(), "en-US", &inv, &held, &empty).err(),
+            Some(LowerError::SceneUnread)
+        );
+        let read = admitted(proof_packet(), &cast, "corpus/corpus.cc", &entities);
+        assert!(Prompt::lower(&read, &item, &away(), "en-US", &inv, &held, &empty).is_ok());
+    }
+
     fn dao(index: usize) -> (LoweringInput, Inventory, EntityStore, CorpusItemId) {
         let inv = InventoryStore::open(&data("daodejing/inventory.cc")).unwrap();
         let entities = EntityStore::open(&data("daodejing/entity.cc")).unwrap();
@@ -578,6 +611,11 @@ mod lowering {
         }
     }
 
+    /// A speaker no referent cites.
+    fn away() -> EntityId {
+        EntityId::parse("entity:nobody").unwrap()
+    }
+
     fn nibu(forms: &[(&str, &[&str])]) -> Entity {
         Entity {
             id: EntityId::parse("entity:nibu").unwrap(),
@@ -602,7 +640,7 @@ mod lowering {
     fn lower_prompt_names_its_language() {
         let (view, inv, entities, item) = dao(2);
         for tag in ["en-US", "ja-JP", "pt-BR"] {
-            let prompt = Prompt::lower(&view, &item, tag, &inv, &entities).unwrap();
+            let prompt = Prompt::lower(&view, &item, &away(), tag, &inv, &entities, &weksa::Ontology::empty()).unwrap();
             let want = format!("{LOWER}\n\nlanguage: {tag}\n\npacket: ");
             assert!(prompt.text().starts_with(&want), "{tag}");
         }
@@ -614,10 +652,10 @@ mod lowering {
     #[test]
     fn lower_prompt_text_is_pinned() {
         let (view, inv, entities, item) = dao(2);
-        let prompt = Prompt::lower(&view, &item, "en-US", &inv, &entities).unwrap();
+        let prompt = Prompt::lower(&view, &item, &away(), "en-US", &inv, &entities, &weksa::Ontology::empty()).unwrap();
         let (head, listing) = prompt.text().split_once("inventory rev:3\n").unwrap();
         let expected = format!(
-            "{LOWER}\n\nlanguage: en-US\n\npacket: {}\n\nentities: {{}}\n\n",
+            "{LOWER}\n\nlanguage: en-US\n\npacket: {}\n\nentities: {{}}\n\nontology: none\n\n",
             concat!(
                 r#"{"context":{"setting":null,"medium":null,"participants":[],"audience":[]},"#,
                 r#""discourse":{"speech_act":"speech_act:1","addressee":null,"addressee_consent":null,"features":[]},"#,
@@ -659,6 +697,29 @@ mod lowering {
         }
     }
 
+    /// The mint cut added no line to what the lowerer sees: a prompt with a
+    /// selected ontology entry has the digest it had at af0a56d.
+    #[test]
+    fn the_lowering_prompt_of_a_fixed_packet_is_unchanged_by_the_ontology_mint() {
+        use weksa::encode::OntologyDraft;
+        use weksa::speaker::Annotator;
+        let (view, inv, entities, item) = dao(2);
+        let store = InventoryStore::open(&data("daodejing/inventory.cc")).unwrap();
+        let dir = tempfile::tempdir().unwrap();
+        let mut onto = weksa::OntologyStore::open(&dir.path().join("o.cc")).unwrap();
+        let annotator = Annotator::Model {
+            family: weksa::corpus::ModelFamily::Anthropic,
+            generator: "golden".into(),
+        };
+        let draft = r#"{"entries":[{"layer":"Grammar","choice":"golden choice","examples":["golden example"]}]}"#;
+        let entries = OntologyDraft::parse(draft).unwrap().into_entries("en-US", 3, 1, &annotator);
+        onto.admit(entries, &store).unwrap();
+        let prompt =
+            Prompt::lower(&view, &item, &away(), "en-US", &inv, &entities, &onto.ontology().unwrap()).unwrap();
+        assert!(prompt.text().contains("golden choice"));
+        assert_eq!(prompt.digest(), "4a40eb57282b059d");
+    }
+
     #[test]
     fn lower_prompt_moves_with_the_stance_alone() {
         use weksa::packet::{FeatValue, FeatureValue, Grade, Stance};
@@ -676,7 +737,7 @@ mod lowering {
             let mut packet = packets().remove(2);
             packet.stance = stance.clone();
             let view = admitted(packet, &store, "daodejing/corpus.cc", &entities);
-            let prompt = Prompt::lower(&view, &item, "en-US", &inv, &entities).unwrap();
+            let prompt = Prompt::lower(&view, &item, &away(), "en-US", &inv, &entities, &weksa::Ontology::empty()).unwrap();
             (stance, prompt)
         };
         let three = [prompt_of(own), prompt_of(angry), prompt_of(Stance::default())];
@@ -713,7 +774,7 @@ mod lowering {
             ("sa-Latn", &["Nibuwa"]),
             ("en-US", &["Nibu", "Nibu's"]),
         ])]);
-        let prompt = Prompt::lower(&view, &item, "en-US", &cast.inventory().unwrap(), &held).unwrap();
+        let prompt = Prompt::lower(&view, &item, &away(), "en-US", &cast.inventory().unwrap(), &held, &weksa::Ontology::empty()).unwrap();
         assert!(
             prompt
                 .text()
@@ -743,9 +804,358 @@ mod lowering {
             ),
             (Held(vec![]), LowerError::UnknownEntity { entity: id }),
         ] {
-            assert_eq!(Prompt::lower(&view, &item, "en-US", &inv, &held).err(), Some(want));
+            assert_eq!(Prompt::lower(&view, &item, &away(), "en-US", &inv, &held, &weksa::Ontology::empty()).err(), Some(want));
         }
     }
+
+    /// The item's speaker id is never printed, though a referent cites it: the
+    /// referent holds the token, the forms line holds the speaker's forms under
+    /// it, and the view itself is not changed.
+    #[test]
+    fn a_cited_speaker_is_replaced_by_the_token_in_the_lowering_prompt() {
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let cast_entities = EntityStore::open(&data("entity/entity.cc")).unwrap();
+        let view = admitted(proof_packet(), &cast, "corpus/corpus.cc", &cast_entities);
+        let inv = cast.inventory().unwrap();
+        let item = CorpusItemId::parse("item:nibu:1").unwrap();
+        let speaker = EntityId::parse("entity:nibu").unwrap();
+        let held = Held(vec![nibu(&[("en-US", &["NIBUCANARY"])])]);
+        let lower = |held: &Held| {
+            Prompt::lower(&view, &item, &speaker, "en-US", &inv, held, &weksa::Ontology::empty())
+        };
+        let prompt = lower(&held).unwrap();
+        let text = prompt.text();
+        assert!(!text.contains("entity:nibu"), "{text}");
+        assert!(text.contains("\n\nentities: {\"entity:speaker\":[\"NIBUCANARY\"]}\n\n"), "{text}");
+        assert!(text.contains(r#""id":"n3","kind":"referent_kind:1","concept":"concept:5","entity":"entity:speaker""#), "{text}");
+        assert!(view.referents().iter().any(|r| r.entity.as_ref() == Some(&speaker)));
+        // A speaker the language has no form for, or the port lacks, does not
+        // refuse: its referent names no entity and the line has no entry.
+        for held in [Held(vec![]), Held(vec![nibu(&[("sa-Latn", &["Nibuwa"])])])] {
+            let prompt = lower(&held).unwrap();
+            let text = prompt.text();
+            assert!(text.contains("\n\nentities: {}\n\n") && !text.contains("entity:speaker"), "{text}");
+            assert!(text.contains(r#""concept":"concept:5","entity":null"#), "{text}");
+        }
+    }
+
+    /// The speaker's forms are those of the item's language, and a language whose form list is
+    /// an empty list is no form: the line has no token entry.
+    #[test]
+    fn the_speakers_forms_are_those_of_the_items_language() {
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let cast_entities = EntityStore::open(&data("entity/entity.cc")).unwrap();
+        let view = admitted(proof_packet(), &cast, "corpus/corpus.cc", &cast_entities);
+        let inv = cast.inventory().unwrap();
+        let item = CorpusItemId::parse("item:nibu:1").unwrap();
+        let speaker = EntityId::parse("entity:nibu").unwrap();
+        let lower = |tag: &str, held: &Held| {
+            Prompt::lower(&view, &item, &speaker, tag, &inv, held, &weksa::Ontology::empty())
+                .unwrap()
+                .text()
+                .to_string()
+        };
+        let held = Held(vec![nibu(&[("en-US", &["ENGLISHFORM"]), ("ja-JP", &["NIHONGOFORM"])])]);
+        let ja = lower("ja-JP", &held);
+        assert!(ja.contains("\n\nentities: {\"entity:speaker\":[\"NIHONGOFORM\"]}\n\n"), "{ja}");
+        assert!(!ja.contains("ENGLISHFORM"), "{ja}");
+        let en = lower("en-US", &held);
+        assert!(en.contains("{\"entity:speaker\":[\"ENGLISHFORM\"]}") && !en.contains("NIHONGOFORM"), "{en}");
+        let empty = lower("en-US", &Held(vec![nibu(&[("en-US", &[])])]));
+        assert!(empty.contains("\n\nentities: {}\n\n") && !empty.contains("entity:speaker"), "{empty}");
+        assert!(empty.contains(r#""concept":"concept:5","entity":null"#), "{empty}");
+    }
+
+    /// A real entity whose id is the token would read as the speaker: refused.
+    #[test]
+    fn a_cited_entity_with_the_tokens_id_is_refused() {
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let mut packet = proof_packet();
+        packet.referents[2].entity = Some(EntityId::parse(weksa::context::SPEAKER_TOKEN).unwrap());
+        let dir = tempfile::tempdir().unwrap();
+        let mut entities = EntityStore::open(&dir.path().join("e.cc")).unwrap();
+        entities.put(super::common::ent("speaker", "en-US", &["Spk"])).unwrap();
+        entities.put(super::common::ent("nibu", "en-US", &["Nibu"])).unwrap();
+        let mut corpus = CorpusStore::open(&dir.path().join("c.cc")).unwrap();
+        let mut item = super::common::item_in("item:nibu:1", "A line.", &super::common::group_in_bucket(10), super::common::cast());
+        item.prior_turns = vec![weksa::Turn { speaker: super::common::eid("speaker"), text: "Well?".into() }];
+        corpus.add(item, &entities).unwrap();
+        let view = PacketStore::open(&dir.path().join("p.cc")).unwrap().admit(packet, &cast, &corpus, &entities).unwrap();
+        let state = weksa::SpeakerStateStore::open(&dir.path().join("s.cc")).unwrap();
+        let view = view.with_scene(&cast.inventory().unwrap(), &state, &corpus).unwrap();
+        let item = CorpusItemId::parse("item:nibu:1").unwrap();
+        let held = Held(vec![super::common::ent("speaker", "en-US", &["Spk"]), nibu(&[("en-US", &["Nibu"])])]);
+        for speaker in ["entity:nibu", "entity:speaker"] {
+            let speaker = EntityId::parse(speaker).unwrap();
+            assert_eq!(
+                Prompt::lower(&view, &item, &speaker, "en-US", &cast.inventory().unwrap(), &held, &weksa::Ontology::empty()).err(),
+                Some(LowerError::SpeakerTokenTaken)
+            );
+        }
+    }
+
+    /// Only the speaker is replaced: when the item's speaker is someone else,
+    /// the cited entity keeps its id in the packet and its forms line.
+    #[test]
+    fn a_cited_entity_that_is_not_the_speaker_is_kept() {
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let cast_entities = EntityStore::open(&data("entity/entity.cc")).unwrap();
+        let view = admitted(proof_packet(), &cast, "corpus/corpus.cc", &cast_entities);
+        let item = CorpusItemId::parse("item:nibu:1").unwrap();
+        let held = Held(vec![nibu(&[("en-US", &["NIBUCANARY"])])]);
+        let prompt = Prompt::lower(&view, &item, &away(), "en-US", &cast.inventory().unwrap(), &held, &weksa::Ontology::empty()).unwrap();
+        let text = prompt.text();
+        assert!(text.contains(r#""concept":"concept:5","entity":"entity:nibu""#), "{text}");
+        assert!(text.contains("\n\nentities: {\"entity:nibu\":[\"NIBUCANARY\"]}\n\n"), "{text}");
+    }
+
+    /// Every referent citing the speaker holds the token, not the first.
+    #[test]
+    fn a_speaker_cited_on_two_referents_prints_the_token_on_both() {
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let cast_entities = EntityStore::open(&data("entity/entity.cc")).unwrap();
+        let mut packet = proof_packet();
+        let speaker = EntityId::parse("entity:nibu").unwrap();
+        packet.referents[0].entity = Some(speaker.clone());
+        assert_eq!(packet.referents.iter().filter(|r| r.entity.as_ref() == Some(&speaker)).count(), 2);
+        let view = admitted(packet, &cast, "corpus/corpus.cc", &cast_entities);
+        let item = CorpusItemId::parse("item:nibu:1").unwrap();
+        let held = Held(vec![nibu(&[("en-US", &["NIBUCANARY"])])]);
+        let prompt = Prompt::lower(&view, &item, &speaker, "en-US", &cast.inventory().unwrap(), &held, &weksa::Ontology::empty()).unwrap();
+        let text = prompt.text();
+        assert!(!text.contains("entity:nibu"), "{text}");
+        assert_eq!(text.matches(r#""entity":"entity:speaker""#).count(), 2, "{text}");
+        assert!(text.contains("\n\nentities: {\"entity:speaker\":[\"NIBUCANARY\"]}\n\n"), "{text}");
+    }
+
+    /// The speaker is matched by whole id: a cited entity whose id the
+    /// speaker's id is a prefix of is another entity and still prints.
+    #[test]
+    fn an_entity_sharing_a_prefix_with_the_speaker_is_kept() {
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let cast_entities = EntityStore::open(&data("entity/entity.cc")).unwrap();
+        let view = admitted(proof_packet(), &cast, "corpus/corpus.cc", &cast_entities);
+        let item = CorpusItemId::parse("item:nibu:1").unwrap();
+        let held = Held(vec![nibu(&[("en-US", &["NIBUCANARY"])])]);
+        let speaker = EntityId::parse("entity:nib").unwrap();
+        let prompt = Prompt::lower(&view, &item, &speaker, "en-US", &cast.inventory().unwrap(), &held, &weksa::Ontology::empty()).unwrap();
+        let text = prompt.text();
+        assert!(text.contains(r#""entity":"entity:nibu""#), "{text}");
+        assert!(text.contains("NIBUCANARY"), "{text}");
+    }
+
+    /// The proof packet admitted for an item whose speaker is `speaker` and
+    /// whose prior turn is `other`'s, with `speaker` on referent n3 and `other`
+    /// on referent n1, then lowered in en-US over an entity port holding `held`.
+    fn lowered_for(speaker: &str, other: &str, held: &[Entity]) -> String {
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let dir = tempfile::tempdir().unwrap();
+        let mut entities = EntityStore::open(&dir.path().join("e.cc")).unwrap();
+        for slug in [speaker, other] {
+            entities.put(super::common::ent(slug, "en-US", &["Stored"])).unwrap();
+        }
+        let mut corpus = CorpusStore::open(&dir.path().join("c.cc")).unwrap();
+        let mut item = super::common::item_in("item:nibu:1", "A line.", &super::common::group_in_bucket(10), super::common::cast());
+        item.speaker = super::common::eid(speaker);
+        item.prior_turns = vec![weksa::Turn { speaker: super::common::eid(other), text: "Well?".into() }];
+        corpus.add(item, &entities).unwrap();
+        let mut packet = proof_packet();
+        packet.referents[0].entity = Some(super::common::eid(other));
+        packet.referents[2].entity = Some(super::common::eid(speaker));
+        let view = PacketStore::open(&dir.path().join("p.cc"))
+            .unwrap()
+            .admit(packet, &cast, &corpus, &entities)
+            .unwrap();
+        let state = weksa::SpeakerStateStore::open(&dir.path().join("s.cc")).unwrap();
+        let view = view.with_scene(&cast.inventory().unwrap(), &state, &corpus).unwrap();
+        let item = CorpusItemId::parse("item:nibu:1").unwrap();
+        Prompt::lower(
+            &view,
+            &item,
+            &super::common::eid(speaker),
+            "en-US",
+            &cast.inventory().unwrap(),
+            &Held(held.to_vec()),
+            &weksa::Ontology::empty(),
+        )
+        .unwrap()
+        .text()
+        .to_string()
+    }
+
+    /// Persona's ruling `speaker-alias-token-in-lowering-prompt`: the item's
+    /// speaker prints as one fixed role token, the same for every speaker and
+    /// every item, with the speaker's forms under it; its entity id never
+    /// prints. Another cited entity still prints under its own id.
+    #[test]
+    fn the_item_speaker_is_a_fixed_token_with_its_forms() {
+        const TOKEN: &str = "entity:speaker";
+        let forms = |slug: &str, form: &str| super::common::ent(slug, "en-US", &[form]);
+        let other = forms("othercite", "OTTERBLOOM");
+        let a = lowered_for("keeperzed", "othercite", &[forms("keeperzed", "ZEBRAQUILL"), other.clone()]);
+        let b = lowered_for("secondvoice", "othercite", &[forms("secondvoice", "MARMOTLUTE"), other.clone()]);
+        for (text, id, form, other_form) in [(&a, "keeperzed", "ZEBRAQUILL", "MARMOTLUTE"), (&b, "secondvoice", "MARMOTLUTE", "ZEBRAQUILL")] {
+            assert!(!text.contains(id), "{id} in {text}");
+            assert!(!text.contains(other_form), "{other_form} in {text}");
+            assert!(text.contains(r#""concept":"concept:5","entity":"entity:speaker""#), "{text}");
+            assert!(text.contains(&format!(r#""{TOKEN}":["{form}"]"#)), "{text}");
+            assert!(text.contains(r#""entity":"entity:othercite""#), "{text}");
+            assert!(text.contains(r#""entity:othercite":["OTTERBLOOM"]"#), "{text}");
+        }
+        // The token is one constant: the entities lines differ only in the speaker's form.
+        assert_eq!(a.replace("ZEBRAQUILL", "F"), b.replace("MARMOTLUTE", "F"));
+        // A speaker with no form in the language does not refuse and gets no token entry.
+        let bare = lowered_for("keeperzed", "othercite", &[other]);
+        assert!(!bare.contains("keeperzed") && !bare.contains(TOKEN), "{bare}");
+        assert!(bare.contains(r#"{"entity:othercite":["OTTERBLOOM"]}"#), "{bare}");
+    }
+
+    fn feature(inv: &Inventory, gloss: &str) -> weksa::InvId {
+        inv.entries().find(|e| e.gloss == gloss).unwrap().id
+    }
+
+    fn entry(language: &str, n: u32, when: Vec<Condition>, choice: &str) -> OntologyEntry {
+        OntologyEntry {
+            language: language.into(),
+            n,
+            inventory_rev: 1,
+            layer: Layer::Discourse,
+            when,
+            choice: choice.into(),
+            examples: vec![],
+            annotator: Annotator::Operator,
+        }
+    }
+
+    /// The ontology the store holds after admitting `entries` as one batch.
+    fn ontology_of(cast: &InventoryStore, entries: Vec<OntologyEntry>) -> weksa::Ontology {
+        let dir = tempfile::tempdir().unwrap();
+        let mut store = OntologyStore::open(&dir.path().join("o.cc")).unwrap();
+        store.admit(entries, cast).unwrap();
+        store.ontology().unwrap()
+    }
+
+    fn at_least(inv: &Inventory, gloss: &str, g: u16) -> Condition {
+        Condition {
+            slot: weksa::Slot::Stance,
+            feature: feature(inv, gloss),
+            test: Test::AtLeast(Grade::new(g).unwrap()),
+        }
+    }
+
+    /// The proof packet's view with the given stance restraint and discourse irony.
+    fn view_of(
+        restraint: Option<u16>,
+        irony: Option<bool>,
+        cast: &InventoryStore,
+        entities: &EntityStore,
+    ) -> LoweringInput {
+        use weksa::packet::{FeatValue, FeatureValue};
+        let inv = cast.inventory().unwrap();
+        let mut packet = proof_packet();
+        packet.stance.features = restraint
+            .map(|v| FeatureValue {
+                feature: feature(&inv, "restraint"),
+                value: FeatValue::Grade(Grade::new(v).unwrap()),
+            })
+            .into_iter()
+            .collect();
+        packet.discourse.features = irony
+            .map(|v| FeatureValue {
+                feature: feature(&inv, "irony"),
+                value: FeatValue::Flag(v),
+            })
+            .into_iter()
+            .collect();
+        admitted(packet, cast, "corpus/corpus.cc", entities)
+    }
+
+    #[test]
+    fn select_reads_stance_and_discourse_of_its_language() {
+        use weksa::packet::FeatValue;
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let entities = EntityStore::open(&data("entity/entity.cc")).unwrap();
+        let inv = cast.inventory().unwrap();
+        let ontology = ontology_of(&cast, vec![
+            entry("ja-JP", 1, vec![at_least(&inv, "restraint", 600)], "high"),
+            entry(
+                "ja-JP",
+                2,
+                vec![Condition {
+                    slot: weksa::Slot::Stance,
+                    feature: feature(&inv, "restraint"),
+                    test: Test::AtMost(Grade::new(300).unwrap()),
+                }],
+                "low",
+            ),
+            entry(
+                "ja-JP",
+                3,
+                vec![Condition {
+                    slot: weksa::Slot::Discourse,
+                    feature: feature(&inv, "irony"),
+                    test: Test::Is(FeatValue::Flag(true)),
+                }],
+                "ironic",
+            ),
+            entry("ja-JP", 4, vec![], "always"),
+            entry("en-US", 1, vec![], "other language"),
+        ]);
+        let keys = |view: &LoweringInput, language: &str| -> Vec<String> {
+            select(&ontology, language, view).iter().map(|e| e.key()).collect()
+        };
+        let both = view_of(Some(700), Some(true), &cast, &entities);
+        assert_eq!(keys(&both, "ja-JP"), ["onto:ja-JP:1", "onto:ja-JP:3", "onto:ja-JP:4"]);
+        assert_eq!(keys(&both, "en-US"), ["onto:en-US:1"]);
+        let low = view_of(Some(200), Some(false), &cast, &entities);
+        assert_eq!(keys(&low, "ja-JP"), ["onto:ja-JP:2", "onto:ja-JP:4"]);
+        // A grade equal to the bound meets AtLeast and AtMost alike.
+        let edge = view_of(Some(600), None, &cast, &entities);
+        assert_eq!(keys(&edge, "ja-JP"), ["onto:ja-JP:1", "onto:ja-JP:4"]);
+        let edge = view_of(Some(300), None, &cast, &entities);
+        assert_eq!(keys(&edge, "ja-JP"), ["onto:ja-JP:2", "onto:ja-JP:4"]);
+        // An absent feature meets no condition, however lax.
+        let bare = view_of(None, None, &cast, &entities);
+        assert_eq!(keys(&bare, "ja-JP"), ["onto:ja-JP:4"]);
+    }
+
+    #[test]
+    fn lowering_prompt_prints_only_selected_entries() {
+        let cast = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+        let cast_entities = EntityStore::open(&data("entity/entity.cc")).unwrap();
+        let inv = cast.inventory().unwrap();
+        let mut hit = entry("ja-JP", 1, vec![at_least(&inv, "restraint", 600)], "HITCHOICE");
+        hit.examples = vec!["HITEXAMPLE".into()];
+        let ontology = ontology_of(&cast, vec![
+            hit,
+            entry("ja-JP", 2, vec![at_least(&inv, "restraint", 900)], "MISSCHOICE"),
+            entry("en-US", 1, vec![], "ENGLISHCHOICE"),
+        ]);
+        let held = Held(vec![nibu(&[("ja-JP", &["ニブ"]), ("en-US", &["Nibu"])])]);
+        let item = CorpusItemId::parse("item:nibu:1").unwrap();
+        let view = view_of(Some(700), None, &cast, &cast_entities);
+        let lowered = |view: &LoweringInput, o: &weksa::Ontology| {
+            Prompt::lower(view, &item, &away(), "ja-JP", &inv, &held, o).unwrap()
+        };
+        let prompt = lowered(&view, &ontology);
+        let text = prompt.text();
+        assert!(text.contains("\n\nontology:\nonto:ja-JP:1 [discourse] HITCHOICE | e.g. HITEXAMPLE\n\n"), "{text}");
+        for absent in ["MISSCHOICE", "ENGLISHCHOICE", "onto:ja-JP:2", "onto:en-US:1"] {
+            assert!(!text.contains(absent), "{absent}");
+        }
+        // The same view with no entries: the section reads none.
+        let none = lowered(&view, &weksa::Ontology::empty());
+        assert!(none.text().contains("\n\nontology: none\n\n"));
+        // Entries move the prompt and nothing else of the view does.
+        assert_ne!(prompt.digest(), none.digest());
+        // The group is still private.
+        let held_item = CorpusStore::open(&data("corpus/corpus.cc"))
+            .unwrap()
+            .get(item.as_str())
+            .unwrap()
+            .unwrap();
+        assert!(!text.contains(held_item.group.as_str()));
+    }
 }
 
 /// First real rounds: five of six encoders wrote bare integers (`"concept": 7`)
diff --git a/crates/weksa/tests/entities.rs b/crates/weksa/tests/entities.rs
index 5f1f7cf..9d316bf 100644
--- a/crates/weksa/tests/entities.rs
+++ b/crates/weksa/tests/entities.rs
@@ -502,3 +502,96 @@ fn a_malformed_pronunciation_is_refused() {
     }
     assert_eq!(store.get(&eid("kay")).unwrap(), None);
 }
+
+const LANTERN: &str = r#"{"slug":"lantern-wager","language":"en-US","admitted_on":"2026-11-13",
+    "source":{"PublicDomain":{"work":"The Lantern Wager","author":"A. Invented","edition_url":"https://example.invalid/lantern","licence":"public domain","jurisdiction":"US","translator":"none","edition_year":1890}},
+    "cast":[{"entity":"entity:orsa","forms":["Orsa"]},{"entity":"entity:tamsin","forms":["Tamsin","Tam"]}],
+    "lines":[{"group":"s1","speaker":"entity:orsa","text":"Tamsin, bring the lantern."},
+             {"group":"s1","speaker":"entity:tamsin","text":"Tamsin's lantern, said Orsa."},
+             {"group":"s2","speaker":"entity:orsa","text":"Quiet, both of you."}]}"#;
+
+fn marked(line: u32, text: &str) -> weksa::encode::MarkedLine {
+    weksa::encode::MarkedLine { line, marked: text.into() }
+}
+
+#[test]
+fn an_imported_work_passes_the_store_doors() {
+    use weksa::Annotator;
+    use weksa::corpus::ModelFamily;
+    let d = tempfile::tempdir().unwrap();
+    let mut entities = EntityStore::open(&d.path().join("e.cc")).unwrap();
+    let mut corpus = CorpusStore::open(&d.path().join("c.cc")).unwrap();
+    let model = Annotator::Model { family: ModelFamily::Anthropic, generator: "g".into() };
+    let work = || weksa::encode::WorkDraft::parse(LANTERN).unwrap();
+    let (cast, items) = work()
+        .into_import(&[marked(1, "[[entity:tamsin|Tamsin]], bring the lantern.")], &model)
+        .unwrap();
+    for e in cast {
+        assert_eq!(entities.put(e).unwrap(), AddOutcome::Added);
+    }
+    for i in items.clone() {
+        assert_eq!(corpus.add(i, &entities).unwrap(), AddOutcome::Added);
+    }
+    drop(corpus);
+    let mut corpus = CorpusStore::open(&d.path().join("c.cc")).unwrap();
+    let stored = corpus.get("item:lantern-wager:1").unwrap().unwrap();
+    assert_eq!(stored.names_by, Some(model.clone()));
+    assert_eq!(stored.names.len(), 1);
+    assert_eq!(corpus.add(items[0].clone(), &entities).unwrap(), AddOutcome::Unchanged);
+
+    // A form the entity does not list is the store's refusal, not the importer's.
+    let (_, bad) = work()
+        .into_import(&[marked(2, "[[entity:tamsin|Tamsin's]] lantern, said Orsa.")], &model)
+        .unwrap();
+    assert!(matches!(
+        refusal(corpus.add(bad[0].clone(), &entities)),
+        StoreRefusal::NameSpanNotAForm { .. }
+    ));
+
+    // An operator run over another line labels its own spans.
+    let (_, op) = work()
+        .into_import(&[marked(3, "Quiet, both of you.")], &Annotator::Operator)
+        .unwrap();
+    assert_eq!(corpus.add(op[0].clone(), &entities).unwrap(), AddOutcome::Added);
+    assert_eq!(
+        corpus.get("item:lantern-wager:3").unwrap().unwrap().names_by,
+        Some(Annotator::Operator)
+    );
+    // The first run's line keeps its label.
+    assert_eq!(corpus.get("item:lantern-wager:1").unwrap().unwrap().names_by, Some(model));
+}
+
+#[test]
+fn committed_items_read_with_no_names_label() {
+    let data = std::path::Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data");
+    for sub in ["daodejing", "original"] {
+        let d = tempfile::tempdir().unwrap();
+        let copy = d.path().join("c.cc");
+        std::fs::copy(data.join(sub).join("corpus.cc"), &copy).unwrap();
+        let items = CorpusStore::open(&copy).unwrap().all().unwrap();
+        assert!(!items.is_empty(), "{sub}");
+        assert!(items.iter().all(|i| i.names_by.is_none()), "{sub}");
+    }
+}
+
+#[test]
+fn a_blank_names_by_generator_is_refused_by_the_corpus_door() {
+    use weksa::Annotator;
+    use weksa::corpus::ModelFamily;
+    let d = tempfile::tempdir().unwrap();
+    let mut entities = EntityStore::open(&d.path().join("e.cc")).unwrap();
+    let mut corpus = CorpusStore::open(&d.path().join("c.cc")).unwrap();
+    let blank = Annotator::Model { family: ModelFamily::Anthropic, generator: " ".into() };
+    let (cast, items) = weksa::encode::WorkDraft::parse(LANTERN)
+        .unwrap()
+        .into_import(&[marked(3, "Quiet, both of you.")], &blank)
+        .unwrap();
+    for e in cast {
+        entities.put(e).unwrap();
+    }
+    assert!(matches!(
+        refusal(corpus.add(items[0].clone(), &entities)),
+        StoreRefusal::Malformed { .. }
+    ));
+    assert!(corpus.all().unwrap().is_empty());
+}
diff --git a/crates/weksa/tests/golf_loop.rs b/crates/weksa/tests/golf_loop.rs
index 73f1df2..0d75b3b 100644
--- a/crates/weksa/tests/golf_loop.rs
+++ b/crates/weksa/tests/golf_loop.rs
@@ -24,8 +24,14 @@ fn rewrite_run(root: &Path, change: impl FnOnce(&mut RunRecord)) {
     cache.put(format!("run:{}", record.label), &record).unwrap();
 }
 
-fn paths(dir: &Path) -> (PathBuf, PathBuf, PathBuf) {
-    (dir.join("c.cc"), dir.join("i.cc"), dir.join("entities.cc"))
+fn paths(dir: &Path) -> (PathBuf, PathBuf, PathBuf, PathBuf, PathBuf) {
+    (
+        dir.join("c.cc"),
+        dir.join("i.cc"),
+        dir.join("entities.cc"),
+        common::ontology_in(dir),
+        common::speaker_state_in(dir),
+    )
 }
 
 fn hex(path: &Path) -> String {
@@ -37,7 +43,7 @@ fn a_run_pins_its_stores_and_refuses_drift() {
     let mut w = world();
     let dir = w.dir.path().to_path_buf();
     let root = dir.join("run");
-    let (c, i, e) = paths(&dir);
+    let (c, i, e, o, s) = paths(&dir);
     let at = |label: &str, model: &str| {
         RunStores::create(
             &root,
@@ -46,6 +52,8 @@ fn a_run_pins_its_stores_and_refuses_drift() {
                 corpus: &c,
                 inventory: &i,
                 entities: &e,
+                ontology: &o,
+                speaker_state: &s,
             },
             model,
             "bag",
@@ -141,7 +149,7 @@ fn a_run_works_on_its_own_copy_of_the_inventory() {
     let w = world();
     let dir = w.dir.path().to_path_buf();
     let root = dir.join("run");
-    let (c, i, e) = paths(&dir);
+    let (c, i, e, o, s) = paths(&dir);
     let source_bytes = std::fs::read(&i).unwrap();
     let mut run = RunStores::create(
         &root,
@@ -150,6 +158,8 @@ fn a_run_works_on_its_own_copy_of_the_inventory() {
             corpus: &c,
             inventory: &i,
             entities: &e,
+            ontology: &o,
+            speaker_state: &s,
         },
         "fake-model",
         "bag",
@@ -228,6 +238,8 @@ fn create_refuses_a_root_that_holds_an_inventory_and_never_truncates_it() {
                 corpus: &dao.corpus,
                 inventory,
                 entities: &dao.entities,
+                ontology: &dao.ontology,
+                speaker_state: &common::speaker_state_beside(&dao.ontology),
             },
             "fake-model",
             "bag",
@@ -276,6 +288,8 @@ fn a_create_that_fails_leaves_no_inventory_and_the_retry_succeeds() {
                 corpus: &dao.corpus,
                 inventory,
                 entities,
+                ontology: &dao.ontology,
+                speaker_state: &common::speaker_state_beside(&dao.ontology),
             },
             "fake-model",
             "bag",
@@ -388,10 +402,14 @@ fn a_store_changed_between_its_digest_and_its_open_is_drift() {
         assert!(dir.join(name).exists(), "{name}");
     }
     let (c, i, e) = (dir.join("c.cc"), dir.join("i.cc"), dir.join("entities.cc"));
+    let o = dir.join("ontology.cc");
+    let s = common::speaker_state_beside(&o);
     let paths = || weksa::run::RunPaths {
         corpus: &c,
         inventory: &i,
         entities: &e,
+        ontology: &o,
+        speaker_state: &s,
     };
     assert_eq!(
         RunStores::create_between(
@@ -440,10 +458,13 @@ fn window(
     let dir = w.dir.path().to_path_buf();
     let root = dir.join("run");
     let (c, i, e) = (dir.join("c.cc"), dir.join("i.cc"), dir.join("entities.cc"));
+    let o = dir.join("ontology.cc");
     let paths = weksa::run::RunPaths {
         corpus: &c,
         inventory: &i,
         entities: &e,
+        ontology: &o,
+        speaker_state: &common::speaker_state_beside(&o),
     };
     let created = RunStores::create_between(
         &root,
@@ -501,12 +522,13 @@ fn source_digests_cover_their_files() {
     let digest = |name: &str| fnv1a64(&read(name));
     // The prompt's partition and names come from split.rs, and the lowering
     // prompt reads lower.rs's target language and entity port and prints
-    // packet.rs's serde shapes: all four are covered.
-    let (context, split, lower, packet) = (
+    // packet.rs's serde shapes and ontology.rs's selection: all five are covered.
+    let (context, split, lower, packet, ontology) = (
         read("context.rs"),
         read("split.rs"),
         read("lower.rs"),
         read("packet.rs"),
+        read("ontology.rs"),
     );
     // Each file enters behind its length, so the parts have one framing.
     let framed = [
@@ -518,12 +540,14 @@ fn source_digests_cover_their_files() {
         &lower,
         (packet.len() as u64).to_le_bytes().as_slice(),
         &packet,
+        (ontology.len() as u64).to_le_bytes().as_slice(),
+        &ontology,
     ]
     .concat();
     assert_eq!(weksa::run::PROMPT_SOURCE_DIGEST, fnv1a64(&framed));
     assert_ne!(
         weksa::run::PROMPT_SOURCE_DIGEST,
-        fnv1a64(&[context.clone(), split.clone(), lower.clone(), packet.clone()].concat()),
+        fnv1a64(&[context.clone(), split.clone(), lower.clone(), packet.clone(), ontology.clone()].concat()),
         "bare concatenation is not the digest"
     );
     // Moving the boundary between the parts moves the digest.
@@ -532,6 +556,7 @@ fn source_digests_cover_their_files() {
         weksa::split::fnv1a64_of(&[b"a", b"bc"])
     );
     assert_ne!(weksa::run::PROMPT_SOURCE_DIGEST, digest("context.rs"));
+    assert_ne!(weksa::run::PROMPT_SOURCE_DIGEST, digest("ontology.rs"));
 }
 
 /// The encode prompt of `item:nibu:1` over `world()` at revision 4.
@@ -644,7 +669,7 @@ fn answer_files_write_the_prompt_and_read_the_answer() {
     let p = prompt();
     let dir = tempfile::tempdir().unwrap();
     let round = dir.path().join("round-1");
-    let mut files = AnswerFiles::new(round.clone(), "answerer".into());
+    let mut files = AnswerFiles::new(round.clone(), "answerer".into(), vec![]);
     assert_eq!(files.model(), "answerer");
 
     // No answer: the prompt is written under its digest, and nothing else.
@@ -676,7 +701,7 @@ fn answer_files_write_the_prompt_and_read_the_answer() {
 
     // A directory that cannot be made is an io error of its kind.
     std::fs::write(dir.path().join("file"), "").unwrap();
-    let mut blocked = AnswerFiles::new(dir.path().join("file").join("round"), "m".into());
+    let mut blocked = AnswerFiles::new(dir.path().join("file").join("round"), "m".into(), vec![]);
     assert!(matches!(blocked.answer(&p), Err(PortError::Io(_))));
 
     // A reply or prompt file that cannot be read is an io error, never "unanswered".
@@ -837,6 +862,7 @@ struct Dao {
     corpus: PathBuf,
     inventory: PathBuf,
     entities: PathBuf,
+    ontology: PathBuf,
     run: RunStores,
 }
 
@@ -853,6 +879,16 @@ fn dao_over(edit: impl FnOnce(&Path, &Path)) -> Dao {
 
 /// `dao_over` with the run opened on `panel`.
 fn dao_panel(edit: impl FnOnce(&Path, &Path), panel: &[&str]) -> Dao {
+    dao_build(edit, panel, |_, _| {})
+}
+
+/// `dao_panel` with `seed_ontology` (given the ontology and inventory paths)
+/// run before the run pins the ontology.
+fn dao_build(
+    edit: impl FnOnce(&Path, &Path),
+    panel: &[&str],
+    seed_ontology: impl FnOnce(&Path, &Path),
+) -> Dao {
     let panel: Vec<String> = panel.iter().map(|t| t.to_string()).collect();
     let src = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/daodejing");
     let dir = tempfile::tempdir().unwrap();
@@ -860,12 +896,16 @@ fn dao_panel(edit: impl FnOnce(&Path, &Path), panel: &[&str]) -> Dao {
         std::fs::copy(src.join(from), dir.path().join(to)).unwrap();
         dir.path().join(to)
     };
+    // The Dao inventory at rev 3: the pins below are written against it.
+    common::dao_rev3_at(&dir.path().join("i.cc"));
     let (corpus, inventory, entities) = (
         copy("corpus.cc", "c.cc"),
-        copy("inventory.cc", "i.cc"),
+        dir.path().join("i.cc"),
         copy("entity.cc", "e.cc"),
     );
     edit(&corpus, &entities);
+    let ontology = common::ontology_in(dir.path());
+    seed_ontology(&ontology, &inventory);
     let root = dir.path().join("run");
     let run = RunStores::create(
         &root,
@@ -874,6 +914,8 @@ fn dao_panel(edit: impl FnOnce(&Path, &Path), panel: &[&str]) -> Dao {
             corpus: &corpus,
             inventory: &inventory,
             entities: &entities,
+            ontology: &ontology,
+            speaker_state: &common::speaker_state_beside(&ontology),
         },
         "fake-model",
         "bag",
@@ -888,6 +930,7 @@ fn dao_panel(edit: impl FnOnce(&Path, &Path), panel: &[&str]) -> Dao {
         corpus,
         inventory,
         entities,
+        ontology,
         run,
     }
 }
@@ -1055,7 +1098,10 @@ fn lowering_prompts(dao: &Dao, inventory: &InventoryStore) -> Vec<(String, Promp
             let view = store
                 .admit(packet, inventory, &corpus, dao.run.entities())
                 .unwrap();
-            let prompt = Prompt::lower(&view, &key, "en-US", &inv, dao.run.entities()).unwrap();
+            let state = weksa::SpeakerStateStore::open(&dir.path().join("s.cc")).unwrap();
+            let view = view.with_scene(&inv, &state, &corpus).unwrap();
+            let speaker = corpus.get(key.as_str()).unwrap().unwrap().speaker;
+            let prompt = Prompt::lower(&view, &key, &speaker, "en-US", &inv, dao.run.entities(), &weksa::Ontology::empty()).unwrap();
             (key.to_string(), prompt)
         })
         .collect()
@@ -1068,7 +1114,7 @@ fn unanswered_round_writes_nothing() {
     let expected = prompts(&dao.run);
     assert_eq!(expected.len(), 3);
 
-    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into());
+    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into(), vec![]);
     let RoundOutcome::Unanswered { prompts: digests } =
         round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap()
     else {
@@ -1099,7 +1145,7 @@ fn unanswered_round_writes_nothing() {
     for (key, p) in &expected[..2] {
         std::fs::write(round1.join(format!("{}.answer", p.digest())), &answers[key]).unwrap();
     }
-    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into());
+    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into(), vec![]);
     let RoundOutcome::Unanswered { prompts: digests } =
         round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap()
     else {
@@ -1114,7 +1160,7 @@ fn unanswered_round_writes_nothing() {
     let (key, p) = &expected[2];
     std::fs::write(round1.join(format!("{}.answer", p.digest())), &answers[key]).unwrap();
     let lowering = lowering_prompts(&dao, dao.run.inventory());
-    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into());
+    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into(), vec![]);
     let RoundOutcome::Unanswered { prompts: digests } =
         round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap()
     else {
@@ -1138,7 +1184,7 @@ fn unanswered_round_writes_nothing() {
     for (key, p) in &lowering[..2] {
         std::fs::write(round1.join(format!("{}.answer", p.digest())), lowered(key)).unwrap();
     }
-    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into());
+    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into(), vec![]);
     let RoundOutcome::Unanswered { prompts: digests } =
         round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap()
     else {
@@ -1150,13 +1196,13 @@ fn unanswered_round_writes_nothing() {
     assert_eq!(std::fs::read(dao.root.join("run.cc")).unwrap(), run_cc);
     let (key, p) = &lowering[2];
     std::fs::write(round1.join(format!("{}.answer", p.digest())), lowered(key)).unwrap();
-    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into());
+    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into(), vec![]);
     let r = recorded(round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap());
     assert_eq!((r.n(), r.calls().len()), (1, 6));
     assert_eq!(two_dp(r.language("en-US").unwrap().train_mean.chrf.unwrap()), 44.18);
 
     // Round 2 asks again, encode first.
-    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into());
+    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into(), vec![]);
     assert!(dao.root.join("round-2").parent().is_some());
     let RoundOutcome::Unanswered { prompts: again } =
         round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap()
@@ -1179,7 +1225,7 @@ fn unanswered_round_writes_nothing() {
         )
         .unwrap();
     }
-    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into());
+    let mut files = AnswerFiles::new(dao.run.next_round_dir().unwrap(), "fake-model".into(), vec![]);
     let second = recorded(round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap());
     assert_eq!(second.n(), 2);
     let ns: Vec<u32> = dao.run.rounds().unwrap().iter().map(|r| r.n()).collect();
@@ -1366,7 +1412,7 @@ fn non_utf8_encode_answer_is_a_parse_refusal() {
         let answer = serde_json::json!({ "text": table[key] }).to_string();
         std::fs::write(round1.join(format!("{}.answer", p.digest())), answer).unwrap();
     }
-    let mut files = AnswerFiles::new(round1.clone(), "fake-model".into());
+    let mut files = AnswerFiles::new(round1.clone(), "fake-model".into(), vec![]);
     let r = recorded(round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap());
     assert_eq!(r.calls().len(), 5);
     // Item 3 is Validation: its refusal is a Parse refusal and the round stands.
@@ -1527,6 +1573,8 @@ fn errors_echo_no_input() {
         corpus: &missing,
         inventory: &missing,
         entities: &missing,
+        ontology: &missing,
+        speaker_state: &common::speaker_state_beside(&missing),
     };
     let e = RunStores::create(
         &root,
@@ -1574,7 +1622,7 @@ fn errors_echo_no_input() {
     // A port error, from a canary directory.
     let blocker = tmp.path().join("canaryfile");
     std::fs::write(&blocker, "").unwrap();
-    let mut files = AnswerFiles::new(blocker.join("canarydir"), "m".into());
+    let mut files = AnswerFiles::new(blocker.join("canarydir"), "m".into(), vec![]);
     let e = files.answer(&prompt()).err().unwrap();
     note(&e, &e);
     // A round over canary answers records refusals, not the answers.
@@ -1595,6 +1643,8 @@ fn errors_echo_no_input() {
             corpus: &dao.corpus,
             inventory: &dao.inventory,
             entities: &dao.entities,
+            ontology: &dao.ontology,
+            speaker_state: &common::speaker_state_beside(&dao.ontology),
         },
         "fake-model",
         "bag",
@@ -1609,7 +1659,7 @@ fn errors_echo_no_input() {
         .unwrap();
     assert_eq!(e, RunError::NoFloor);
     all.extend([format!("{e:?}"), e.to_string()]);
-    for _ in 0..2 {
+    for _ in 0..=FLOOR_ARMS_MIN {
         let mut m = fake(&degraded_answers());
         recorded(round(&mut canary_run, &mut m, &Scorer::new(Bag)).unwrap());
     }
@@ -1687,7 +1737,7 @@ fn prompts_come_only_from_context() {
 
 // ---- edit-accept cycles ----
 
-use weksa::run::{CycleOutcome, Decision, LADDER_STEP, Reading, Verdict, Why, cycle};
+use weksa::run::{CycleOutcome, Decision, FLOOR_ARMS_MIN, LADDER_STEP, Reading, Verdict, Why, cycle};
 
 const ONE_CONCEPT: &str =
     r#"{"add":[{"family":"Concept","gloss":"a general meaning the Dao names"}]}"#;
@@ -1710,8 +1760,10 @@ fn cycle_fake(edit: &str) -> FakeModel {
     model
 }
 
-fn two_rounds(dao: &mut Dao) {
-    for _ in 0..2 {
+/// Round 1, the recorded lowering, and the prompted repeats the cycle's noise
+/// floor reads: [`FLOOR_ARMS_MIN`] + 1 plain rounds under the first inventory.
+fn replicate_rounds(dao: &mut Dao) {
+    for _ in 0..=FLOOR_ARMS_MIN {
         let mut model = fake(&degraded_answers());
         recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
     }
@@ -1724,6 +1776,12 @@ fn decided(outcome: CycleOutcome) -> Decision {
     }
 }
 
+/// The round number of a run's first cycle candidate: after round 1 and its
+/// [`FLOOR_ARMS_MIN`] prompted repeats.
+const FIRST_CANDIDATE: u32 = FLOOR_ARMS_MIN as u32 + 2;
+/// The rounds of [`replicate_rounds`].
+const REPLICATES: usize = FLOOR_ARMS_MIN + 1;
+
 fn run_cycle(dao: &mut Dao, model: &mut FakeModel) -> Decision {
     decided(cycle(&mut dao.run, model, &Scorer::new(Bag)).unwrap())
 }
@@ -1756,16 +1814,18 @@ fn mint_texts(model: &FakeModel) -> Vec<&str> {
 #[test]
 fn cycle_accepts_a_gain_past_the_floor() {
     let mut dao = dao();
-    two_rounds(&mut dao);
+    replicate_rounds(&mut dao);
     let source = std::fs::read(&dao.inventory).unwrap();
     let rounds = dao.run.rounds().unwrap();
-    assert_eq!(validation(&rounds[0]), validation(&rounds[1]), "floor 0");
+    for r in &rounds {
+        assert_eq!(validation(&rounds[0]), validation(r), "floor 0");
+    }
 
     let mut model = cycle_fake(ONE_CONCEPT);
     let d = run_cycle(&mut dao, &mut model);
     assert_eq!(
         (d.k(), d.base_round(), d.candidate_round()),
-        (1, 1, Some(3))
+        (1, 1, Some(FIRST_CANDIDATE))
     );
     assert_eq!((d.base_rev(), d.candidate_rev()), (3, Some(4)));
     assert_eq!(d.verdict(), Verdict::Accepted);
@@ -1779,7 +1839,7 @@ fn cycle_accepts_a_gain_past_the_floor() {
         }
     );
     assert_eq!(d.panel()[0].base, validation(&rounds[0]));
-    let record = dao.run.rounds().unwrap().remove(2);
+    let record = dao.run.rounds().unwrap().remove(FIRST_CANDIDATE as usize - 1);
     assert_eq!(d.panel()[0].candidate, Some(validation(&record)));
     assert!(d.panel()[0].candidate.unwrap().composite - d.panel()[0].base.composite > LADDER_STEP);
 
@@ -1787,7 +1847,7 @@ fn cycle_accepts_a_gain_past_the_floor() {
     let file = dao.root.join("cycle-1/inventory.cc");
     assert_eq!(
         (record.n(), record.inventory_rev(), record.cycle()),
-        (3, 4, Some(1))
+        (FIRST_CANDIDATE, 4, Some(1))
     );
     assert_eq!(record.inventory_digest(), hex(&file));
     assert_eq!(d.candidate_inventory_digest(), Some(hex(&file).as_str()));
@@ -1827,23 +1887,23 @@ fn cycle_accepts_a_gain_past_the_floor() {
     }
 
     // `loop round` reads the head and never moves it; the next cycle's base is
-    // the establishing round 3, not the replicate recorded after it.
+    // the establishing round 5, not the replicate recorded after it.
     let mut again = fake(&good_answers());
     let r = recorded(round(&mut dao.run, &mut again, &Scorer::new(Bag)).unwrap());
-    assert_eq!((r.n(), r.inventory_rev(), r.cycle()), (4, 4, None));
+    assert_eq!((r.n(), r.inventory_rev(), r.cycle()), (FIRST_CANDIDATE + 1, 4, None));
     assert_eq!(r.inventory_digest(), hex(&file));
     let mut second = fake(&good_answers());
     second.candidate = Some((5, keyed(&good_answers())));
     second.edit = Some(Ok(ONE_CONCEPT.to_string()));
     let d2 = run_cycle(&mut dao, &mut second);
-    assert_eq!((d2.k(), d2.base_round(), d2.base_rev()), (2, 3, 4));
+    assert_eq!((d2.k(), d2.base_round(), d2.base_rev()), (2, FIRST_CANDIDATE, 4));
     assert_eq!(d2.candidate_rev(), Some(5));
-    assert_eq!(d2.candidate_round(), Some(5));
+    assert_eq!(d2.candidate_round(), Some(FIRST_CANDIDATE + 2));
     assert_eq!(d2.verdict(), Verdict::Rejected(Why::NoGain));
     assert_eq!(d2.panel()[0].floor, d.panel()[0].floor, "the floor is measured once");
     assert_eq!(head_rev(&dao.root), 4, "a rejected edit moves nothing");
     assert!(
-        mint_texts(&second)[0].contains(&feedback_line("accepted", &dao.run.rounds().unwrap()[2])),
+        mint_texts(&second)[0].contains(&feedback_line("accepted", &dao.run.rounds().unwrap()[FIRST_CANDIDATE as usize - 1])),
         "{}",
         mint_texts(&second)[0]
     );
@@ -1857,13 +1917,13 @@ fn cycle_accepts_a_gain_past_the_floor() {
 #[test]
 fn cycle_rejects_no_gain_and_keeps_the_head() {
     let mut dao = dao();
-    two_rounds(&mut dao);
+    replicate_rounds(&mut dao);
     let mut model = fake(&degraded_answers());
     model.candidate = Some((4, keyed(&degraded_answers())));
     model.edit = Some(Ok(ONE_CONCEPT.to_string()));
     let d = run_cycle(&mut dao, &mut model);
     assert_eq!(d.verdict(), Verdict::Rejected(Why::NoGain));
-    assert_eq!((d.candidate_rev(), d.candidate_round()), (Some(4), Some(3)));
+    assert_eq!((d.candidate_rev(), d.candidate_round()), (Some(4), Some(FIRST_CANDIDATE)));
     assert_eq!(d.panel()[0].candidate, Some(d.panel()[0].base));
     let c = d.panel()[0].base.composite;
     assert_eq!(
@@ -1882,7 +1942,7 @@ fn cycle_rejects_no_gain_and_keeps_the_head() {
     );
     assert_eq!(
         dao.run.rounds().unwrap().len(),
-        3,
+        FIRST_CANDIDATE as usize,
         "the candidate round is recorded"
     );
 
@@ -1910,27 +1970,57 @@ fn worst_answers() -> Vec<(usize, String)> {
 
 #[test]
 fn distinct_replicates_set_the_floor_and_a_gain_inside_it_is_no_gain() {
+    // The good lowering's two Validation items, per item, from a run of its own.
+    let good = {
+        let mut dao = dao();
+        let mut m = fake(&good_answers());
+        recorded(round(&mut dao.run, &mut m, &Scorer::new(Bag)).unwrap());
+        let root = dao.root.clone();
+        drop(dao.run);
+        stored_scores(&root).remove(0).scores
+    };
+    assert_eq!(good.len(), 2);
+
     let mut dao = dao();
-    // Replicate 1 is degraded, replicate 2 is good: the two readings differ.
-    for answers in [degraded_answers(), good_answers()] {
+    // Replicate 1 is degraded (its first Validation item is refused, which
+    // scores 0), replicates 2 to 4 are good: the two items differ by
+    // (-good[0], 0) in every pair, whatever the metric.
+    for answers in [degraded_answers(), good_answers(), good_answers(), good_answers()] {
         let mut m = fake(&answers);
         recorded(round(&mut dao.run, &mut m, &Scorer::new(Bag)).unwrap());
     }
+    let root = dao.root.clone();
     let rounds = dao.run.rounds().unwrap();
     let (a, b) = (validation(&rounds[0]), validation(&rounds[1]));
+    assert!(a.composite < b.composite - LADDER_STEP);
+    drop(dao.run);
+    let degraded = stored_scores(&root).remove(0).scores;
+    assert_eq!((degraded[0].chrf, degraded[0].meaning), (0.0, Some(0.0)));
+    assert_eq!(degraded[1], good[1]);
+    dao.run = RunStores::open(&root).unwrap();
+
+    // Two items, differences (-x, 0): mean -x/2, sample variance x^2/2, standard
+    // error sqrt(x^2/2 / 2) = x/2, three of them. The pooled variance of three
+    // equal arms is that variance.
+    let (chrf, meaning) = (good[0].chrf, good[0].meaning.unwrap());
+    let composite = (chrf / 100.0 + meaning) / 2.0;
     let want = Reading {
-        chrf: (a.chrf - b.chrf).abs(),
-        meaning: (a.meaning - b.meaning).abs(),
-        composite: (a.composite - b.composite).abs(),
+        chrf: 3.0 * chrf / 2.0,
+        meaning: 3.0 * meaning / 2.0,
+        composite: 3.0 * composite / 2.0,
     };
-    assert!(want.chrf > 0.0 && want.meaning > 0.0 && want.composite > LADDER_STEP);
+    assert!(want.composite > LADDER_STEP);
 
     // The candidate reads exactly as the good replicate: its gain over the head
-    // (round 1) is the floor, which is past a step and inside the noise.
+    // (round 1) is as wide as the difference the floor is built from, which is
+    // past a step and inside the noise.
     let mut model = cycle_fake(ONE_CONCEPT);
     let d = run_cycle(&mut dao, &mut model);
-    assert_eq!(d.panel()[0].floor, want);
-    assert_eq!(d.panel()[0].threshold, want.composite);
+    let floor = d.panel()[0].floor;
+    assert!((floor.chrf - want.chrf).abs() < 1e-9, "{floor:?} {want:?}");
+    assert!((floor.meaning - want.meaning).abs() < 1e-9, "{floor:?} {want:?}");
+    assert!((floor.composite - want.composite).abs() < 1e-9, "{floor:?} {want:?}");
+    assert_eq!(d.panel()[0].threshold, floor.composite);
     assert_eq!(d.panel()[0].candidate, Some(b));
     assert!(d.panel()[0].candidate.unwrap().composite - d.panel()[0].base.composite > LADDER_STEP);
     assert_eq!(d.verdict(), Verdict::Rejected(Why::NoGain));
@@ -1940,14 +2030,14 @@ fn distinct_replicates_set_the_floor_and_a_gain_inside_it_is_no_gain() {
 #[test]
 fn a_rejected_candidates_score_never_reaches_the_editor() {
     let mut dao = dao();
-    two_rounds(&mut dao);
+    replicate_rounds(&mut dao);
     let mut model = fake(&degraded_answers());
     model.candidate = Some((4, keyed(&worst_answers())));
     model.edit = Some(Ok(ONE_CONCEPT.to_string()));
     let d = run_cycle(&mut dao, &mut model);
     assert!(matches!(d.verdict(), Verdict::Rejected(Why::Regressed(_))));
     let rounds = dao.run.rounds().unwrap();
-    let (head, candidate) = (&rounds[0], &rounds[2]);
+    let (head, candidate) = (&rounds[0], &rounds[FIRST_CANDIDATE as usize - 1]);
     let ladder = |r: &RoundRecord| feedback_line("rejected", r);
     assert_ne!(
         ladder(head),
@@ -1961,14 +2051,14 @@ fn a_rejected_candidates_score_never_reaches_the_editor() {
     assert!(mints[1].contains(&ladder(head)), "{}", mints[1]);
     assert!(!mints[1].contains(&ladder(candidate)), "{}", mints[1]);
     let rounds = dao.run.rounds().unwrap();
-    assert!(!mints[1].contains(&ladder(&rounds[3])), "{}", mints[1]);
+    assert!(!mints[1].contains(&ladder(&rounds[FIRST_CANDIDATE as usize])), "{}", mints[1]);
 }
 
 #[test]
 fn two_accepts_make_the_latest_the_head_and_a_reject_after_them_is_told_so() {
     let mut dao = dao();
-    // Level 0 twice: a floor of 0 and a base reading of the weakest.
-    for _ in 0..2 {
+    // Level 0 in every replicate: a floor of 0 and a base reading of the weakest.
+    for _ in 0..=FLOOR_ARMS_MIN {
         let mut m = fake(&worst_answers());
         recorded(round(&mut dao.run, &mut m, &Scorer::new(Bag)).unwrap());
     }
@@ -1982,10 +2072,10 @@ fn two_accepts_make_the_latest_the_head_and_a_reject_after_them_is_told_so() {
     let d2 = step(&mut dao, 5, &good_answers());
     assert_eq!(d1.verdict(), Verdict::Accepted);
     assert_eq!(d2.verdict(), Verdict::Accepted);
-    assert_eq!((d2.base_round(), d2.base_rev()), (3, 4));
+    assert_eq!((d2.base_round(), d2.base_rev()), (FIRST_CANDIDATE, 4));
     assert_eq!(
         (d2.candidate_round(), d2.candidate_rev()),
-        (Some(4), Some(5))
+        (Some(FIRST_CANDIDATE + 1), Some(5))
     );
 
     // The head is the second accept, live and reopened.
@@ -1997,7 +2087,7 @@ fn two_accepts_make_the_latest_the_head_and_a_reject_after_them_is_told_so() {
 
     // Cycle 3 builds on cycle 2's file and round, gains nothing, and is rejected.
     let d3 = step(&mut dao, 6, &good_answers());
-    assert_eq!((d3.k(), d3.base_round(), d3.base_rev()), (3, 4, 5));
+    assert_eq!((d3.k(), d3.base_round(), d3.base_rev()), (3, FIRST_CANDIDATE + 1, 5));
     assert_eq!(
         d3.base_inventory_digest(),
         d2.candidate_inventory_digest().unwrap()
@@ -2008,15 +2098,15 @@ fn two_accepts_make_the_latest_the_head_and_a_reject_after_them_is_told_so() {
     // Cycle 4 is told by the latest decision alone: cycle 3's reject, not cycle
     // 2's accept, and the composite at the head, which the reject did not move.
     let d4 = step(&mut dao, 6, &good_answers());
-    assert_eq!((d4.k(), d4.base_round(), d4.base_rev()), (4, 4, 5));
+    assert_eq!((d4.k(), d4.base_round(), d4.base_rev()), (4, FIRST_CANDIDATE + 1, 5));
     let rounds = dao.run.rounds().unwrap();
     let mints = mint_texts(&model);
     assert_eq!(mints.len(), 4);
     assert!(mints[0].contains(&feedback_line("none", &rounds[0])));
-    assert!(mints[1].contains(&feedback_line("accepted", &rounds[2])));
-    assert!(mints[2].contains(&feedback_line("accepted", &rounds[3])));
+    assert!(mints[1].contains(&feedback_line("accepted", &rounds[FIRST_CANDIDATE as usize - 1])));
+    assert!(mints[2].contains(&feedback_line("accepted", &rounds[FIRST_CANDIDATE as usize])));
     assert!(
-        mints[3].contains(&feedback_line("rejected", &rounds[3])),
+        mints[3].contains(&feedback_line("rejected", &rounds[FIRST_CANDIDATE as usize])),
         "{}",
         mints[3]
     );
@@ -2031,11 +2121,11 @@ fn a_rejection_leaves_no_candidate_inventory_from_an_earlier_attempt() {
         ("not json", "not json", Why::EditParse),
     ] {
         let mut dao = dao();
-        two_rounds(&mut dao);
+        replicate_rounds(&mut dao);
         let scorer = Scorer::new(Bag);
         let ask = |dao: &mut Dao| {
             let mut files =
-                AnswerFiles::new(dao.run.next_cycle_dir().unwrap(), "fake-model".into());
+                AnswerFiles::new(dao.run.next_cycle_dir().unwrap(), "fake-model".into(), vec![]);
             cycle(&mut dao.run, &mut files, &scorer).unwrap()
         };
         let dir = dao.root.join("cycle-1");
@@ -2066,7 +2156,7 @@ fn a_rejection_leaves_no_candidate_inventory_from_an_earlier_attempt() {
 fn a_failed_accept_write_leaves_neither_the_round_nor_the_decision() {
     use std::os::unix::fs::PermissionsExt;
     let mut dao = dao();
-    two_rounds(&mut dao);
+    replicate_rounds(&mut dao);
     let run_cc = std::fs::read(dao.root.join("run.cc")).unwrap();
     let mut model = cycle_fake(ONE_CONCEPT);
     // The cycle's directory exists, so everything but run.cc can still be
@@ -2085,27 +2175,27 @@ fn a_failed_accept_write_leaves_neither_the_round_nor_the_decision() {
     chmod(0o700).unwrap();
     assert_eq!(err, Some(RunError::Store));
     assert_eq!(std::fs::read(dao.root.join("run.cc")).unwrap(), run_cc);
-    assert_eq!(dao.run.rounds().unwrap().len(), 2, "no orphan round");
+    assert_eq!(dao.run.rounds().unwrap().len(), REPLICATES, "no orphan round");
     assert!(dao.run.decisions().unwrap().is_empty(), "no decision");
     let reopened = RunStores::open(&dao.root).unwrap();
-    assert_eq!(reopened.rounds().unwrap().len(), 2);
+    assert_eq!(reopened.rounds().unwrap().len(), REPLICATES);
     assert!(reopened.decisions().unwrap().is_empty());
     assert_eq!(head_rev(&dao.root), 3);
 
-    // The rerun decides cycle 1 on round 3, as if the failure had not happened.
+    // The rerun decides cycle 1 on the first candidate round, as if the failure had not happened.
     let d = run_cycle(&mut dao, &mut model);
-    assert_eq!((d.k(), d.candidate_round()), (1, Some(3)));
+    assert_eq!((d.k(), d.candidate_round()), (1, Some(FIRST_CANDIDATE)));
     assert_eq!(d.verdict(), Verdict::Accepted);
 }
 
 #[test]
 fn unanswered_cycle_writes_nothing() {
     let mut dao = dao();
-    two_rounds(&mut dao);
+    replicate_rounds(&mut dao);
     let run_cc = std::fs::read(dao.root.join("run.cc")).unwrap();
     let scorer = Scorer::new(Bag);
     let ask = |dao: &mut Dao| {
-        let mut files = AnswerFiles::new(dao.run.next_cycle_dir().unwrap(), "fake-model".into());
+        let mut files = AnswerFiles::new(dao.run.next_cycle_dir().unwrap(), "fake-model".into(), vec![]);
         cycle(&mut dao.run, &mut files, &scorer).unwrap()
     };
     let dir = dao.root.join("cycle-1");
@@ -2147,9 +2237,9 @@ fn unanswered_cycle_writes_nothing() {
     assert_eq!(
         std::fs::read(dao.root.join("run.cc")).unwrap(),
         run_cc,
-        "no round 3 and no decision"
+        "no candidate round and no decision"
     );
-    assert_eq!(dao.run.rounds().unwrap().len(), 2);
+    assert_eq!(dao.run.rounds().unwrap().len(), REPLICATES);
     assert!(dao.run.decisions().unwrap().is_empty());
 
     // With the encodes answered, the candidate round asks its lowerings, listing
@@ -2166,7 +2256,7 @@ fn unanswered_cycle_writes_nothing() {
     assert!(lowering[0].1.text().contains("\n\ninventory rev:4\n"));
     assert!(!dir.join("packets.cc").exists());
     assert_eq!(std::fs::read(dao.root.join("run.cc")).unwrap(), run_cc);
-    assert_eq!(dao.run.rounds().unwrap().len(), 2);
+    assert_eq!(dao.run.rounds().unwrap().len(), REPLICATES);
     assert!(dao.run.decisions().unwrap().is_empty());
     let table = table_english();
     for (key, p) in &lowering {
@@ -2227,7 +2317,7 @@ fn run_the_editor_canary(canary_lowered: &str) {
         }
         m
     };
-    for _ in 0..2 {
+    for _ in 0..=FLOOR_ARMS_MIN {
         let mut m = with_canary(fake(&degraded_answers()));
         recorded(round(&mut dao.run, &mut m, &Scorer::new(Bag)).unwrap());
     }
@@ -2241,9 +2331,9 @@ fn run_the_editor_canary(canary_lowered: &str) {
     // A plain round with different answers changes the latest reading, not the
     // head's: the line the next cycle shows is the head round's.
     let mut other = with_canary(fake(&good_answers()));
-    let r4 = recorded(round(&mut dao.run, &mut other, &Scorer::new(Bag)).unwrap());
+    let plain = recorded(round(&mut dao.run, &mut other, &Scorer::new(Bag)).unwrap());
     let rounds = dao.run.rounds().unwrap();
-    assert_ne!(validation(&r4), validation(&rounds[0]));
+    assert_ne!(validation(&plain), validation(&rounds[0]));
     let d2 = run_cycle(&mut dao, &mut model);
     assert_eq!(d2.base_round(), 1);
 
@@ -2361,7 +2451,7 @@ fn edit_refusals_are_decisions() {
     ];
     for (name, edit, why) in cases {
         let mut dao = dao();
-        two_rounds(&mut dao);
+        replicate_rounds(&mut dao);
         let mut model = cycle_fake("");
         model.edit = Some(edit.clone());
         let d = run_cycle(&mut dao, &mut model);
@@ -2379,7 +2469,7 @@ fn edit_refusals_are_decisions() {
         assert_eq!(d.edit_answer_digest(), want.as_deref(), "{name}");
         assert_eq!(
             dao.run.rounds().unwrap().len(),
-            2,
+            REPLICATES,
             "{name}: no candidate round"
         );
         assert_eq!(model.seen.len(), 1, "{name}: no encode prompt was asked");
@@ -2429,14 +2519,55 @@ fn cycle_needs_a_floor() {
     let mut dao = dao();
     let mut model = cycle_fake(ONE_CONCEPT);
     assert_eq!(none(&mut dao, &mut model), Some(RunError::NoFloor));
-    let mut one = fake(&degraded_answers());
-    recorded(round(&mut dao.run, &mut one, &Scorer::new(Bag)).unwrap());
-    assert_eq!(none(&mut dao, &mut model), Some(RunError::NoFloor));
+    // One, two and three rounds are not yet a recorded lowering and three repeats.
+    for _ in 0..FLOOR_ARMS_MIN {
+        let mut m = fake(&degraded_answers());
+        recorded(round(&mut dao.run, &mut m, &Scorer::new(Bag)).unwrap());
+        assert_eq!(none(&mut dao, &mut model), Some(RunError::NoFloor));
+    }
     assert_eq!(
         RunError::NoFloor.to_string(),
-        "the run has no noise floor: record two rounds first"
+        "the run has no noise floor: record four rounds under the first inventory first"
     );
 
+    // Four rounds, one of them written before per-item scores existed: still no floor.
+    let mut m = fake(&degraded_answers());
+    let fourth = recorded(round(&mut dao.run, &mut m, &Scorer::new(Bag)).unwrap());
+    let rec = dao.run.record().clone();
+    let root = dao.root.clone();
+    let old = PreScoresRound {
+        n: fourth.n(),
+        inventory_rev: fourth.inventory_rev(),
+        prompt_digest: fourth.prompt_digest().into(),
+        corpus_digest: fourth.corpus_digest().into(),
+        entity_digest: fourth.entity_digest().into(),
+        model: fourth.model().into(),
+        embedder: fourth.embedder().into(),
+        chrf_version: fourth.chrf_version().into(),
+        calls: fourth.calls().to_vec(),
+        train: fourth.train().to_vec(),
+        inventory_digest: fourth.inventory_digest().into(),
+        cycle: fourth.cycle(),
+        admit_rules: vec![],
+        parse_reasons: vec![],
+        own_family: 0,
+        languages: vec![fourth.language("en-US").unwrap().clone()],
+    };
+    drop(dao.run);
+    {
+        let mut cache = CultCache::new();
+        cache.register_entry_type::<RunRecord>().unwrap();
+        cache.register_entry_type::<PreScoresRound>().unwrap();
+        cache
+            .add_generic_backing_store(SingleFileMessagePackBackingStore::new(root.join("run.cc")))
+            .unwrap();
+        cache.pull_all_backing_stores().unwrap();
+        cache.put(format!("run:{}:round:{}", rec.label, fourth.n()), &old).unwrap();
+    }
+    dao.run = RunStores::open(&root).unwrap();
+    assert_eq!(dao.run.rounds().unwrap().len(), REPLICATES);
+    assert_eq!(none(&mut dao, &mut model), Some(RunError::NoFloor));
+
     // A panel language with no live Validation item never reaches a round:
     // `create` refuses it (open_refuses_a_bad_panel).
     assert_eq!(
@@ -2448,7 +2579,7 @@ fn cycle_needs_a_floor() {
 #[test]
 fn a_failed_candidate_round_writes_nothing() {
     let mut dao = dao();
-    two_rounds(&mut dao);
+    replicate_rounds(&mut dao);
     let run_cc = std::fs::read(dao.root.join("run.cc")).unwrap();
     let mut model = cycle_fake(ONE_CONCEPT);
     assert_eq!(
@@ -2456,14 +2587,14 @@ fn a_failed_candidate_round_writes_nothing() {
         Some(RunError::Embed)
     );
     assert_eq!(std::fs::read(dao.root.join("run.cc")).unwrap(), run_cc);
-    assert_eq!(dao.run.rounds().unwrap().len(), 2);
+    assert_eq!(dao.run.rounds().unwrap().len(), REPLICATES);
     assert!(dao.run.decisions().unwrap().is_empty());
     assert!(!dao.root.join("cycle-1/packets.cc").exists());
     assert_eq!(head_rev(&dao.root), 3);
 
-    // The rerun starts clean from the head and decides on round 3.
+    // The rerun starts clean from the head and decides on the first candidate round.
     let d = run_cycle(&mut dao, &mut model);
-    assert_eq!((d.k(), d.candidate_round()), (1, Some(3)));
+    assert_eq!((d.k(), d.candidate_round()), (1, Some(FIRST_CANDIDATE)));
     assert_eq!(d.verdict(), Verdict::Accepted);
 }
 
@@ -2491,7 +2622,7 @@ fn a_changed_head_is_drift() {
 
     // After an accept it is the cycle's file; the first copy is no longer read.
     let mut dao2 = self::dao();
-    two_rounds(&mut dao2);
+    replicate_rounds(&mut dao2);
     let mut model = cycle_fake(ONE_CONCEPT);
     assert_eq!(
         run_cycle(&mut dao2, &mut model).verdict(),
@@ -2516,6 +2647,8 @@ fn a_changed_head_is_drift() {
             corpus: &dao.corpus,
             inventory: &dao.inventory,
             entities: &dao.entities,
+            ontology: &dao.ontology,
+            speaker_state: &common::speaker_state_beside(&dao.ontology),
         },
         "fake-model",
         "bag",
@@ -2545,6 +2678,8 @@ fn source_tripwires() {
             assert!(!text.contains(banned), "{file} names {banned}");
         }
     }
+    // Every prompt file leaves through RunStores::answer_files, which withholds Test text.
+    assert!(!read("main.rs").contains("AnswerFiles::new"));
     let mut all = Vec::new();
     let mut stack = vec![src.clone()];
     while let Some(dir) = stack.pop() {
@@ -2592,6 +2727,9 @@ fn source_tripwires() {
         "Aggregate",
         "validation_mean",
         "validation_refused",
+        "ItemScore",
+        "LanguageScores",
+        "validation_scores",
     ] {
         assert!(!context.contains(banned), "context.rs names {banned}");
     }
@@ -2618,7 +2756,7 @@ fn source_tripwires() {
         2,
         "two lowering call sites: the round's and the stance ablation's replay of it"
     );
-    // Prompt::lower takes the view, the item's key, the inventory and the entity
+    // Prompt::lower takes the view, the item's key and speaker id, the inventory and the entity
     // port: no corpus item, train set, offer or store.
     let start = context.find("pub fn lower(").unwrap();
     let signature = &context[start..start + context[start..].find(") -> ").unwrap()];
@@ -2626,6 +2764,7 @@ fn source_tripwires() {
         assert!(!signature.contains(banned), "Prompt::lower takes {banned}");
     }
     assert!(signature.contains("&LoweringInput") && signature.contains("&CorpusItemId"));
+    assert!(signature.contains("&Ontology"), "the whole ontology goes in; select chooses");
     assert_eq!(count("admit_revision("), 1, "one door call");
     assert_eq!(
         count("std::fs::copy"),
@@ -2749,6 +2888,73 @@ fn the_lowerer_sees_no_item_text() {
     assert_eq!(keys(true), keys(false));
 }
 
+/// The promise `lower-prompt-no-item-text`: no lowering prompt holds the
+/// item's speaker id. A referent citing the speaker holds the fixed token
+/// instead and its forms print under the token (forms are shared by every
+/// item); another cited entity still prints under its own id.
+#[test]
+fn the_lowerer_never_sees_the_items_speaker() {
+    use weksa::entity::{Entity, EntityOrigin, LanguageForms};
+    use weksa::packet::EntityId;
+    let speaker = EntityId::parse("entity:spkcanary").unwrap();
+    let other = EntityId::parse("entity:othercite").unwrap();
+    let mut dao = dao_over(|corpus, entities| {
+        let mut entity_store = weksa::EntityStore::open(entities).unwrap();
+        for (id, form) in [("entity:spkcanary", "ZEBRAQUILL"), ("entity:othercite", "OTTERBLOOM")] {
+            entity_store
+                .put(Entity {
+                    id: EntityId::parse(id).unwrap(),
+                    forms: vec![LanguageForms {
+                        language: "en-US".into(),
+                        forms: vec![form.into()],
+                        pronunciation: None,
+                    }],
+                    origin: EntityOrigin::Cast {
+                        persona: "canary".into(),
+                        fixture: "f.yaml".into(),
+                    },
+                })
+                .unwrap();
+        }
+        let mut store = weksa::CorpusStore::open(corpus).unwrap();
+        let mut item = store.get("item:daodejing:1").unwrap().unwrap();
+        item.id = "item:spk:1".into();
+        item.text = "A held-apart sentence about OTTERBLOOM.".into();
+        item.speaker = EntityId::parse("entity:spkcanary").unwrap();
+        // The other entity is named on the item; the speaker is the speaker.
+        item.names = vec![weksa::corpus::NameSpan {
+            entity: EntityId::parse("entity:othercite").unwrap(),
+            start: 28,
+            end: 38,
+        }];
+        item.prior_turns = vec![];
+        store.add(item, &entity_store).unwrap();
+    });
+    let mut d = draft_of(1);
+    d.referents[0].entity = Some(speaker.clone());
+    d.referents[1].entity = Some(other.clone());
+    let mut model = fake(&good_answers());
+    model.answers.insert("item:spk:1".into(), json(&d));
+    model.lowered.insert("item:spk:1".into(), "CANARYLOWERED".into());
+    let r = recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    let row = r.train().iter().find(|row| row.item == "item:spk:1").unwrap();
+    assert_ne!(row.outcome, Outcome::Refused(Stage::Lower), "a speaker with a form must not refuse either");
+    let with_other: Vec<&String> = model
+        .seen
+        .iter()
+        .filter(|(_, t)| t.starts_with(LOWER_INSTRUCTIONS) && t.contains("OTTERBLOOM"))
+        .map(|(_, t)| t)
+        .collect();
+    assert_eq!(with_other.len(), 1, "one lowering prompt cites the other entity");
+    let text = with_other[0];
+    assert!(text.contains("entity:othercite"), "{text}");
+    assert!(!text.contains("entity:spkcanary"), "{text}");
+    assert!(text.contains(r#""entity:speaker":["ZEBRAQUILL"]"#), "{text}");
+    for (_, t) in model.seen.iter().filter(|(_, t)| t.starts_with(LOWER_INSTRUCTIONS)) {
+        assert!(!t.contains("entity:spkcanary"));
+    }
+}
+
 #[test]
 fn lowering_refusals_count_at_lower() {
     let run = |raw: Result<String, PortError>| {
@@ -2798,7 +3004,7 @@ fn an_added_entry_can_be_lowered() {
     // candidate's lowering prompt lists it and the item scores: the gain path a
     // table with no row for it blocked.
     let mut dao = dao();
-    two_rounds(&mut dao);
+    replicate_rounds(&mut dao);
     let mut cited = draft_of(1);
     cited.referents[0].concept = "concept:28".parse().unwrap();
     let mut model = cycle_fake(ONE_CONCEPT);
@@ -2854,6 +3060,8 @@ fn a_summary_line_says_how_lowerings_were_answered() {
         corpus: &dao.corpus,
         inventory: &dao.inventory,
         entities: &dao.entities,
+        ontology: &dao.ontology,
+        speaker_state: &common::speaker_state_beside(&dao.ontology),
     };
     RunStores::create(
         &root,
@@ -2895,8 +3103,9 @@ fn lowering_text_at_the_bound_is_scored_and_line_breaks_are_text() {
     }
 }
 
-/// Two canary items, one Train and one Validation, whose speaker is an entity
-/// with forms only in another language; each encodes to a packet citing it.
+/// Two canary items, one Train and one Validation, whose prior-turn speaker is
+/// an entity with forms only in another language; each encodes to a packet
+/// citing it. (The item's own speaker would be stripped, never looked up.)
 #[test]
 fn a_lowering_prompt_that_cannot_be_built_refuses_at_lower_and_keeps_the_packet() {
     use weksa::entity::{Entity, EntityOrigin, LanguageForms};
@@ -2926,9 +3135,11 @@ fn a_lowering_prompt_that_cannot_be_built_refuses_at_lower_and_keeps_the_packet(
             let mut item = store.get(from).unwrap().unwrap();
             item.id = key.into();
             item.text = format!("A held-apart sentence for {key}.");
-            item.speaker = EntityId::parse("entity:sagexx").unwrap();
             item.names = vec![];
-            item.prior_turns = vec![];
+            item.prior_turns = vec![weksa::corpus::Turn {
+                speaker: EntityId::parse("entity:sagexx").unwrap(),
+                text: "A turn before.".into(),
+            }];
             store.add(item, &entity_store).unwrap();
         }
     });
@@ -2982,7 +3193,7 @@ fn views_with_one_meaning_share_one_unanswered_lowering_prompt() {
         };
         std::fs::write(round1.join(format!("{}.answer", p.digest())), answer).unwrap();
     }
-    let mut files = AnswerFiles::new(round1.clone(), "fake-model".into());
+    let mut files = AnswerFiles::new(round1.clone(), "fake-model".into(), vec![]);
     let RoundOutcome::Unanswered { prompts: asked } =
         round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap()
     else {
@@ -3136,7 +3347,7 @@ fn parse_reasons_count_per_code_over_both_splits_and_name_unreadable() {
         let answer = serde_json::json!({ "text": table[key] }).to_string();
         std::fs::write(round1.join(format!("{}.answer", p.digest())), answer).unwrap();
     }
-    let mut files = AnswerFiles::new(round1, "fake-model".into());
+    let mut files = AnswerFiles::new(round1, "fake-model".into(), vec![]);
     let r = recorded(round(&mut dao.run, &mut files, &Scorer::new(Bag)).unwrap());
     assert_eq!(reasons(&r), [("syntax", 1), ("unreadable", 1)]);
 }
@@ -3308,6 +3519,234 @@ fn a_run_from_before_does_not_open() {
     assert!(reopened.rounds().is_err());
 }
 
+/// A round as the file holds it, with key 22 the lib keeps private.
+#[derive(Clone, Debug, schemars::JsonSchema, cultcache_rs::DatabaseEntry)]
+#[cultcache(type = "weksa.loop_round")]
+struct ScoredRound {
+    #[cultcache(key = 0)]
+    n: u32,
+    #[cultcache(key = 1)]
+    inventory_rev: u32,
+    #[cultcache(key = 2)]
+    prompt_digest: String,
+    #[cultcache(key = 4)]
+    corpus_digest: String,
+    #[cultcache(key = 5)]
+    entity_digest: String,
+    #[cultcache(key = 6)]
+    model: String,
+    #[cultcache(key = 7)]
+    embedder: String,
+    #[cultcache(key = 8)]
+    chrf_version: String,
+    #[cultcache(key = 9)]
+    calls: Vec<weksa::run::Call>,
+    #[cultcache(key = 10)]
+    train: Vec<weksa::run::TrainRow>,
+    #[cultcache(key = 16)]
+    inventory_digest: String,
+    #[cultcache(key = 17)]
+    cycle: Option<u32>,
+    #[cultcache(key = 18)]
+    admit_rules: Vec<weksa::run::RuleCount>,
+    #[cultcache(key = 19)]
+    parse_reasons: Vec<weksa::run::RuleCount>,
+    #[cultcache(key = 20)]
+    own_family: u32,
+    #[cultcache(key = 21)]
+    languages: Vec<weksa::run::LanguageRound>,
+    #[cultcache(key = 22)]
+    validation_scores: Vec<weksa::run::LanguageScores>,
+}
+
+/// A round as written before key 22 existed.
+#[derive(Clone, Debug, schemars::JsonSchema, cultcache_rs::DatabaseEntry)]
+#[cultcache(type = "weksa.loop_round")]
+struct PreScoresRound {
+    #[cultcache(key = 0)]
+    n: u32,
+    #[cultcache(key = 1)]
+    inventory_rev: u32,
+    #[cultcache(key = 2)]
+    prompt_digest: String,
+    #[cultcache(key = 4)]
+    corpus_digest: String,
+    #[cultcache(key = 5)]
+    entity_digest: String,
+    #[cultcache(key = 6)]
+    model: String,
+    #[cultcache(key = 7)]
+    embedder: String,
+    #[cultcache(key = 8)]
+    chrf_version: String,
+    #[cultcache(key = 9)]
+    calls: Vec<weksa::run::Call>,
+    #[cultcache(key = 10)]
+    train: Vec<weksa::run::TrainRow>,
+    #[cultcache(key = 16)]
+    inventory_digest: String,
+    #[cultcache(key = 17)]
+    cycle: Option<u32>,
+    #[cultcache(key = 18)]
+    admit_rules: Vec<weksa::run::RuleCount>,
+    #[cultcache(key = 19)]
+    parse_reasons: Vec<weksa::run::RuleCount>,
+    #[cultcache(key = 20)]
+    own_family: u32,
+    #[cultcache(key = 21)]
+    languages: Vec<weksa::run::LanguageRound>,
+}
+
+/// The scores a round put in `run.cc`, read through the mirror (the lib's field
+/// is private). The run must be dropped first.
+fn stored_scores(root: &Path) -> Vec<weksa::run::LanguageScores> {
+    let mut cache = CultCache::new();
+    cache.register_entry_type::<RunRecord>().unwrap();
+    cache.register_entry_type::<ScoredRound>().unwrap();
+    cache
+        .add_generic_backing_store(SingleFileMessagePackBackingStore::new(root.join("run.cc")))
+        .unwrap();
+    cache.pull_all_backing_stores().unwrap();
+    cache.get_all::<ScoredRound>().unwrap().remove(0).validation_scores
+}
+
+/// The stored scores agree with the round's readings: one entry per language
+/// in the record's order, as many scores as Validation items (scored plus
+/// refused), the same means, and at least the refused items as exact zeros.
+fn assert_scores_match_readings(r: &RoundRecord, stored: &[weksa::run::LanguageScores]) {
+    let tags: Vec<&str> = r.languages().iter().map(|l| l.language.as_str()).collect();
+    let got: Vec<&str> = stored.iter().map(|l| l.language.as_str()).collect();
+    assert_eq!(got, tags, "one entry per panel language, in panel order");
+    for (reading, entry) in r.languages().iter().zip(stored) {
+        let m = &reading.validation_mean;
+        let v = reading.validation_refused;
+        let refused = (v.parse + v.admit + v.lower) as usize;
+        assert_eq!(entry.scores.len(), m.count, "{}", reading.language);
+        assert_eq!(entry.scores.len(), reading.validation_scored as usize + refused);
+        let n = entry.scores.len() as f64;
+        let chrf = entry.scores.iter().map(|s| s.chrf).sum::<f64>() / n;
+        assert!((chrf - m.chrf.unwrap()).abs() < 1e-9, "{}", reading.language);
+        let zeros = entry
+            .scores
+            .iter()
+            .filter(|s| s.chrf == 0.0 && s.meaning == Some(0.0))
+            .count();
+        assert!(zeros >= refused, "{}: refused items are stored as zeros", reading.language);
+    }
+}
+
+#[test]
+fn a_round_stores_one_score_per_validation_item() {
+    let mut dao = dao();
+    let mut model = fake(&good_answers());
+    let r = recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    let root = dao.root.clone();
+    drop(dao.run);
+    let stored = stored_scores(&root);
+    assert_eq!(stored.len(), 1);
+    assert_eq!(stored[0].language, "en-US");
+    assert_scores_match_readings(&r, &stored);
+}
+
+#[test]
+fn a_two_language_round_stores_each_languages_scores_in_panel_order() {
+    let mut dao = bilingual(LAOZI_JA);
+    let mut model = bilingual_fake();
+    // The ja-JP Validation item 13 is not an encodable draft: it scores 0.
+    model.answers.insert("item:daodejing:13".into(), "not a draft".into());
+    let r = recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    let root = dao.root.clone();
+    drop(dao.run);
+    let stored = stored_scores(&root);
+    assert_scores_match_readings(&r, &stored);
+    let tags: Vec<&str> = stored.iter().map(|l| l.language.as_str()).collect();
+    assert_eq!(tags, ["en-US", "ja-JP"]);
+    // ja-JP: item 12 reads perfectly, then item 13 (the refused one), in
+    // stored item order; none of en-US's items is among them.
+    let ja: Vec<(f64, Option<f64>)> = stored[1].scores.iter().map(|s| (s.chrf, s.meaning)).collect();
+    assert_eq!(ja, [(100.0, Some(1.0)), (0.0, Some(0.0))]);
+    assert_eq!(stored[0].scores.len(), 2);
+    assert!(stored[0].scores.iter().all(|s| s.chrf < 100.0), "en-US holds its own items");
+}
+
+#[test]
+fn refused_validation_items_are_stored_as_zeros_at_every_stage() {
+    // Lower: the ja-JP items cite an entity with no ja-JP form.
+    let mut dao = bilingual(None);
+    let mut model = bilingual_fake();
+    let r = recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    let root = dao.root.clone();
+    drop(dao.run);
+    let stored = stored_scores(&root);
+    assert_eq!(r.language("ja-JP").unwrap().validation_refused.lower, 2);
+    assert_scores_match_readings(&r, &stored);
+    assert!(stored[1].scores.iter().all(|s| s.chrf == 0.0 && s.meaning == Some(0.0)));
+
+    // Parse (item 3 is Validation) and Admit (item 2), one run each.
+    for (parse, admit) in [(true, false), (false, true)] {
+        let mut dao = self::dao();
+        let mut answers = good_answers();
+        if parse {
+            answers[2].1 = "not json at all".into();
+        }
+        if admit {
+            answers[1].1 = edited(2, unknown_concept);
+        }
+        let mut model = fake(&answers);
+        let r = recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+        let root = dao.root.clone();
+        drop(dao.run);
+        let stored = stored_scores(&root);
+        let v = r.language("en-US").unwrap().validation_refused;
+        assert_eq!((v.parse, v.admit), (u32::from(parse), u32::from(admit)));
+        assert_scores_match_readings(&r, &stored);
+    }
+}
+
+#[test]
+fn an_old_run_without_scores_still_opens() {
+    let mut dao = dao();
+    let mut model = fake(&good_answers());
+    let r = recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    let rec = dao.run.record().clone();
+    let root = dao.root.clone();
+    drop(dao.run);
+    let old = PreScoresRound {
+        n: r.n(),
+        inventory_rev: r.inventory_rev(),
+        prompt_digest: r.prompt_digest().into(),
+        corpus_digest: r.corpus_digest().into(),
+        entity_digest: r.entity_digest().into(),
+        model: r.model().into(),
+        embedder: r.embedder().into(),
+        chrf_version: r.chrf_version().into(),
+        calls: r.calls().to_vec(),
+        train: r.train().to_vec(),
+        inventory_digest: r.inventory_digest().into(),
+        cycle: r.cycle(),
+        admit_rules: vec![],
+        parse_reasons: vec![],
+        own_family: 0,
+        languages: vec![r.language("en-US").unwrap().clone()],
+    };
+    let _ = std::fs::remove_file(root.join("run.cc"));
+    {
+        let mut cache = CultCache::new();
+        cache.register_entry_type::<RunRecord>().unwrap();
+        cache.register_entry_type::<PreScoresRound>().unwrap();
+        cache
+            .add_generic_backing_store(SingleFileMessagePackBackingStore::new(root.join("run.cc")))
+            .unwrap();
+        cache.pull_all_backing_stores().unwrap();
+        cache.put("run:dao".to_string(), &rec).unwrap();
+        cache.put("run:dao:round:1".to_string(), &old).unwrap();
+    }
+    let reopened = RunStores::open(&root).unwrap();
+    let rounds = reopened.rounds().unwrap();
+    assert_eq!(rounds.len(), 1);
+    assert_eq!(rounds[0].language("en-US"), r.language("en-US"));
+}
+
 #[test]
 fn the_published_run_and_round_schemas_require_none_of_the_new_fields() {
     let published = weksa::schema::published();
@@ -3429,7 +3868,7 @@ fn a_recall_of_the_wrong_words_or_no_answer_reads_low_and_a_missing_answer_waits
     let r = reading.languages[0].clone();
     assert_eq!((r.n, r.answered, r.chrf), (3, 0, 0.0));
     // With no answers on disk the files port waits on all three prompts.
-    let mut files = AnswerFiles::new(dao.run.recall_dir(), "m".into());
+    let mut files = AnswerFiles::new(dao.run.recall_dir(), "m".into(), vec![]);
     let RecallOutcome::Unanswered { prompts } = dao.run.recall(&mut files).unwrap() else {
         panic!("nobody answered");
     };
@@ -3577,6 +4016,8 @@ fn mixed_family_round(family: ModelFamily) -> u32 {
             corpus: &dir.join("c.cc"),
             inventory: &dir.join("i.cc"),
             entities: &dir.join("entities.cc"),
+            ontology: &dir.join("ontology.cc"),
+            speaker_state: &common::speaker_state_beside(&dir.join("ontology.cc")),
         },
         "not-a-draft",
         "bag",
@@ -3706,9 +4147,18 @@ fn grade_stance(features: &[(&str, u16)]) -> weksa::packet::Stance {
 /// packet. Stances: item 1 restraint 800; item 2 restraint 800; item 3
 /// restraint 800 and affection 300; the written item restraint 500.
 fn recorded_dao(edit: impl FnOnce(&mut HashMap<String, String>)) -> (Dao, RoundRecord) {
+    recorded_dao_in(|_, _| {}, edit)
+}
+
+/// `recorded_dao` with `corpus_edit` run over the corpus and entities first.
+fn recorded_dao_in(
+    corpus_edit: impl FnOnce(&mut CorpusStore, &weksa::EntityStore),
+    edit: impl FnOnce(&mut HashMap<String, String>),
+) -> (Dao, RoundRecord) {
     let mut dao = dao_over(|corpus, entities| {
         let entities = weksa::EntityStore::open(entities).unwrap();
         let mut store = CorpusStore::open(corpus).unwrap();
+        corpus_edit(&mut store, &entities);
         let mut written = store.get("item:daodejing:2").unwrap().unwrap();
         written.id = WRITTEN.into();
         written.text = "Heaven endures through the long years without end.".into();
@@ -3975,7 +4425,7 @@ fn a_stance_ablation_records_nothing_and_writes_nothing_in_its_round() {
     let before = (snapshot(&round1), snapshot(&dao.root), dao.run.rounds().unwrap(), dao.run.decisions().unwrap());
     let go = || {
         let mut rec = RecordedAnswers::new(round1.clone(), "fake-model".into());
-        let mut files = weksa::model::AnswerFiles::new(dao.run.ablation_dir(1), "fake-model".into());
+        let mut files = weksa::model::AnswerFiles::new(dao.run.ablation_dir(1), "fake-model".into(), vec![]);
         // Nothing answers yet: the replay and variant prompts are written.
         dao.run.stance_ablation(1, &mut rec, &mut files, &Scorer::new(Bag))
     };
@@ -4054,10 +4504,32 @@ fn a_stance_ablation_refuses_a_cycle_round_and_missing_round_answers() {
     ));
 }
 
+#[test]
+fn a_refused_stance_ablation_creates_no_folder_and_wipes_no_store() {
+    let (dao, _) = recorded_dao(|_| {});
+    let (mut rec, mut model) = (Lowerer::new(reader), Lowerer::new(reader));
+    // No round 99: no folder appears.
+    assert!(matches!(
+        dao.run.stance_ablation(99, &mut rec, &mut model, &Scorer::new(Bag)),
+        Err(RunError::Malformed("round"))
+    ));
+    assert!(!dao.run.ablation_dir(99).exists(), "a refused ablation makes no folder");
+    // An earlier ablation of a refused n keeps its stores byte for byte.
+    let kept = dao.run.ablation_dir(2);
+    std::fs::create_dir_all(&kept).unwrap();
+    std::fs::write(kept.join("base.cc"), b"earlier ablation").unwrap();
+    assert!(matches!(
+        dao.run.stance_ablation(2, &mut rec, &mut model, &Scorer::new(Bag)),
+        Err(RunError::Malformed("round"))
+    ));
+    assert_eq!(std::fs::read(kept.join("base.cc")).unwrap(), b"earlier ablation");
+    assert_eq!(std::fs::read_dir(&kept).unwrap().count(), 1);
+}
+
 #[test]
 fn a_stance_ablation_refuses_a_cycle_round() {
     let mut dao = dao();
-    two_rounds(&mut dao);
+    replicate_rounds(&mut dao);
     run_cycle(&mut dao, &mut cycle_fake(ONE_CONCEPT));
     let rounds = dao.run.rounds().unwrap();
     let candidate = rounds.iter().find(|r| r.cycle().is_some()).expect("the cycle's round");
@@ -4174,6 +4646,20 @@ fn add_languages(corpus: &Path, entities: &Path, ja: Option<&str>) {
         });
         entities.put(laozi).unwrap();
     }
+    entities
+        .put(weksa::Entity {
+            id: common::eid("narrator"),
+            forms: vec![weksa::LanguageForms {
+                language: "en-US".into(),
+                forms: vec!["Narrator".into()],
+                pronunciation: None,
+            }],
+            origin: weksa::EntityOrigin::Cast {
+                persona: "narrator".into(),
+                fixture: "f.yaml".into(),
+            },
+        })
+        .unwrap();
     let mut store = CorpusStore::open(corpus).unwrap();
     for (key, text, twin) in JA_TEXTS {
         let mut item = store.get(&format!("item:daodejing:{twin}")).unwrap().unwrap();
@@ -4181,7 +4667,8 @@ fn add_languages(corpus: &Path, entities: &Path, ja: Option<&str>) {
         item.text = text.into();
         item.language = "ja-JP".into();
         item.names = vec![];
-        item.prior_turns = vec![];
+        item.speaker = common::eid("narrator");
+        item.prior_turns = laozi_spoke_before();
         store.add(item, &entities).unwrap();
         let mut pt = store.get(&format!("item:daodejing:{twin}")).unwrap().unwrap();
         pt.id = format!("item:daodejing:2{twin}");
@@ -4193,7 +4680,18 @@ fn add_languages(corpus: &Path, entities: &Path, ja: Option<&str>) {
     }
 }
 
-/// The Dao draft of `item`, its first referent citing the speaker, Laozi.
+/// The one prior turn that makes Laozi citeable on an item he does not speak:
+/// the ja-JP items are the narrator's, so their lowering prompts print him.
+fn laozi_spoke_before() -> Vec<weksa::corpus::Turn> {
+    vec![weksa::corpus::Turn {
+        speaker: common::eid("laozi"),
+        text: "A turn before.".into(),
+    }]
+}
+
+/// The Dao draft of `item`, its first referent citing Laozi: the speaker of
+/// the en-US items (never printed to the lowerer), a prior-turn speaker of the
+/// ja-JP ones (printed in the item's language).
 fn citing_laozi(item: usize) -> String {
     let mut v = serde_json::to_value(draft_of(item)).unwrap();
     v["referents"][0]["entity"] = serde_json::json!("entity:laozi");
@@ -4254,8 +4752,10 @@ fn each_item_lowers_in_its_own_language() {
         } else {
             en += 1;
             assert!(text.contains("\n\nlanguage: en-US\n\n"), "{text}");
-            assert!(text.contains(r#"{"entity:laozi":["Laozi"]}"#), "{text}");
-            assert!(!text.contains("老子"), "{text}");
+            // Laozi speaks the en-US items: the lowerer gets his forms under the
+            // speaker token, never his id, and no ja-JP form.
+            assert!(text.contains("\n\nentities: {\"entity:speaker\":[\"Laozi\"]}\n\n"), "{text}");
+            assert!(!text.contains("entity:laozi") && !text.contains("老子"), "{text}");
         }
     }
     assert_eq!((ja, en), (3, 3));
@@ -4301,9 +4801,9 @@ fn a_cited_entity_without_a_form_in_the_items_language_refuses_at_lower() {
 fn the_panel_filters_every_prompt() {
     let mut dao = bilingual(LAOZI_JA);
     let mut model = bilingual_fake();
-    // Two rounds, a cycle (the editor's prompt), a recall: every kind of prompt.
+    // The floor's rounds, a cycle (the editor's prompt), a recall: every kind of prompt.
     let mut last = None;
-    for _ in 0..2 {
+    for _ in 0..=FLOOR_ARMS_MIN {
         last = Some(recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap()));
     }
     let tags = |r: &RoundRecord| -> Vec<String> {
@@ -4355,6 +4855,7 @@ fn open_refuses_a_bad_panel() {
         vec![],
         vec![tag("en-US"), tag("en-US")],
         vec![tag("en-US"), tag("not a tag!")],
+        vec![tag("en-us")],
         // No live item at all, and a Train item without a Validation one.
         vec![tag("en-US"), tag("de-DE")],
         vec![tag("en-US"), tag("fr-FR")],
@@ -4363,7 +4864,7 @@ fn open_refuses_a_bad_panel() {
         let created = RunStores::create(
             &root,
             "p",
-            RunPaths { corpus, inventory, entities },
+            RunPaths { corpus, inventory, entities, ontology: &dao.ontology, speaker_state: &common::speaker_state_beside(&dao.ontology) },
             "fake-model",
             "bag",
             weksa::run::LowererReach::ToolLessRelay,
@@ -4381,6 +4882,46 @@ fn open_refuses_a_bad_panel() {
     }
 }
 
+/// A corpus written before language tags were canonical-case holds `en-us`
+/// items, which `open` does not revalidate: `check_panel` accepts the panel
+/// `en-us`, so only the tag-form clause of `create` refuses it.
+#[test]
+fn create_refuses_a_legacy_cased_panel_tag_the_corpus_holds() {
+    let age = |corpus: &Path| {
+        let mut bytes = std::fs::read(corpus).unwrap();
+        let (from, to) = (b"en-US", b"en-us");
+        let mut n = 0;
+        for i in 0..bytes.len().saturating_sub(from.len() - 1) {
+            if &bytes[i..i + from.len()] == from {
+                bytes[i..i + from.len()].copy_from_slice(to);
+                n += 1;
+            }
+        }
+        assert!(n > 0, "the corpus holds no en-US to age");
+        std::fs::write(corpus, bytes).unwrap();
+    };
+    let dao = dao_over(|_, _| {});
+    let (corpus, inventory, entities) = (&dao.corpus, &dao.inventory, &dao.entities);
+    drop(dao.run);
+    age(corpus);
+    let tags = |s: &str| CorpusStore::open(corpus).unwrap().all().unwrap().iter().any(|i| i.language == s);
+    assert!(tags("en-us") && !tags("en-US"));
+    let root = dao._dir.path().join("legacy-panel");
+    let err = RunStores::create(
+        &root,
+        "p",
+        RunPaths { corpus, inventory, entities, ontology: &dao.ontology, speaker_state: &common::speaker_state_beside(&dao.ontology) },
+        "fake-model",
+        "bag",
+        weksa::run::LowererReach::ToolLessRelay,
+        ModelFamily::Unrecorded,
+        &["en-us".to_string()],
+    )
+    .err();
+    assert_eq!(err, Some(RunError::Panel));
+    assert!(!root.join("run.cc").exists());
+}
+
 #[test]
 fn round_means_are_per_language() {
     let mut dao = bilingual(LAOZI_JA);
@@ -4409,13 +4950,15 @@ fn round_means_are_per_language() {
 #[test]
 fn floor_and_feedback_are_per_language() {
     let mut dao = bilingual(LAOZI_JA);
-    // Round 1: everything lowers perfectly in ja-JP. Round 2: one ja-JP
-    // Validation item is refused. en-US reads the same twice.
+    // Round 1: everything lowers perfectly in ja-JP. Rounds 2 to 4: one ja-JP
+    // Validation item is refused each time. en-US reads the same throughout.
     let mut first = bilingual_fake();
     recorded(round(&mut dao.run, &mut first, &Scorer::new(Bag)).unwrap());
-    let mut second = bilingual_fake();
-    second.answers.insert("item:daodejing:13".into(), "not a draft".into());
-    recorded(round(&mut dao.run, &mut second, &Scorer::new(Bag)).unwrap());
+    for _ in 0..FLOOR_ARMS_MIN {
+        let mut repeat = bilingual_fake();
+        repeat.answers.insert("item:daodejing:13".into(), "not a draft".into());
+        recorded(round(&mut dao.run, &mut repeat, &Scorer::new(Bag)).unwrap());
+    }
 
     let mut model = bilingual_fake();
     model.candidate = Some((4, bilingual_answers()));
@@ -4427,12 +4970,14 @@ fn floor_and_feedback_are_per_language() {
         ["en-US", "ja-JP"]
     );
     let (en, ja) = (&rows[0], &rows[1]);
-    assert_eq!(en.floor.composite, 0.0, "en-US read the same twice");
+    assert_eq!(en.floor.composite, 0.0, "en-US read the same every time");
     assert_eq!(en.threshold, LADDER_STEP);
-    assert_eq!(ja.floor.chrf, 50.0);
-    assert_eq!(ja.floor.meaning, 0.5);
-    assert_eq!(ja.floor.composite, 0.5);
-    assert_eq!(ja.threshold, 0.5);
+    // Differences 0 and 100 chrF over two items: variance 5000, FLOOR_Z of
+    // sqrt(5000 / 2); meaning and composite differ by 0 and 1: 3 * sqrt(0.5 / 2).
+    assert_eq!(ja.floor.chrf, 150.0);
+    assert_eq!(ja.floor.meaning, 1.5);
+    assert_eq!(ja.floor.composite, 1.5);
+    assert_eq!(ja.threshold, 1.5);
     assert_eq!(ja.base.composite, 1.0);
 
     // The editor's one held-out number is each language's head composite on
@@ -4510,13 +5055,16 @@ fn offer_by_key_is_the_panels_too() {
 #[test]
 fn a_cycle_decides_each_language_on_its_own_floor() {
     let mut dao = bilingual(LAOZI_JA);
-    // en-US reads the same twice (floor 0); ja-JP loses a Validation item in
-    // round 2 (a wide floor).
+    // en-US reads the same in every round (floor 0); ja-JP loses a Validation
+    // item in each repeat (a wide floor: its two per-item differences are 0 and
+    // the whole score, three standard errors of that).
     let mut first = bilingual_fake();
     recorded(round(&mut dao.run, &mut first, &Scorer::new(Bag)).unwrap());
-    let mut second = bilingual_fake();
-    second.answers.insert("item:daodejing:13".into(), "not a draft".into());
-    recorded(round(&mut dao.run, &mut second, &Scorer::new(Bag)).unwrap());
+    for _ in 0..FLOOR_ARMS_MIN {
+        let mut repeat = bilingual_fake();
+        repeat.answers.insert("item:daodejing:13".into(), "not a draft".into());
+        recorded(round(&mut dao.run, &mut repeat, &Scorer::new(Bag)).unwrap());
+    }
     // The candidate degrades en-US a little and leaves ja-JP as it was.
     let mut model = bilingual_fake();
     model.candidate = Some((4, {
@@ -4529,7 +5077,7 @@ fn a_cycle_decides_each_language_on_its_own_floor() {
     let (en, ja) = (&d.panel()[0], &d.panel()[1]);
     assert_eq!((en.language.as_str(), ja.language.as_str()), ("en-US", "ja-JP"));
     assert_eq!(en.floor.chrf, 0.0);
-    assert_eq!(ja.floor.chrf, 50.0);
+    assert_eq!(ja.floor.chrf, 150.0);
     // en-US fell by more than its own floor but by less than ja-JP's: the
     // verdict is the rejection that en-US's floor makes, not NoGain.
     let fall = en.base.chrf - en.candidate.unwrap().chrf;
@@ -4537,6 +5085,116 @@ fn a_cycle_decides_each_language_on_its_own_floor() {
     assert!(matches!(d.verdict(), Verdict::Rejected(Why::Regressed(_))), "{:?}", d.verdict());
 }
 
+/// A bilingual run whose head round loses the Validation items `head` (refused,
+/// so scored 0), then FLOOR_ARMS_MIN repeat rounds losing `repeats[i]`, then a
+/// cycle whose candidate round loses `candidate`. en-US Validation items are
+/// `item:daodejing:2` and `:3`, ja-JP's `:12` and `:13`.
+fn bilingual_cycle(head: &[&str], repeats: [&[&str]; FLOOR_ARMS_MIN], candidate: &[&str]) -> Decision {
+    let mut dao = bilingual(LAOZI_JA);
+    let losing = |lost: &[&str]| {
+        let mut answers = bilingual_answers();
+        for key in lost {
+            answers.insert(format!("item:daodejing:{}", key.trim_start_matches(':')), "not a draft".into());
+        }
+        answers
+    };
+    let fake_losing = |lost: &[&str]| {
+        let mut m = bilingual_fake();
+        m.answers = losing(lost);
+        m
+    };
+    let mut first = fake_losing(head);
+    recorded(round(&mut dao.run, &mut first, &Scorer::new(Bag)).unwrap());
+    for lost in repeats {
+        let mut repeat = fake_losing(lost);
+        recorded(round(&mut dao.run, &mut repeat, &Scorer::new(Bag)).unwrap());
+    }
+    let mut model = bilingual_fake();
+    model.candidate = Some((4, losing(candidate)));
+    model.edit = Some(Ok(ONE_CONCEPT.to_string()));
+    run_cycle(&mut dao, &mut model)
+}
+
+/// What a two-language cycle read: the sum of the composite gains, the noise of
+/// that sum (the root of the floors squared), and the other thresholds a wrong
+/// rule would use: the sum of the squares, the sum and the largest of the floors.
+struct PanelNoise {
+    net: f64,
+    noise: f64,
+    sum_of_squares: f64,
+    sum_of_floors: f64,
+    max_floor: f64,
+}
+
+fn panel_noise(d: &Decision) -> PanelNoise {
+    let rows = d.panel();
+    assert_eq!(rows.len(), 2);
+    for r in rows {
+        let c = r.candidate.unwrap();
+        assert!(c.composite > r.base.composite, "{}: no language regressed", r.language);
+        assert!(c.chrf >= r.base.chrf && c.meaning >= r.base.meaning);
+        assert!(r.floor.composite > 0.0, "{}: a floor to speak of", r.language);
+    }
+    let floors: Vec<f64> = rows.iter().map(|r| r.floor.composite).collect();
+    PanelNoise {
+        net: rows.iter().map(|r| r.candidate.unwrap().composite - r.base.composite).sum(),
+        noise: floors.iter().map(|f| f * f).sum::<f64>().sqrt(),
+        sum_of_squares: floors.iter().map(|f| f * f).sum(),
+        sum_of_floors: floors.iter().sum(),
+        max_floor: floors.iter().cloned().fold(0.0, f64::max),
+    }
+}
+
+/// The panel accepts on the sum of the languages' gains only past the noise of
+/// that sum (the root of their floors squared, never under one step), through
+/// `cycle` and the floors `floor_of` measures. The head loses every Validation
+/// item; the three repeats win some back, so en-US reads a floor of about 1.08
+/// and ja-JP 0.87 (noise 1.38, sum of squares 1.91, sum of floors 1.94). Gains
+/// are tuned by what the candidate wins back:
+/// - 1.378: inside the noise by 0.003, past every smaller rule (largest floor,
+///   step, no noise): a gain that looks real and is not;
+/// - 1.445: past the noise, inside the sum of squares and the sum of floors: a
+///   real gain, which a rule with a wider term (no root, or floors summed)
+///   would turn away.
+///
+/// The threshold is strict (`>`): the gains are real numbers off a scorer, so
+/// no fixture lands on the tie; that mutation is not pinned here, and is left
+/// to `decide_panel_table`.
+#[test]
+fn cycle_noise_term_is_pinned_through_cycle() {
+    let all = ["2", "3", "12", "13"];
+    // Round by round the repeats win back en-US item 2 and ja-JP item 12, then
+    // en-US item 3, then nothing.
+    let repeats: [&[&str]; FLOOR_ARMS_MIN] = [&["3", "13"], &["2", "12", "13"], &all];
+
+    // En-US wins back both items, ja-JP one.
+    let d = bilingual_cycle(&all, repeats, &["12"]);
+    let p = panel_noise(&d);
+    assert!(p.net > LADDER_STEP && p.net > p.max_floor, "{}", p.net);
+    assert!(p.net < p.noise && p.noise - p.net < 0.01, "just inside: {} {}", p.net, p.noise);
+    assert_eq!(d.verdict(), Verdict::Rejected(Why::NoGain));
+
+    // En-US wins back one item, ja-JP both.
+    let d = bilingual_cycle(&all, repeats, &["3"]);
+    let p = panel_noise(&d);
+    assert!(p.net > p.noise && p.net - p.noise > 0.05, "just past: {} {}", p.net, p.noise);
+    assert!(p.net < p.sum_of_squares && p.net < p.sum_of_floors, "{}", p.net);
+    assert_eq!(d.verdict(), Verdict::Accepted);
+
+    // A gain inside the noise of a milder fixture: one repeat in three reads
+    // every item back in the head's place, the others lose what the head did.
+    let d = bilingual_cycle(&["2", "13"], [&[], &["2", "13"], &["2", "13"]], &[]);
+    let p = panel_noise(&d);
+    assert!(p.net > LADDER_STEP && p.net < p.noise, "{} {}", p.net, p.noise);
+    assert_eq!(d.verdict(), Verdict::Rejected(Why::NoGain));
+
+    // The same candidate over repeats that agree with the head has no noise to
+    // clear, and its gain is accepted.
+    let d = bilingual_cycle(&["2", "13"], [&["2", "13"]; FLOOR_ARMS_MIN], &[]);
+    assert!(d.panel().iter().all(|r| r.floor.composite == 0.0));
+    assert_eq!(d.verdict(), Verdict::Accepted);
+}
+
 #[test]
 fn ablation_reads_each_language_apart() {
     let mut dao = bilingual(LAOZI_JA);
@@ -4557,3 +5215,1355 @@ fn ablation_reads_each_language_apart() {
         [("en-US", Train, 1), ("en-US", Validation, 2), ("ja-JP", Train, 1), ("ja-JP", Validation, 2)]
     );
 }
+
+/// A Dao ontology for en-US and ja-JP: entry 1 of each for a stance with
+/// affection, and a ja-JP entry 2 for almost no restraint (which no Dao packet
+/// has).
+fn dao_ontology(path: &Path, inventory: &Path) {
+    use weksa::packet::Grade;
+    use weksa::{Condition, Layer, OntologyEntry, OntologyStore, Slot, Test};
+    let inv = InventoryStore::open(inventory).unwrap();
+    let feature = |gloss: &str| {
+        inv.inventory()
+            .unwrap()
+            .entries()
+            .find(|e| e.gloss == gloss)
+            .unwrap()
+            .id
+    };
+    let entry = |language: &str, n, gloss: &str, test, choice: &str| OntologyEntry {
+        language: language.into(),
+        n,
+        inventory_rev: 1,
+        layer: Layer::Discourse,
+        when: vec![Condition {
+            slot: Slot::Stance,
+            feature: feature(gloss),
+            test,
+        }],
+        choice: choice.into(),
+        examples: vec![],
+        annotator: weksa::Annotator::Operator,
+    };
+    let affection = || Test::AtLeast(Grade::new(200).unwrap());
+    OntologyStore::open(path)
+        .unwrap()
+        .admit(
+            vec![
+                entry("en-US", 1, "affection", affection(), "ENWARM"),
+                entry("ja-JP", 1, "affection", affection(), "JAWARM"),
+                entry(
+                    "ja-JP",
+                    2,
+                    "restraint",
+                    Test::AtMost(Grade::new(100).unwrap()),
+                    "JABLUNT",
+                ),
+            ],
+            &inv,
+        )
+        .unwrap();
+}
+
+fn inv_store(path: &Path) -> InventoryStore {
+    InventoryStore::open(path).unwrap()
+}
+
+#[test]
+fn a_run_pins_its_ontology_and_refuses_drift() {
+    let dao = dao_build(|_, _| {}, &["en-US"], dao_ontology);
+    let r = dao.run.record();
+    assert_eq!(r.ontology, std::fs::canonicalize(&dao.ontology).unwrap().to_str().unwrap());
+    assert_eq!(r.ontology_digest, hex(&dao.ontology));
+    let root = dao.root.clone();
+    assert_eq!(RunStores::open(&root).unwrap().record(), dao.run.record());
+    // Another entry after the pin is another ontology.
+    let entry = weksa::OntologyStore::open(&dao.ontology).unwrap().all().unwrap().remove(0);
+    let mut store = weksa::OntologyStore::open(&dao.ontology).unwrap();
+    store
+        .admit(
+            vec![weksa::OntologyEntry { n: 2, ..entry }],
+            &inv_store(&dao.inventory),
+        )
+        .unwrap();
+    assert_eq!(
+        RunStores::open(&root).err(),
+        Some(RunError::Drift(DriftOf::Ontology))
+    );
+}
+
+#[test]
+fn create_refuses_an_entry_its_inventory_cannot_read() {
+    use weksa::packet::Grade;
+    use weksa::{Condition, Layer, OntologyEntry, OntologyStore, Slot, Test};
+    // The entry reads feature 18 at revision 1; the run's head inventory is
+    // another file where that feature is retired or absent, so the entry is
+    // admitted against a richer inventory and refused against the run's.
+    let src = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/daodejing");
+    let make = |language: &str, dir: &Path, retire: bool| {
+        for (from, to) in [("corpus.cc", "c.cc"), ("inventory.cc", "i.cc"), ("entity.cc", "e.cc")] {
+            std::fs::copy(src.join(from), dir.join(to)).unwrap();
+        }
+        let ontology = dir.join("o.cc");
+        // A richer inventory the entry is admitted against: the Dao one plus a feature.
+        let rich = dir.join("rich.cc");
+        std::fs::copy(src.join("inventory.cc"), &rich).unwrap();
+        let mut store = InventoryStore::open(&rich).unwrap();
+        let inv = store.inventory().unwrap();
+        let head = inv.latest().unwrap().n;
+        let n = head + 1;
+        let next = std::num::NonZeroU32::new(
+            inv.entries().filter(|e| e.id.family() == weksa::Family::Feature).map(|e| e.id.n().get()).max().unwrap() + 1,
+        )
+        .unwrap();
+        let id = weksa::Family::Feature.id(next);
+        store
+            .admit_revision(
+                weksa::InventoryRevision {
+                    n,
+                    parent: Some(head),
+                    changes: vec![weksa::Change::Add(id)],
+                    frozen: false,
+                },
+                vec![weksa::InventoryEntry {
+                    id,
+                    gloss: "pride".into(),
+                    value_kind: Some(weksa::ValueKind::Grade),
+                    applies_to: vec![Slot::Stance],
+                    introduced_rev: n,
+                    retired_rev: None,
+                }],
+            )
+            .unwrap();
+        OntologyStore::open(&ontology)
+            .unwrap()
+            .admit(
+                vec![OntologyEntry {
+                    language: language.into(),
+                    n: 1,
+                    inventory_rev: n,
+                    layer: Layer::Lexicon,
+                    when: vec![Condition {
+                        slot: Slot::Stance,
+                        feature: id,
+                        test: Test::AtLeast(Grade::new(1).unwrap()),
+                    }],
+                    choice: "boast".into(),
+                    examples: vec![],
+                    annotator: weksa::Annotator::Operator,
+                }],
+                &store,
+            )
+            .unwrap();
+        if retire {
+            // The run's head inventory retires the feature after the entry's revision.
+            store
+                .admit_revision(
+                    weksa::InventoryRevision {
+                        n: n + 1,
+                        parent: Some(n),
+                        changes: vec![weksa::Change::Retire(id)],
+                        frozen: false,
+                    },
+                    vec![],
+                )
+                .unwrap();
+            std::fs::copy(&rich, dir.join("i.cc")).unwrap();
+        }
+        ontology
+    };
+    let create = |dir: &Path, ontology: &Path| {
+        RunStores::create(
+            &dir.join("run"),
+            "x",
+            RunPaths {
+                corpus: &dir.join("c.cc"),
+                inventory: &dir.join("i.cc"),
+                entities: &dir.join("e.cc"),
+                ontology,
+                speaker_state: &common::speaker_state_beside(ontology),
+            },
+            "fake-model",
+            "bag",
+            weksa::run::LowererReach::ToolLessRelay,
+            ModelFamily::Unrecorded,
+            &["en-US".to_string()],
+        )
+    };
+    let panel_dir = tempfile::tempdir().unwrap();
+    let o = make("en-US", panel_dir.path(), false);
+    assert_eq!(create(panel_dir.path(), &o).err(), Some(RunError::Ontology));
+    assert!(!panel_dir.path().join("run/run.cc").exists());
+    assert!(!panel_dir.path().join("run/inventory.cc").exists());
+    // The same entry under a language outside the panel does not refuse.
+    let other_dir = tempfile::tempdir().unwrap();
+    let o = make("ja-JP", other_dir.path(), false);
+    assert!(create(other_dir.path(), &o).is_ok());
+    // An entry on a feature the head inventory has retired can never select.
+    let retired_dir = tempfile::tempdir().unwrap();
+    let o = make("en-US", retired_dir.path(), true);
+    assert_eq!(create(retired_dir.path(), &o).err(), Some(RunError::Ontology));
+    assert!(!retired_dir.path().join("run/run.cc").exists());
+}
+
+#[test]
+fn round_lowering_prompts_carry_selected_entries() {
+    let mut dao = dao_build(
+        |corpus, entities| add_languages(corpus, entities, LAOZI_JA),
+        &["ja-JP", "en-US"],
+        dao_ontology,
+    );
+    let mut model = bilingual_fake();
+    let r = recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    let mut seen = std::collections::BTreeSet::new();
+    for ((_, text), call) in model.seen.iter().zip(r.calls()) {
+        if !text.starts_with(LOWER_INSTRUCTIONS) {
+            continue;
+        }
+        let item = call.items[0].as_str();
+        let (language, warm, other) = if text.contains("\n\nlanguage: ja-JP\n\n") {
+            ("ja-JP", "JAWARM", "ENWARM")
+        } else {
+            ("en-US", "ENWARM", "JAWARM")
+        };
+        // Only the third packet of each language carries affection.
+        if item.ends_with(":3") || item.ends_with(":13") {
+            assert!(text.contains(&format!("\nonto:{language}:1 [discourse] {warm}\n")), "{text}");
+        } else {
+            assert!(text.contains("\n\nontology: none\n\n"), "{item}: {text}");
+        }
+        assert!(!text.contains(other) && !text.contains("JABLUNT"), "{item}: {text}");
+        seen.insert(item.to_string());
+    }
+    assert_eq!(seen.len(), 6, "three items in each language");
+}
+
+/// Admits the speaker-state revision (rev 4) onto the rev-3 Dao inventory at
+/// `inventory`, and the scene for the group of `item:daodejing:3`: Laozi's
+/// relation to an unnamed party, above, intimacy 200.
+fn put_dao_scene(speaker_state: &Path, inventory: &Path, corpus: &Path, entities: &Path) {
+    use weksa::packet::{FeatValue, FeatureValue};
+    let mut inv_store = InventoryStore::open(inventory).unwrap();
+    let (rev, entries) = weksa::inventory::speaker_scene_revision(4);
+    inv_store.admit_revision(rev, entries).unwrap();
+    let inv = inv_store.inventory().unwrap();
+    let id = |gloss: &str| inv.entries().find(|e| e.gloss == gloss).unwrap().id;
+    let corpus = CorpusStore::open(corpus).unwrap();
+    let item = corpus.get("item:daodejing:3").unwrap().unwrap();
+    let scene = weksa::Scene {
+        group: item.group.clone(),
+        n: 1,
+        inventory_rev: 4,
+        participants: vec![item.speaker.clone()],
+        relations: vec![weksa::PairRelation {
+            from: item.speaker.clone(),
+            to: weksa::Party::Unnamed,
+            features: vec![
+                FeatureValue {
+                    feature: id("relative_status"),
+                    value: FeatValue::Option(common::lab("above")),
+                },
+                FeatureValue {
+                    feature: id("intimacy"),
+                    value: FeatValue::Grade(common::grade(200)),
+                },
+            ],
+        }],
+        annotator: weksa::Annotator::Operator,
+    };
+    weksa::SpeakerStateStore::open(speaker_state)
+        .unwrap()
+        .put_scene(scene, &inv_store, &corpus, &weksa::EntityStore::open(entities).unwrap())
+        .unwrap();
+}
+
+/// A Dao run whose store holds a scene for item 3's group and whose ontology
+/// holds en-US:1, selected when the speaker is above the addressee.
+fn scene_dao(extra: impl FnOnce(&Path, &Path)) -> Dao {
+    dao_build(
+        |_, _| {},
+        &["en-US"],
+        |ontology, inventory| {
+            use weksa::{Condition, Layer, OntologyEntry, OntologyStore, Slot, Test};
+            let dir = ontology.parent().unwrap();
+            put_dao_scene(
+                &common::speaker_state_beside(ontology),
+                inventory,
+                &dir.join("c.cc"),
+                &dir.join("e.cc"),
+            );
+            let inv_store = InventoryStore::open(inventory).unwrap();
+            let status = inv_store
+                .inventory()
+                .unwrap()
+                .entries()
+                .find(|e| e.gloss == "relative_status")
+                .unwrap()
+                .id;
+            OntologyStore::open(ontology)
+                .unwrap()
+                .admit(
+                    vec![OntologyEntry {
+                        language: "en-US".into(),
+                        n: 1,
+                        inventory_rev: 4,
+                        layer: Layer::Discourse,
+                        when: vec![Condition {
+                            slot: Slot::Scene,
+                            feature: status,
+                            test: Test::Is(weksa::packet::FeatValue::Option(common::lab("above"))),
+                        }],
+                        choice: "ENABOVE".into(),
+                        examples: vec![],
+                        annotator: weksa::Annotator::Operator,
+                    }],
+                    &inv_store,
+                )
+                .unwrap();
+            extra(&dir.join("c.cc"), &dir.join("e.cc"));
+        },
+    )
+}
+
+/// Answers for items 1 to 3 where item 3 names referent n2 (no entity) as its
+/// addressee, or nobody.
+fn addressing(addressee: Option<&str>) -> Vec<(usize, String)> {
+    (1..=3)
+        .map(|n| {
+            let mut v = serde_json::to_value(draft_of(n)).unwrap();
+            if n == 3 {
+                v["discourse"]["addressee"] = serde_json::json!(addressee);
+            }
+            (n, v.to_string())
+        })
+        .collect()
+}
+
+fn lowering_of(model: &FakeModel, marker: &str) -> Vec<String> {
+    lowering_texts(model)
+        .into_iter()
+        .filter(|t| t.contains(marker))
+        .map(String::from)
+        .collect()
+}
+
+#[test]
+fn round_prompts_carry_scene_selected_entries() {
+    // Above an unnamed addressee: item 3's prompt holds the entry, the other
+    // two (no scene for their groups) read NoScene and print without it.
+    let mut dao = scene_dao(|_, _| {});
+    let mut model = fake(&addressing(Some("n2")));
+    recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    assert_eq!(lowering_texts(&model).len(), 3);
+    let with = lowering_of(&model, "\nonto:en-US:1 [discourse] ENABOVE");
+    assert_eq!(with.len(), 1, "only item 3 has a scene and an addressee");
+    assert_eq!(
+        lowering_texts(&model).iter().filter(|t| t.contains("ontology: none")).count(),
+        2
+    );
+    // The same item with no addressee selects no Scene entry.
+    let mut dao = scene_dao(|_, _| {});
+    let mut model = fake(&addressing(None));
+    recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    assert!(lowering_of(&model, "ENABOVE").is_empty());
+    assert_eq!(lowering_texts(&model).len(), 3);
+}
+
+#[test]
+fn a_scene_read_failure_is_a_lower_refusal() {
+    // A live item of item 3's group, in a language outside the panel, spoken by
+    // someone the scene does not cover: V16 for that group.
+    let mut dao = scene_dao(|corpus, entities| {
+        let mut entity_store = weksa::EntityStore::open(entities).unwrap();
+        entity_store.put(ent("stranger", "en-US", &["Stranger"])).unwrap();
+        let mut store = CorpusStore::open(corpus).unwrap();
+        let mut twin = store.get("item:daodejing:3").unwrap().unwrap();
+        twin.id = "item:daodejing:93".into();
+        twin.language = "pt-BR".into();
+        twin.text = "PORTUGUESEMARK 93 o sabio".into();
+        twin.speaker = common::eid("stranger");
+        twin.names = vec![];
+        twin.prior_turns = vec![];
+        store.add(twin, &entity_store).unwrap();
+    });
+    let mut model = fake(&addressing(Some("n2")));
+    let r = recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    // Item 3 never reached the model; items 1 and 2 did, and the round recorded.
+    assert_eq!(lowering_texts(&model).len(), 2);
+    assert_eq!(r.n(), 1);
+}
+
+#[test]
+fn a_run_pins_its_speaker_state_and_refuses_drift() {
+    let dao = scene_dao(|_, _| {});
+    let r = dao.run.record();
+    let path = dao.ontology.with_file_name("speaker-state.cc");
+    assert_eq!(r.speaker_state, std::fs::canonicalize(&path).unwrap().to_str().unwrap());
+    assert_eq!(r.speaker_state_digest, hex(&path));
+    let root = dao.root.clone();
+    assert_eq!(RunStores::open(&root).unwrap().record(), dao.run.record());
+    let mut bytes = std::fs::read(&path).unwrap();
+    bytes.push(0xc0);
+    std::fs::write(&path, bytes).unwrap();
+    assert_eq!(
+        RunStores::open(&root).err(),
+        Some(RunError::Drift(DriftOf::SpeakerState))
+    );
+}
+
+#[test]
+fn create_refuses_a_scene_its_inventory_cannot_read() {
+    // The scene is admitted against a copy that gained rev 4; the run's head
+    // inventory stops at rev 3.
+    let src = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/daodejing");
+    let dir = tempfile::tempdir().unwrap();
+    for (from, to) in [("corpus.cc", "c.cc"), ("entity.cc", "e.cc")] {
+        std::fs::copy(src.join(from), dir.path().join(to)).unwrap();
+    }
+    common::dao_rev3_at(&dir.path().join("i.cc"));
+    common::dao_rev3_at(&dir.path().join("rich.cc"));
+    let state = common::speaker_state_in(dir.path());
+    put_dao_scene(&state, &dir.path().join("rich.cc"), &dir.path().join("c.cc"), &dir.path().join("e.cc"));
+    let ontology = common::ontology_in(dir.path());
+    let root = dir.path().join("run");
+    let create = || {
+        RunStores::create(
+            &root,
+            "x",
+            RunPaths {
+                corpus: &dir.path().join("c.cc"),
+                inventory: &dir.path().join("i.cc"),
+                entities: &dir.path().join("e.cc"),
+                ontology: &ontology,
+                speaker_state: &state,
+            },
+            "fake-model",
+            "bag",
+            weksa::run::LowererReach::ToolLessRelay,
+            ModelFamily::Unrecorded,
+            &["en-US".to_string()],
+        )
+    };
+    assert_eq!(create().err(), Some(RunError::SpeakerState));
+    assert!(!root.join("run.cc").exists());
+    assert!(!root.join("inventory.cc").exists());
+}
+
+#[test]
+fn a_run_reads_entries_and_scenes_at_its_own_head() {
+    use weksa::{Condition, Layer, OntologyEntry, OntologyStore, Slot, Test};
+    // An entry and a scene admitted at rev 4 through a Dao-shaped inventory open
+    // a run whose own inventory is seed, proof and the scene revision as rev 3:
+    // beds number revisions independently, so a run reads features at its head.
+    let src = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/daodejing");
+    let dir = tempfile::tempdir().unwrap();
+    for (from, to) in [("corpus.cc", "c.cc"), ("entity.cc", "e.cc")] {
+        std::fs::copy(src.join(from), dir.path().join(to)).unwrap();
+    }
+    let rich = dir.path().join("rich.cc");
+    common::dao_rev3_at(&rich);
+    let state = common::speaker_state_in(dir.path());
+    put_dao_scene(&state, &rich, &dir.path().join("c.cc"), &dir.path().join("e.cc"));
+    let rich_store = InventoryStore::open(&rich).unwrap();
+    let status = rich_store.inventory().unwrap().entries().find(|e| e.gloss == "relative_status").unwrap().id;
+    let ontology = common::ontology_in(dir.path());
+    OntologyStore::open(&ontology)
+        .unwrap()
+        .admit(
+            vec![OntologyEntry {
+                language: "en-US".into(),
+                n: 1,
+                inventory_rev: 4,
+                layer: Layer::Discourse,
+                when: vec![Condition {
+                    slot: Slot::Scene,
+                    feature: status,
+                    test: Test::Is(weksa::packet::FeatValue::Option(common::lab("above"))),
+                }],
+                choice: "ENABOVE".into(),
+                examples: vec![],
+                annotator: weksa::Annotator::Operator,
+            }],
+            &rich_store,
+        )
+        .unwrap();
+    let head = dir.path().join("i.cc");
+    let mut own = InventoryStore::open(&head).unwrap();
+    for (rev, entries) in [
+        weksa::inventory::seed(),
+        weksa::inventory::proof_revision(),
+        weksa::inventory::speaker_scene_revision(3),
+    ] {
+        own.admit_revision(rev, entries).unwrap();
+    }
+    drop(own);
+    let run = RunStores::create(
+        &dir.path().join("run"),
+        "x",
+        RunPaths {
+            corpus: &dir.path().join("c.cc"),
+            inventory: &head,
+            entities: &dir.path().join("e.cc"),
+            ontology: &ontology,
+            speaker_state: &state,
+        },
+        "fake-model",
+        "bag",
+        weksa::run::LowererReach::ToolLessRelay,
+        ModelFamily::Unrecorded,
+        &["en-US".to_string()],
+    );
+    assert!(run.is_ok(), "{:?}", run.err());
+}
+
+// ---- test-text-guard: no prompt file or answer for a prompt holding Test text ----
+
+#[test]
+fn answer_files_withhold_prompts_that_hold_test_text() {
+    use weksa::model::{AnswerFiles, ModelPort, PortError};
+    let p = prompt();
+    let dir = tempfile::tempdir().unwrap();
+    let round = dir.path().join("round-1");
+    let refused = |t: &str| {
+        AnswerFiles::new(round.clone(), "m".into(), vec![t.to_string()]).answer(&p)
+            == Err(PortError::Withheld)
+    };
+    // A text of 12 normalised characters or more counts anywhere in the prompt, in
+    // any case, spacing, wrapping or width: the corpus door's own sameness.
+    assert!(refused("Nibu says mind the hatch."));
+    assert!(refused("NIBU SAYS MIND THE HATCH"));
+    assert!(refused("nibu  says\n mind the\n\n hatch"));
+    assert!(refused("\u{ff2e}ibu says mind the hatch."));
+    assert!(!round.exists(), "a refused prompt creates nothing");
+    // The threshold is 12 normalised characters: "the hatch" (8) says nothing about a
+    // prompt, "mind the hatch" (12) does.
+    assert!(!refused("the hatch"));
+    assert!(refused("mind the hatch"));
+    assert!(!refused("   "), "a blank withheld text matches nothing");
+    // Unrelated text passes and the prompt is then written for its answerer.
+    let mut clean = AnswerFiles::new(round.clone(), "m".into(), vec!["The ferry leaves at noon.".into()]);
+    assert_eq!(clean.answer(&p), Err(PortError::Unanswered));
+    assert!(round.join(format!("{}.prompt", p.digest())).exists());
+    // The refusal comes before a recorded answer is read.
+    std::fs::write(round.join(format!("{}.answer", p.digest())), "x").unwrap();
+    assert!(refused("Nibu says mind the hatch."));
+}
+
+#[test]
+fn a_round_stops_on_a_prompt_that_holds_test_text() {
+    use common::{cast, entities_in, group_in_bucket, item_in};
+    use weksa::model::{ModelPort, PortError};
+    use weksa::run::{RunError, round};
+    let mut w = world();
+    let entities = entities_in(w.dir.path());
+    // Test sentences (one withdrawn), and Train lines that quote them: the corpus
+    // door refuses an identical twin, not a longer line that holds one.
+    let held = "Hold this sentence back.";
+    let gone = "A withdrawn Test sentence.";
+    w.corpus
+        .add(item_in("item:held:3", gone, &group_in_bucket(91), cast()), &entities)
+        .unwrap();
+    w.corpus.withdraw("item:held:3").unwrap();
+    for (key, line, bucket) in [
+        ("item:held:1", held.to_string(), 90),
+        ("item:held:2", format!("{held} And then some."), 10),
+        ("item:held:4", format!("{gone} And then some."), 11),
+    ] {
+        w.corpus
+            .add(item_in(key, &line, &group_in_bucket(bucket), cast()), &entities)
+            .unwrap();
+    }
+    let mut run = run_over(w.dir.path());
+    let dir = w.dir.path().join("answers");
+    let mut files = run.answer_files(dir.clone()).unwrap();
+    let inv = run.inventory().inventory().unwrap();
+    let train = run.train().unwrap();
+    let encode = |key: &str| {
+        let offer = run.offer(key).unwrap().unwrap();
+        weksa::context::Prompt::encode(&offer, &train, &inv, 4)
+    };
+    assert_eq!(files.answer(&encode("item:nibu:1")), Err(PortError::Unanswered));
+    for key in ["item:held:2", "item:held:4"] {
+        assert_eq!(files.answer(&encode(key)), Err(PortError::Withheld), "{key}");
+    }
+    assert_eq!(std::fs::read_dir(&dir).unwrap().count(), 1, "only the clean prompt");
+    // The round stops on it rather than skipping the item. A model-written line in a
+    // Test group is withheld too: it is in no split, and its text is still held out.
+    // (Covered by test_texts taking every Test-group item, below.)
+    let scorer = weksa::score::Scorer::new(OneBag);
+    let mut round_files = run.answer_files(w.dir.path().join("round")).unwrap();
+    assert!(matches!(
+        round(&mut run, &mut round_files, &scorer),
+        Err(RunError::Withheld)
+    ));
+}
+
+#[test]
+fn the_encode_step_and_ontology_mint_stop_on_a_withheld_prompt() {
+    use weksa::run::{RunError, round};
+    let w = world();
+    let mut run = run_over(w.dir.path());
+    let scorer = weksa::score::Scorer::new(OneBag);
+    let r = round(&mut run, &mut Withholds, &scorer);
+    assert!(matches!(r, Err(RunError::Withheld)), "{:?}", r.map(|_| ()));
+    assert!(matches!(run.mint_ontology(&mut Withholds, "en-US"), Err(RunError::Withheld)));
+}
+
+#[test]
+fn model_written_test_group_text_is_withheld_too() {
+    use common::{entities_in, group_in_bucket, item_in, model};
+    let mut w = world();
+    let entities = entities_in(w.dir.path());
+    w.corpus
+        .add(item_in("item:held:5", "A model line of a Test meaning.", &group_in_bucket(92), model()), &entities)
+        .unwrap();
+    assert!(
+        w.corpus
+            .test_texts()
+            .unwrap()
+            .iter()
+            .any(|t| t == "A model line of a Test meaning."),
+        "a model-written Test-group item is in no split, and its text is still held out"
+    );
+}
+
+// ---- test-text-withheld-arms: a refused prompt stops every model call, none skips it ----
+
+/// Refuses every prompt as holding Test text, as the answer door does.
+struct Withholds;
+
+impl ModelPort for Withholds {
+    fn model(&self) -> &str {
+        "fake-model"
+    }
+    fn answer(&mut self, _: &Prompt) -> Result<String, PortError> {
+        Err(PortError::Withheld)
+    }
+}
+
+#[test]
+fn recall_stops_on_a_withheld_prompt() {
+    let dao = dao();
+    assert!(matches!(dao.run.recall(&mut Withholds), Err(RunError::Withheld)));
+}
+
+#[test]
+fn the_lowering_step_of_a_round_stops_on_a_withheld_prompt() {
+    // Encoding is answered; every lowering prompt is refused.
+    let mut dao = dao();
+    let mut model = fake(&good_answers());
+    model.raw_lowering = Some(Err(PortError::Withheld));
+    let r = round(&mut dao.run, &mut model, &Scorer::new(Bag));
+    assert!(matches!(r, Err(RunError::Withheld)), "{:?}", r.map(|_| ()));
+    assert!(
+        !dao.root.join("round-1/packets.cc").exists(),
+        "the refused attempt's packets are discarded"
+    );
+}
+
+#[test]
+fn the_cycle_editor_stops_on_a_withheld_prompt() {
+    let mut dao = dao();
+    replicate_rounds(&mut dao);
+    let mut model = cycle_fake(ONE_CONCEPT);
+    model.edit = Some(Err(PortError::Withheld));
+    let r = cycle(&mut dao.run, &mut model, &Scorer::new(Bag));
+    assert!(matches!(r, Err(RunError::Withheld)), "{:?}", r.map(|_| ()));
+}
+
+#[test]
+fn a_stance_ablation_stops_on_a_withheld_prompt() {
+    let (dao, _) = recorded_dao(|_| {});
+    let mut rec = Lowerer::new(blind);
+    let r = ablate(&dao, &mut rec, &mut Withholds);
+    assert!(matches!(r, Err(RunError::Withheld)), "{:?}", r.map(|_| ()));
+    // A recorded answer that is refused stops it as well.
+    let r = ablate(&dao, &mut Withholds, &mut Lowerer::new(blind));
+    assert!(matches!(r, Err(RunError::Withheld)), "{:?}", r.map(|_| ()));
+}
+
+#[test]
+fn the_cycles_candidate_round_stops_on_a_withheld_lowering_prompt() {
+    // The edit is answered and the candidate round encodes at rev 4; every lowering
+    // prompt is then refused. No decision is recorded and no packets are left.
+    let mut dao = dao();
+    replicate_rounds(&mut dao);
+    let mut model = cycle_fake(ONE_CONCEPT);
+    model.raw_lowering = Some(Err(PortError::Withheld));
+    let r = cycle(&mut dao.run, &mut model, &Scorer::new(Bag));
+    assert!(matches!(r, Err(RunError::Withheld)), "{:?}", r.map(|_| ()));
+    assert!(dao.run.decisions().unwrap().is_empty(), "a refused cycle decides nothing");
+    assert!(
+        !dao.root.join("cycle-1/packets.cc").exists(),
+        "the refused attempt's packets are discarded"
+    );
+}
+
+// ---- distil-slice: relower, a fixed-packet re-lowering measure ----
+
+use weksa::run::{RelowerOutcome, RelowerReading};
+
+/// `relower` of round 1 with the Bag scorer; `floors` are the floor arms (none, or three or more).
+fn relower(
+    dao: &Dao,
+    recorded: &mut dyn ModelPort,
+    arm: &mut dyn ModelPort,
+    floors: &mut [&mut dyn ModelPort],
+) -> Result<RelowerOutcome, RunError> {
+    dao.run.relower(1, "arm", recorded, arm, floors, &Scorer::new(Bag))
+}
+
+fn relowered(outcome: Result<RelowerOutcome, RunError>) -> (Vec<RelowerReading>, Option<weksa::run::Verdict>) {
+    match outcome.unwrap() {
+        RelowerOutcome::Read { languages, verdict } => (languages, verdict),
+        RelowerOutcome::Unanswered { prompts } => panic!("unanswered {prompts:?}"),
+    }
+}
+
+#[test]
+fn relower_asks_only_validation_lowering_prompts_of_the_round() {
+    let (dao, r) = recorded_dao(|_| {});
+    let round_digests: Vec<String> = r.calls()[4..].iter().map(|c| c.prompt.clone()).collect();
+    // The reference pass: a lowerer shown every packet of the round, to learn
+    // which digest is which item's.
+    let (mut every, mut rec, mut arm) = (Lowerer::new(reader), Lowerer::new(reader), Lowerer::new(reader));
+    read(ablate(&dao, &mut every, &mut Lowerer::new(reader)).unwrap());
+    relowered(relower(&dao, &mut rec, &mut arm, &mut []));
+    let of = |keys: &[&str]| -> Vec<String> {
+        every
+            .seen
+            .iter()
+            .filter(|s| keys.contains(&s.1.as_str()))
+            .map(|s| s.0.clone())
+            .fold(Vec::new(), |mut v, d| {
+                if !v.contains(&d) {
+                    v.push(d);
+                }
+                v
+            })
+    };
+    let mut want = of(&["item:daodejing:2", "item:daodejing:3", WRITTEN]);
+    want.sort();
+    let mut got = arm.digests();
+    got.sort();
+    assert_eq!(got, want, "exactly the Validation lowering prompts");
+    assert_eq!(want.len(), 3);
+    for d in &want {
+        assert!(round_digests.contains(d), "byte-identical to the round's prompt {d}");
+    }
+    // Neither the lone Train item, a Test item nor an encode prompt.
+    for (_, key, text) in &arm.seen {
+        assert!(!["item:daodejing:1", "item:daodejing:4", "item:daodejing:5"].contains(&key.as_str()));
+        assert!(text.starts_with(LOWER_INSTRUCTIONS));
+    }
+    assert_eq!(rec.digests().len(), 3, "the recorded port is asked the same prompts");
+}
+
+#[test]
+fn relower_reads_recorded_and_arm_against_the_item() {
+    let (dao, _) = recorded_dao(|_| {});
+    // An arm that says the item's own sentence beats a recorded lowering that
+    // adds the stance to it.
+    let (langs, verdict) = relowered(relower(
+        &dao,
+        &mut Lowerer::new(reader),
+        &mut Lowerer::new(blind),
+        &mut [],
+    ));
+    let l = &langs[0];
+    assert_eq!((l.language.as_str(), l.n, l.unusable), ("en-US", 3, 0));
+    assert!(l.recorded.chrf < l.arm.chrf - 5.0, "{}", l.line());
+    assert!(l.arm.composite > l.recorded.composite);
+    assert!(l.floor.is_none() && verdict.is_none(), "no floor arm, no verdict");
+    // An arm equal to the recorded answers reads equal.
+    let (langs, _) = relowered(relower(&dao, &mut Lowerer::new(reader), &mut Lowerer::new(reader), &mut []));
+    assert_eq!(langs[0].recorded, langs[0].arm);
+}
+
+/// Answers `text` for every item but `bad`, which gets something that is no lowering.
+struct Breaks(&'static str);
+
+impl ModelPort for Breaks {
+    fn model(&self) -> &str {
+        "fake-model"
+    }
+    fn answer(&mut self, prompt: &Prompt) -> Result<String, PortError> {
+        let key = prompt.item_keys()[0].clone();
+        if key == self.0 {
+            return Ok("this is not a lowering draft".into());
+        }
+        Ok(serde_json::json!({ "text": english(&key) }).to_string())
+    }
+}
+
+#[test]
+fn relower_counts_an_unusable_arm_answer_as_zero() {
+    let (dao, _) = recorded_dao(|_| {});
+    let keys = ["item:daodejing:2", "item:daodejing:3", WRITTEN];
+    let (whole, _) = relowered(relower(&dao, &mut Lowerer::new(blind), &mut Lowerer::new(blind), &mut []));
+    let whole = whole[0].arm;
+    let (mut chrf, mut meaning) = (0.0, 0.0);
+    for key in keys {
+        let (langs, _) = relowered(relower(&dao, &mut Lowerer::new(blind), &mut Breaks(key), &mut []));
+        let l = &langs[0];
+        assert_eq!((l.n, l.unusable), (3, 1), "{}", l.line());
+        assert!(l.arm.chrf < whole.chrf && l.arm.meaning < whole.meaning, "{}", l.line());
+        chrf += l.arm.chrf;
+        meaning += l.arm.meaning;
+    }
+    // Each item is refused once: the three means hold every item twice at its
+    // score and once at 0, so the refused item entered its mean as 0 and n stayed 3.
+    assert!((chrf - 2.0 * whole.chrf).abs() < 1e-6, "{chrf} {}", whole.chrf);
+    assert!((meaning - 2.0 * whole.meaning).abs() < 1e-6, "{meaning} {}", whole.meaning);
+}
+
+#[test]
+fn relower_scores_an_unusable_recorded_answer_as_zero_without_counting_it_against_the_arm() {
+    let (dao, _) = recorded_dao(|_| {});
+    let (whole, _) = relowered(relower(&dao, &mut Lowerer::new(blind), &mut Lowerer::new(blind), &mut []));
+    let (langs, _) = relowered(relower(&dao, &mut Breaks("item:daodejing:3"), &mut Lowerer::new(blind), &mut []));
+    let l = &langs[0];
+    assert_eq!(l.unusable, 0, "{}", l.line());
+    assert_eq!(l.arm, whole[0].arm);
+    assert!(l.recorded.chrf < whole[0].recorded.chrf && l.recorded.meaning < whole[0].recorded.meaning);
+}
+
+#[test]
+fn relower_decides_by_decide_panel_against_the_floor_arm() {
+    use weksa::run::decide_panel;
+    let (dao, _) = recorded_dao(|_| {});
+    let run = |recorded: fn(&str, &str) -> String, arm: fn(&str, &str) -> String| {
+        let (mut f1, mut f2, mut f3) = (Lowerer::new(recorded), Lowerer::new(recorded), Lowerer::new(recorded));
+        let (langs, verdict) = relowered(relower(
+            &dao,
+            &mut Lowerer::new(recorded),
+            &mut Lowerer::new(arm),
+            &mut [&mut f1, &mut f2, &mut f3],
+        ));
+        let l = &langs[0];
+        let floor_reading = l.floor.expect("a floor arm gives a floor");
+        // Floor arms that equal the recorded answers have no spread.
+        assert_eq!((floor_reading.chrf, floor_reading.meaning, floor_reading.composite), (0.0, 0.0, 0.0));
+        assert_eq!(verdict, Some(decide_panel(&[(l.recorded, l.arm, floor_reading)])));
+        verdict.unwrap()
+    };
+    assert_eq!(run(reader, reader), Verdict::Rejected(Why::NoGain));
+    assert_eq!(run(reader, blind), Verdict::Accepted);
+    assert!(matches!(run(blind, reader), Verdict::Rejected(Why::Regressed(_))));
+}
+
+#[test]
+fn relower_floor_is_the_paired_noise_of_recorded_against_the_floor_arms() {
+    let (dao, _) = recorded_dao(|_| {});
+    let (langs, _) = relowered(relower(
+        &dao,
+        &mut Lowerer::new(blind),
+        &mut Lowerer::new(blind),
+        &mut [&mut Lowerer::new(blind), &mut Lowerer::new(blind), &mut Breaks("item:daodejing:3")],
+    ));
+    let l = &langs[0];
+    let f = l.floor.unwrap();
+    assert!(f.chrf > 0.0 && f.meaning > 0.0 && f.composite > 0.0, "{}", l.line());
+    assert!(l.line().contains(&format!("| floor chrf={:.2}", f.chrf)), "{}", l.line());
+    assert_eq!(l.unusable, 0, "unusable counts the arm, not the floor");
+    assert_eq!(l.floor_unusable, 1, "a floor arm's refusal is counted apart");
+    assert!(l.line().contains(" unusable=0 recorded "), "{}", l.line());
+    assert!(l.line().ends_with(" unusable=1"), "the floor's refusal is on the line: {}", l.line());
+    // A floor needs three arms: fewer measure no noise, and nothing is asked of the arm.
+    for arms in [1usize, 2] {
+        let mut fs: Vec<Lowerer> = (0..arms).map(|_| Lowerer::new(blind)).collect();
+        let mut dyns: Vec<&mut dyn ModelPort> = fs.iter_mut().map(|f| f as &mut dyn ModelPort).collect();
+        let mut arm = Lowerer::new(blind);
+        let r = relower(&dao, &mut Lowerer::new(blind), &mut arm, &mut dyns);
+        assert!(matches!(r, Err(RunError::FloorArms)));
+        assert!(arm.seen.is_empty());
+    }
+    // Without floor arms there is none to count.
+    let (none, _) = relowered(relower(&dao, &mut Lowerer::new(blind), &mut Lowerer::new(blind), &mut []));
+    assert_eq!(none[0].floor_unusable, 0);
+}
+
+#[test]
+fn relower_skips_and_counts_an_item_the_round_refused_before_admission() {
+    // Validation item 3 is not an encodable draft in the round: it has no packet.
+    let (dao, _) = recorded_dao(|answers| {
+        answers.insert("item:daodejing:3".into(), "not a draft".into());
+    });
+    let (mut rec, mut arm) = (Lowerer::new(blind), Lowerer::new(blind));
+    let (langs, _) = relowered(relower(&dao, &mut rec, &mut arm, &mut []));
+    let l = &langs[0];
+    assert_eq!((l.n, l.skipped, l.unusable), (2, 1, 0), "{}", l.line());
+    assert!(l.line().starts_with("relower en-US n=2 skipped=1 unusable=0 "), "{}", l.line());
+    assert_eq!(l.recorded, l.arm, "both readings are over the same two items");
+    assert!(arm.seen.iter().all(|(_, key, _)| key != "item:daodejing:3"), "nothing is asked for it");
+}
+
+#[test]
+fn relower_skips_and_counts_an_item_whose_lowering_prompt_the_round_refused() {
+    // ja-JP item 12 cites an entity with no ja form: the round admitted it and refused it
+    // at Lower. Item 13 cites none and lowers.
+    let mut dao = bilingual(None);
+    let mut model = bilingual_fake();
+    model.answers.insert("item:daodejing:12".into(), citing_laozi(2));
+    model.answers.insert("item:daodejing:13".into(), json(&draft_of(3)));
+    let r = recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    assert_eq!(r.language("ja-JP").unwrap().validation_refused.lower, 1);
+    let (mut rec, mut arm) = (Lowerer::new(bi_blind), Lowerer::new(bi_blind));
+    let (langs, _) = relowered(relower(&dao, &mut rec, &mut arm, &mut []));
+    let ja = langs.iter().find(|l| l.language == "ja-JP").unwrap();
+    assert_eq!((ja.n, ja.skipped), (1, 1), "{}", ja.line());
+    assert_eq!(ja.recorded, ja.arm);
+    let en = langs.iter().find(|l| l.language == "en-US").unwrap();
+    assert_eq!((en.n, en.skipped), (2, 0), "{}", en.line());
+    assert!(arm.seen.iter().all(|(_, key, _)| key != "item:daodejing:12"));
+}
+
+/// The ja-JP item's own text, else the English one: `f` for en-US.
+fn bi(key: &str, text: &str, f: fn(&str, &str) -> String) -> String {
+    match JA_TEXTS.iter().find(|(k, ..)| *k == key) {
+        Some((_, ja, _)) => ja.to_string(),
+        None => f(key, text),
+    }
+}
+
+fn bi_blind(key: &str, text: &str) -> String {
+    bi(key, text, blind)
+}
+
+fn bi_reader(key: &str, text: &str) -> String {
+    bi(key, text, reader)
+}
+
+/// Fine in English, nonsense in ja-JP.
+fn bi_ja_lost(key: &str, text: &str) -> String {
+    match JA_TEXTS.iter().any(|(k, ..)| *k == key) {
+        true => "zzzz".into(),
+        false => blind(key, text),
+    }
+}
+
+#[test]
+fn relower_decides_over_the_whole_panel_not_its_first_language() {
+    use weksa::run::decide_panel;
+    let mut dao = bilingual(LAOZI_JA);
+    recorded(round(&mut dao.run, &mut bilingual_fake(), &Scorer::new(Bag)).unwrap());
+    // en-US gains (the arm drops the stance the recorded lowering repeats); ja-JP is lost.
+    let (langs, verdict) = relowered(relower(
+        &dao,
+        &mut Lowerer::new(bi_reader),
+        &mut Lowerer::new(bi_ja_lost),
+        &mut [&mut Lowerer::new(bi_reader), &mut Lowerer::new(bi_reader), &mut Lowerer::new(bi_reader)],
+    ));
+    assert_eq!(
+        langs.iter().map(|l| (l.language.as_str(), l.n)).collect::<Vec<_>>(),
+        [("en-US", 2), ("ja-JP", 2)],
+        "panel order, Validation only"
+    );
+    assert!(langs[0].arm.composite > langs[0].recorded.composite, "en-US gains");
+    assert!(langs[1].arm.composite < langs[1].recorded.composite, "ja-JP is lost");
+    let panel: Vec<_> = langs.iter().map(|l| (l.recorded, l.arm, l.floor.unwrap())).collect();
+    assert_eq!(verdict, Some(decide_panel(&panel)));
+    assert!(matches!(verdict, Some(Verdict::Rejected(Why::Regressed(_)))), "{verdict:?}");
+    // The first language alone would have accepted.
+    assert_eq!(decide_panel(&panel[..1]), Verdict::Accepted);
+}
+
+#[test]
+fn relower_refuses_a_cycle_round_and_a_missing_recorded_answer() {
+    use weksa::model::RecordedAnswers;
+    let mut dao = dao();
+    replicate_rounds(&mut dao);
+    run_cycle(&mut dao, &mut cycle_fake(ONE_CONCEPT));
+    let candidate = dao.run.rounds().unwrap().into_iter().find(|r| r.cycle().is_some()).unwrap().n();
+    let mut arm = Lowerer::new(reader);
+    let r = dao.run.relower(candidate, "arm", &mut Lowerer::new(reader), &mut arm, &mut [], &Scorer::new(Bag));
+    assert!(matches!(r, Err(RunError::Malformed("round"))));
+    let r = dao.run.relower(99, "arm", &mut Lowerer::new(reader), &mut arm, &mut [], &Scorer::new(Bag));
+    assert!(matches!(r, Err(RunError::Malformed("round"))));
+    assert!(arm.seen.is_empty());
+
+    let (dao, _) = recorded_dao(|_| {});
+    let mut empty = RecordedAnswers::new(dao.root.join("round-1/nowhere"), "fake-model".into());
+    let mut arm = Lowerer::new(reader);
+    let r = relower(&dao, &mut empty, &mut arm, &mut []);
+    assert!(matches!(r, Err(RunError::Unrecorded)));
+    assert!(arm.seen.is_empty(), "nothing is asked of the arm before the round's answer exists");
+}
+
+#[test]
+fn relower_floor_arm_with_an_unanswered_prompt_is_refused() {
+    use weksa::model::RecordedAnswers;
+    let (dao, _) = recorded_dao(|_| {});
+    let mut floor = RecordedAnswers::new(dao.root.join("relower-1-floor"), "fake-model".into());
+    let r = relower(
+        &dao,
+        &mut Lowerer::new(reader),
+        &mut Lowerer::new(reader),
+        &mut [&mut floor, &mut Lowerer::new(reader), &mut Lowerer::new(reader)],
+    );
+    assert!(matches!(r, Err(RunError::FloorUnanswered)));
+    assert!(!dao.root.join("relower-1-floor").exists(), "a floor arm is never written to");
+}
+
+#[test]
+fn relower_checks_the_embedder_not_the_model() {
+    struct Named(Lowerer);
+    impl ModelPort for Named {
+        fn model(&self) -> &str {
+            "another-model"
+        }
+        fn answer(&mut self, p: &Prompt) -> Result<String, PortError> {
+            self.0.answer(p)
+        }
+    }
+    let (dao, _) = recorded_dao(|_| {});
+    let mut other = Named(Lowerer::new(blind));
+    relowered(relower(&dao, &mut Lowerer::new(reader), &mut other, &mut []));
+    let mut arm = Lowerer::new(reader);
+    let r = dao.run.relower(1, "arm", &mut Lowerer::new(reader), &mut arm, &mut [], &Scorer::new(OtherEmbedder));
+    assert!(matches!(r, Err(RunError::Drift(DriftOf::Embedder))));
+    assert!(arm.seen.is_empty());
+}
+
+/// Every file under `dir` with its bytes, by relative path.
+fn tree(dir: &Path) -> std::collections::BTreeMap<String, Vec<u8>> {
+    let mut out = std::collections::BTreeMap::new();
+    let mut stack = vec![dir.to_path_buf()];
+    while let Some(d) = stack.pop() {
+        for e in std::fs::read_dir(d).unwrap() {
+            let p = e.unwrap().path();
+            if p.is_dir() {
+                stack.push(p);
+            } else {
+                out.insert(
+                    p.strip_prefix(dir).unwrap().to_string_lossy().into_owned(),
+                    std::fs::read(&p).unwrap(),
+                );
+            }
+        }
+    }
+    out
+}
+
+#[test]
+fn relower_records_nothing() {
+    use weksa::model::RecordedAnswers;
+    let (dao, _) = recorded_dao(|_| {});
+    let before = tree(&dao.root);
+    let mut recorded = RecordedAnswers::new(dao.root.join("round-1"), "fake-model".into());
+    // An unanswered arm writes its prompts in its own directory only.
+    let mut files = dao.run.answer_files(dao.run.relower_dir(1, "arm")).unwrap();
+    // The recorded answers are files here, as the relay leaves them.
+    let r = relower(&dao, &mut recorded, &mut files, &mut []);
+    assert!(matches!(r, Err(RunError::Unrecorded)), "no round answer files yet");
+    let after = tree(&dao.root);
+    for (path, bytes) in &before {
+        assert_eq!(after.get(path), Some(bytes), "{path} changed");
+    }
+    assert!(
+        after.keys().all(|p| before.contains_key(p) || p.starts_with("relower-1-arm/")),
+        "only relower-1-arm gains files"
+    );
+
+    // With the round's answers present, the arm is asked and its prompts land in relower-1-arm.
+    let (dao, r) = recorded_dao(|_| {});
+    for call in &r.calls()[4..] {
+        std::fs::write(
+            dao.root.join(format!("round-1/{}.answer", call.prompt)),
+            r#"{"text":"The highest excellence is like the water."}"#,
+        )
+        .unwrap();
+    }
+    let before = tree(&dao.root);
+    let mut recorded = RecordedAnswers::new(dao.root.join("round-1"), "fake-model".into());
+    let mut files = dao.run.answer_files(dao.run.relower_dir(1, "arm")).unwrap();
+    let RelowerOutcome::Unanswered { prompts } = relower(&dao, &mut recorded, &mut files, &mut []).unwrap() else {
+        panic!("the arm is unanswered")
+    };
+    assert_eq!(prompts.len(), 3);
+    let after = tree(&dao.root);
+    for (path, bytes) in &before {
+        assert_eq!(after.get(path), Some(bytes), "{path} changed");
+    }
+    let added: Vec<&String> = after.keys().filter(|p| !before.contains_key(*p)).collect();
+    assert!(added.iter().all(|p| p.starts_with("relower-1-arm/")), "{added:?}");
+    assert_eq!(added.iter().filter(|p| p.ends_with(".prompt")).count(), 3);
+}
+
+#[test]
+fn relower_arm_prompt_holding_test_text_is_withheld() {
+    // A Test sentence that a Validation lowering prompt holds: a line of the
+    // lowering instructions, which every lowering prompt carries.
+    let line = LOWER_INSTRUCTIONS.lines().find(|l| l.trim().chars().count() > 30).unwrap().trim().to_string();
+    let (dao, _) = recorded_dao_in(
+        |corpus, entities| {
+            let mut held = corpus.get("item:daodejing:4").unwrap().unwrap();
+            held.id = "item:held:9".into();
+            held.text = line.clone();
+            corpus.add(held, entities).unwrap();
+        },
+        |_| {},
+    );
+    let mut files = dao.run.answer_files(dao.run.relower_dir(1, "arm")).unwrap();
+    let r = relower(&dao, &mut Lowerer::new(reader), &mut files, &mut []);
+    assert!(matches!(r, Err(RunError::Withheld)), "{:?}", r.map(|_| ()));
+    let dir = dao.run.relower_dir(1, "arm");
+    let prompts = std::fs::read_dir(&dir)
+        .map(|d| d.filter(|e| e.as_ref().unwrap().file_name().to_string_lossy().ends_with(".prompt")).count())
+        .unwrap_or(0);
+    assert_eq!(prompts, 0, "no prompt file is written");
+}
+
+// ---- calibrate: the accept rule replayed over answered relower draws ----
+
+/// The cut a [`Tee`] answers with something that is no lowering.
+const NOT_A_LOWERING: usize = 99;
+
+/// Answers each lowering prompt with the item's own text cut by `cut(key)`
+/// tenths, and leaves the answer where an answer file goes, as the relay does.
+struct Tee {
+    dir: PathBuf,
+    texts: HashMap<String, String>,
+    cut: Box<dyn Fn(&str) -> usize>,
+}
+
+impl ModelPort for Tee {
+    fn model(&self) -> &str {
+        "fake-model"
+    }
+    fn answer(&mut self, prompt: &Prompt) -> Result<String, PortError> {
+        let key = prompt.item_keys()[0].clone();
+        let text: Vec<char> = self.texts[&key].chars().collect();
+        let cut = (self.cut)(&key);
+        let keep = (text.len() * (10 - cut.min(10))).div_ceil(10);
+        let answer = if cut == NOT_A_LOWERING {
+            "this is no lowering".to_string()
+        } else {
+            serde_json::json!({ "text": text[..keep].iter().collect::<String>() }).to_string()
+        };
+        std::fs::create_dir_all(&self.dir).unwrap();
+        std::fs::write(self.dir.join(format!("{}.answer", prompt.digest())), &answer).unwrap();
+        Ok(answer)
+    }
+}
+
+/// A bilingual Dao run grown to seven live Validation items per language, five
+/// of them `item:vgrow:*`, with round 1 recorded.
+fn grown_bilingual() -> Dao {
+    let mut dao = dao_panel(
+        |corpus, entities| {
+            add_languages(corpus, entities, LAOZI_JA);
+            let entities = weksa::EntityStore::open(entities).unwrap();
+            let mut store = CorpusStore::open(corpus).unwrap();
+            for k in 0..5 {
+                for (from, key, text, language) in [
+                    ("item:daodejing:2", format!("item:vgrow:{}", k + 1), format!("The sage grows item {k} by letting the thing alone for {} seasons", k * 3 + 1), "en-US"),
+                    ("item:daodejing:12", format!("item:vgrowja:{}", k + 1), format!("聖人は{}の季節を数えて物ごとに静かに任せる", "春夏秋冬".chars().cycle().skip(k).take(k + 2).collect::<String>()), "ja-JP"),
+                ] {
+                    let mut item = store.get(from).unwrap().unwrap();
+                    item.id = key.as_str().into();
+                    item.text = text;
+                    item.language = language.into();
+                    item.names = vec![];
+                    item.prior_turns = if language == "ja-JP" { laozi_spoke_before() } else { vec![] };
+                    store.add(item, &entities).unwrap();
+                }
+            }
+        },
+        &["ja-JP", "en-US"],
+    );
+    let mut model = bilingual_fake();
+    for k in 0..5 {
+        for key in [format!("item:vgrow:{}", k + 1), format!("item:vgrowja:{}", k + 1)] {
+            model.answers.insert(key.clone(), citing_laozi(2));
+            model.lowered.insert(key, "placeholder".into());
+        }
+    }
+    recorded(round(&mut dao.run, &mut model, &Scorer::new(Bag)).unwrap());
+    dao
+}
+
+fn corpus_texts(dao: &Dao) -> HashMap<String, String> {
+    CorpusStore::open(&dao.corpus)
+        .unwrap()
+        .all()
+        .unwrap()
+        .into_iter()
+        .map(|i| (i.id.as_str().to_string(), i.text))
+        .collect()
+}
+
+/// A draw label's answers, written through relower's own door.
+fn answer_draw(dao: &Dao, label: &str, cut: impl Fn(&str) -> usize + 'static) {
+    use weksa::model::RecordedAnswers;
+    let mut recorded = RecordedAnswers::new(dao.root.join("round-1"), "fake-model".into());
+    let mut tee = Tee { dir: dao.run.relower_dir(1, label), texts: corpus_texts(dao), cut: Box::new(cut) };
+    dao.run.relower(1, label, &mut recorded, &mut tee, &mut [], &Scorer::new(Bag)).unwrap();
+}
+
+/// A stable per-item wobble in 0..4 for draw `d`.
+fn wobble(d: usize, key: &str) -> usize {
+    (key.bytes().map(usize::from).sum::<usize>() * (d + 3) + d) % 4
+}
+
+#[test]
+fn calibrate_reads_answered_draws_by_decide_panel() {
+    use weksa::run::CalibrateOutcome;
+    let dao = grown_bilingual();
+    // The recorded lowering's answers, through a tee over the round directory.
+    let mut round1 = Tee { dir: dao.root.join("round-1"), texts: corpus_texts(&dao), cut: Box::new(|k| wobble(0, k)) };
+    let mut seed = Tee { dir: dao.run.relower_dir(1, "seed"), texts: corpus_texts(&dao), cut: Box::new(|_| 0) };
+    dao.run.relower(1, "seed", &mut round1, &mut seed, &mut [], &Scorer::new(Bag)).unwrap();
+
+    let prompted: Vec<String> = (1..=5).map(|d| format!("p{d}")).collect();
+    for (i, label) in prompted.iter().enumerate() {
+        answer_draw(&dao, label, move |k| wobble(i + 1, k));
+    }
+    answer_draw(&dao, "bad", |_| 9);
+    answer_draw(&dao, "mild", |k| 1 + wobble(7, k) % 2);
+    for (i, label) in ["c1", "c2"].iter().enumerate() {
+        answer_draw(&dao, label, move |k| wobble(i + 10, k) / 2);
+    }
+    let degraded = ["bad".to_string(), "mild".to_string()];
+    let candidate = ["c1".to_string(), "c2".to_string()];
+    let classes = [
+        ("old".to_string(), vec!["item:daodejing".to_string()]),
+        ("new".to_string(), vec!["item:vgrow".to_string()]),
+    ];
+    let before = tree(&dao.root);
+    let CalibrateOutcome::Read { unusable, classes } = dao
+        .run
+        .calibrate(1, &prompted, &degraded, &candidate, &classes, &Scorer::new(Bag))
+        .unwrap()
+    else {
+        panic!("every draw is answered")
+    };
+    let after = tree(&dao.root);
+    assert!(
+        after.keys().all(|p| before.contains_key(p) || p.starts_with("calibrate-1/")),
+        "calibrate writes only its scratch store"
+    );
+    assert_eq!(unusable, 0);
+    let got: Vec<String> = classes
+        .iter()
+        .map(|c| {
+            let t = &c.trials;
+            let items: Vec<(u32, u32)> = c.languages.iter().map(|l| (l.n, l.skipped)).collect();
+            format!(
+                "{} {items:?} prompted {}/{}/{}/{} noise {:.4} degraded {:?} candidate {}/{}/{}/{}",
+                c.name,
+                t.prompted.trials, t.prompted.nogain, t.prompted.accepted, t.prompted.regressed,
+                t.noise,
+                t.degraded.iter().map(|d| (d.trials, d.regressed)).collect::<Vec<_>>(),
+                t.candidate.trials, t.candidate.accepted, t.candidate.nogain, t.candidate.regressed,
+            )
+        })
+        .collect();
+    assert_eq!(
+        got,
+        [
+            "all [(7, 0), (7, 0)] prompted 120/30/24/66 noise 0.0468 degraded [(60, 60), (60, 43)] candidate 120/64/40/16",
+            "old [(2, 0), (2, 0)] prompted 120/118/0/2 noise 0.1354 degraded [(60, 60), (60, 60)] candidate 120/0/120/0",
+            "new [(5, 0), (5, 0)] prompted 120/16/24/80 noise 0.0138 degraded [(60, 60), (60, 50)] candidate 120/60/20/40",
+        ]
+    );
+}
+
+/// An item in each language whose packet, so whose prompt, no other item shares.
+const BAD_EN: &str = "item:daodejing:3";
+const BAD_JA: &str = "item:daodejing:13";
+
+#[test]
+fn calibrate_classes_match_key_prefixes_exactly() {
+    use weksa::run::CalibrateOutcome;
+    let dao = grown_bilingual();
+    let seed = |dao: &Dao| {
+        let mut round1 = Tee { dir: dao.root.join("round-1"), texts: corpus_texts(dao), cut: Box::new(|_| 0) };
+        let mut arm = Tee { dir: dao.run.relower_dir(1, "seed"), texts: corpus_texts(dao), cut: Box::new(|_| 0) };
+        dao.run.relower(1, "seed", &mut round1, &mut arm, &mut [], &Scorer::new(Bag)).unwrap();
+    };
+    seed(&dao);
+    let prompted: Vec<String> = (1..=4).map(|d| format!("p{d}")).collect();
+    for label in &prompted {
+        answer_draw(&dao, label, |_| 0);
+    }
+    let class = |name: &str, prefix: &str| (name.to_string(), vec![prefix.to_string()]);
+    let classes = [
+        class("en", "item:vgrow:"),      // the en-US items only; a prefix one byte short also takes the ja-JP ones
+        class("mid", "vgrow"),           // a key does not start with it, though it contains it
+        class("both", "item:vgrow"),
+        ("two".to_string(), vec!["item:vgrow:1".to_string(), "item:vgrowja:1".to_string()]),
+    ];
+    let CalibrateOutcome::Read { classes, .. } =
+        dao.run.calibrate(1, &prompted, &[], &[], &classes, &Scorer::new(Bag)).unwrap()
+    else {
+        panic!("answered")
+    };
+    let seen: Vec<(String, Vec<(u32, u32)>)> = classes
+        .iter()
+        .map(|c| (c.name.clone(), c.languages.iter().map(|l| (l.n, l.skipped)).collect()))
+        .collect();
+    // Panel order: en-US, ja-JP.
+    assert_eq!(
+        seen,
+        [
+            ("all".to_string(), vec![(7, 0), (7, 0)]),
+            ("en".to_string(), vec![(5, 0), (0, 0)]),
+            ("mid".to_string(), vec![(0, 0), (0, 0)]),
+            ("both".to_string(), vec![(5, 0), (5, 0)]),
+            ("two".to_string(), vec![(1, 0), (1, 0)]),
+        ]
+    );
+}
+
+#[test]
+fn unusable_answers_are_counted_for_draws_and_for_arm_and_floors_apart() {
+    use weksa::model::RecordedAnswers;
+    use weksa::run::{CalibrateOutcome, RelowerOutcome};
+    let dao = grown_bilingual();
+    let tee = |dir: PathBuf, bad: &'static [&'static str]| Tee {
+        dir,
+        texts: corpus_texts(&dao),
+        cut: Box::new(move |k| if bad.contains(&k) { NOT_A_LOWERING } else { 0 }),
+    };
+    // The recorded lowering is unusable on one item; it is no draw and is not counted.
+    let mut round1 = tee(dao.root.join("round-1"), &[BAD_EN]);
+    let mut seed = tee(dao.run.relower_dir(1, "seed"), &[]);
+    dao.run.relower(1, "seed", &mut round1, &mut seed, &mut [], &Scorer::new(Bag)).unwrap();
+
+    // relower: the arm is unusable on one item, the first floor on two; they are counted apart.
+    let mut recorded = RecordedAnswers::new(dao.root.join("round-1"), "fake-model".into());
+    let mut arm = tee(dao.run.relower_dir(1, "arm"), &[BAD_EN]);
+    let mut f1 = tee(dao.run.relower_dir(1, "f1"), &[BAD_EN, BAD_JA]);
+    let mut f2 = tee(dao.run.relower_dir(1, "f2"), &[]);
+    let mut f3 = tee(dao.run.relower_dir(1, "f3"), &[]);
+    let RelowerOutcome::Read { languages, .. } = dao
+        .run
+        .relower(1, "arm", &mut recorded, &mut arm, &mut [&mut f1, &mut f2, &mut f3], &Scorer::new(Bag))
+        .unwrap()
+    else {
+        panic!("answered")
+    };
+    assert_eq!(languages.iter().map(|l| l.unusable).sum::<u32>(), 1);
+    assert_eq!(languages.iter().map(|l| l.floor_unusable).sum::<u32>(), 2);
+
+    // calibrate: three unusable answers across the draws, none of them the recorded one.
+    answer_draw_bad(&dao, "p1", &[BAD_EN, BAD_JA]);
+    answer_draw_bad(&dao, "p2", &[]);
+    answer_draw_bad(&dao, "p3", &[]);
+    answer_draw_bad(&dao, "p4", &[]);
+    answer_draw_bad(&dao, "bad", &[BAD_EN]);
+    let prompted: Vec<String> = (1..=4).map(|d| format!("p{d}")).collect();
+    let CalibrateOutcome::Read { unusable, .. } = dao
+        .run
+        .calibrate(1, &prompted, &["bad".to_string()], &[], &[], &Scorer::new(Bag))
+        .unwrap()
+    else {
+        panic!("answered")
+    };
+    assert_eq!(unusable, 3);
+}
+
+fn answer_draw_bad(dao: &Dao, label: &str, bad: &'static [&'static str]) {
+    answer_draw(dao, label, move |k| if bad.contains(&k) { NOT_A_LOWERING } else { 0 });
+}
diff --git a/crates/weksa/tests/mutants_a.rs b/crates/weksa/tests/mutants_a.rs
new file mode 100644
index 0000000..a9ddda5
--- /dev/null
+++ b/crates/weksa/tests/mutants_a.rs
@@ -0,0 +1,25 @@
+//! Pins for behaviour of the small and middle weksa files that mutation testing
+//! found unpinned. Each test states the behaviour in domain terms.
+
+use weksa::form::is_calendar_date;
+
+/// A calendar date is exactly `YYYY-MM-DD`: both hyphens sit where the format
+/// puts them, so a ten-byte string with a digit in the second hyphen's place is
+/// no date.
+#[test]
+fn a_calendar_date_needs_both_hyphens_in_place() {
+    assert!(is_calendar_date("2026-01-01"));
+    assert!(!is_calendar_date("2026-01201"));
+    assert!(!is_calendar_date("2026101-01"));
+}
+
+/// February has 29 days in a Gregorian leap year and 28 otherwise.
+#[test]
+fn february_has_29_days_only_in_gregorian_leap_years() {
+    assert!(is_calendar_date("2024-02-29"));
+    assert!(is_calendar_date("2000-02-29"));
+    assert!(!is_calendar_date("1900-02-29"));
+    assert!(!is_calendar_date("2023-02-29"));
+    assert!(is_calendar_date("2023-02-28"));
+    assert!(!is_calendar_date("2024-02-30"));
+}
diff --git a/crates/weksa/tests/mutants_b.rs b/crates/weksa/tests/mutants_b.rs
new file mode 100644
index 0000000..89830a6
--- /dev/null
+++ b/crates/weksa/tests/mutants_b.rs
@@ -0,0 +1,297 @@
+//! Pins found by mutation testing store.rs, inventory.rs and main.rs. Each test
+//! states what the production code must do, in domain terms.
+mod common;
+use common::*;
+use std::process::{Command, Output};
+use weksa::packet::Grade;
+use weksa::store::EntityBound;
+use weksa::{
+    Annotator, Condition, EntityStore, Layer, OntologyEntry, OntologyStore, Pronunciation, Refusal,
+    Slot, StoreError, StoreRefusal, Test,
+};
+
+fn refusal<T: std::fmt::Debug>(r: Result<T, StoreError>) -> StoreRefusal {
+    match r {
+        Err(StoreError::Refused(r)) => r,
+        other => panic!("expected a store refusal, got {other:?}"),
+    }
+}
+
+fn kay_saying(p: Pronunciation) -> weksa::Entity {
+    let mut e = ent("kay", "en-US", &["Kay"]);
+    e.forms[0].pronunciation = Some(p);
+    e
+}
+
+fn ruling(ipa: &str, rejected: Vec<String>) -> Pronunciation {
+    Pronunciation {
+        ipa: ipa.into(),
+        ruled_by: "Kay".into(),
+        date: "2026-11-07".into(),
+        source: "test".into(),
+        rejected,
+    }
+}
+
+#[test]
+fn a_pronunciation_with_a_control_or_invisible_format_character_is_refused() {
+    let d = tempfile::tempdir().unwrap();
+    let mut store = EntityStore::open(&d.path().join("e.cc")).unwrap();
+    // Either kind alone is refused: a control character, and a zero-width space.
+    for ipa in ["ˈk\u{7}eɪ", "ˈk\u{200b}eɪ"] {
+        assert!(
+            matches!(
+                store.put(kay_saying(ruling(ipa, vec![]))),
+                Err(StoreError::Refused(StoreRefusal::Malformed { .. }))
+            ),
+            "{ipa:?}"
+        );
+    }
+    // The same for a rejected pronunciation.
+    for bad in ["ˈk\u{7}aɪ", "ˈk\u{200b}aɪ"] {
+        assert!(
+            matches!(
+                store.put(kay_saying(ruling("ˈkeɪ", vec![bad.into()]))),
+                Err(StoreError::Refused(StoreRefusal::Malformed { .. }))
+            ),
+            "{bad:?}"
+        );
+    }
+    assert_eq!(store.get(&eid("kay")).unwrap(), None);
+}
+
+#[test]
+fn a_pronunciation_keeps_at_most_eight_rejected_variants() {
+    let d = tempfile::tempdir().unwrap();
+    let mut store = EntityStore::open(&d.path().join("e.cc")).unwrap();
+    let variants = |n: usize| -> Vec<String> { (0..n).map(|i| format!("ˈkaɪ{i}")).collect() };
+    assert_eq!(
+        refusal(store.put(kay_saying(ruling("ˈkeɪ", variants(9))))),
+        StoreRefusal::EntityBounds {
+            id: eid("kay"),
+            bound: EntityBound::Forms
+        }
+    );
+    store
+        .put(kay_saying(ruling("ˈkeɪ", variants(8))))
+        .expect("eight rejected variants are the bound, not beyond it");
+}
+
+#[test]
+fn an_ontology_entry_read_at_an_unknown_revision_is_refused_with_one_refusal() {
+    let w = world();
+    let mut onto = OntologyStore::open(&w.dir.path().join("o2.cc")).unwrap();
+    let entry = OntologyEntry {
+        language: "en-US".into(),
+        n: 1,
+        inventory_rev: 99,
+        layer: Layer::Discourse,
+        when: vec![Condition {
+            slot: Slot::Stance,
+            feature: iv(ANGER),
+            test: Test::AtLeast(Grade::new(200).unwrap()),
+        }],
+        choice: "WARM".into(),
+        examples: vec![],
+        annotator: Annotator::Operator,
+    };
+    match onto.admit(vec![entry], &w.inventory) {
+        Err(StoreError::Invalid(r)) => assert_eq!(r, vec![Refusal::V10UnknownRevision { rev: 99 }]),
+        other => panic!("{other:?}"),
+    }
+}
+
+fn weksa(dir: &std::path::Path, args: &[&str]) -> Output {
+    Command::new(env!("CARGO_BIN_EXE_weksa"))
+        .current_dir(dir)
+        .args([
+            "--corpus",
+            "./c.cc",
+            "--inventory",
+            "./i.cc",
+            "--entities",
+            "./e.cc",
+            "--ontology",
+            "./o.cc",
+            "--speaker-state",
+            "./s.cc",
+        ])
+        .args(args)
+        .output()
+        .unwrap()
+}
+
+fn out(o: &Output) -> String {
+    String::from_utf8_lossy(&o.stdout).into_owned() + &String::from_utf8_lossy(&o.stderr)
+}
+
+fn ok(o: Output) -> String {
+    assert!(o.status.success(), "{}", out(&o));
+    out(&o)
+}
+
+/// A scene bed: entities nibu and brokkr, the inventory through the
+/// speaker-scene revision (rev 3).
+fn scene_bed() -> tempfile::TempDir {
+    let d = tempfile::tempdir().unwrap();
+    for slug in ["nibu", "brokkr"] {
+        let id = format!("entity:{slug}");
+        let form = format!("en-US={}", slug.to_uppercase());
+        ok(weksa(
+            d.path(),
+            &[
+                "entity",
+                "put",
+                &id,
+                "--form",
+                &form,
+                "--origin",
+                "cast",
+                "--persona",
+                slug,
+                "--fixture",
+                "f.yaml",
+            ],
+        ));
+    }
+    for step in ["seed", "proof", "speaker-scene"] {
+        ok(weksa(d.path(), &["inventory", step]));
+    }
+    d
+}
+
+/// Adds a cast-authored line; returns the key it printed ("Added <key>").
+fn add_line(d: &std::path::Path, slug: &str, speaker: &str, group: &str, text: &str) -> String {
+    let speaker = format!("entity:{speaker}");
+    let printed = ok(weksa(
+        d,
+        &[
+            "corpus",
+            "add",
+            "--slug",
+            slug,
+            "--text",
+            text,
+            "--speaker",
+            &speaker,
+            "--group",
+            group,
+            "--admitted-on",
+            "2026-10-29",
+            "--source",
+            "cast-authored",
+            "--language",
+            "en-US",
+            "--persona",
+            "nibu",
+            "--fixture",
+            "f.yaml",
+            "--author",
+            "Ada Writer",
+        ],
+    ));
+    printed.split_whitespace().nth(1).unwrap().to_string()
+}
+
+fn scene_put(d: &std::path::Path, group: &str, to: &str) -> Output {
+    weksa(
+        d,
+        &[
+            "scene",
+            "put",
+            "--group",
+            group,
+            "--to",
+            to,
+            "--inventory-rev",
+            "3",
+            "--model-family",
+            "anthropic",
+            "--generator",
+            "a scene annotator",
+            "--set",
+            "intimacy=200",
+        ],
+    )
+}
+
+#[test]
+fn a_scene_group_holds_one_live_speaker_among_its_own_live_items() {
+    let d = scene_bed();
+    add_line(d.path(), "nibu", "nibu", "scene-1", "Mind the hatch.");
+    // Another group's speaker and a withdrawn line of this group are not the
+    // scene's speakers.
+    add_line(d.path(), "brokkr", "brokkr", "scene-2", "Brokkr hums.");
+    let gone = add_line(
+        d.path(),
+        "brokkr",
+        "brokkr",
+        "scene-1",
+        "Brokkr leaves early.",
+    );
+    ok(weksa(d.path(), &["corpus", "withdraw", &gone]));
+    let put = ok(scene_put(d.path(), "scene-1", "unnamed"));
+    assert!(put.contains("scene:scene-1@1"), "{put}");
+    assert!(ok(weksa(d.path(), &["scene", "dump"])).contains("entity:nibu->unnamed"));
+}
+
+#[test]
+fn a_scene_names_its_addressee_as_a_participant_unless_it_is_the_speaker() {
+    let d = scene_bed();
+    add_line(d.path(), "nibu", "nibu", "scene-1", "Mind the hatch.");
+    add_line(d.path(), "nibu", "nibu", "scene-2", "Mind the ladder.");
+    ok(scene_put(d.path(), "scene-1", "entity:brokkr"));
+    let dump = ok(weksa(d.path(), &["scene", "dump"]));
+    assert!(dump.contains("scene:scene-1@1 rev:3"), "{dump}");
+    assert!(dump.contains("[entity:nibu,entity:brokkr]"), "{dump}");
+    // A speaker addressing themself is a one-participant scene, whose
+    // relation to a named party is refused as the store reads it.
+    let own = scene_put(d.path(), "scene-2", "entity:nibu");
+    assert!(!own.status.success());
+    assert!(
+        out(&own).contains("a relation's named to is another participant"),
+        "{}",
+        out(&own)
+    );
+    assert_eq!(ok(weksa(d.path(), &["scene", "dump"])), dump);
+}
+
+#[test]
+fn relower_refuses_malformed_arm_and_floor_labels_before_reading_the_run() {
+    let d = tempfile::tempdir().unwrap();
+    let relower = |arm: &str, floor: &[&str]| {
+        let mut args = vec![
+            "loop",
+            "relower",
+            "no-such-run",
+            "--round",
+            "1",
+            "--arm",
+            arm,
+            "--lowerer",
+            "m",
+        ];
+        for f in floor {
+            args.extend(["--floor", f]);
+        }
+        weksa(d.path(), &args)
+    };
+    for (arm, floor) in [
+        ("BAD", vec!["b"]),
+        ("a", vec!["Bad"]),
+        ("a", vec!["a", "b"]),
+        ("a", vec!["b", "b"]),
+    ] {
+        let o = relower(arm, &floor);
+        assert!(!o.status.success());
+        assert!(
+            out(&o).contains("arm and floor labels must match"),
+            "{arm} {floor:?}: {}",
+            out(&o)
+        );
+    }
+    // Well-formed, distinct labels get past the label check (to the missing run).
+    let o = relower("a", &["b", "c"]);
+    assert!(!o.status.success());
+    assert!(out(&o).contains("the root holds no run"), "{}", out(&o));
+}
diff --git a/crates/weksa/tests/mutants_c.rs b/crates/weksa/tests/mutants_c.rs
new file mode 100644
index 0000000..70c499d
--- /dev/null
+++ b/crates/weksa/tests/mutants_c.rs
@@ -0,0 +1,136 @@
+//! Pins for behaviour of `context.rs`, `encode.rs` and `run.rs` found unpinned
+//! by mutation testing. Each test states what the code does in domain terms.
+
+mod common;
+
+use std::path::{Path, PathBuf};
+
+use weksa::context::Prompt;
+use weksa::entity::{Entity, EntityOrigin, LanguageForms};
+use weksa::packet::{EntityId, proof_packet};
+use weksa::{CorpusItemId, CorpusStore, EntityForms, EntityStore, InventoryStore, PacketStore};
+
+fn data(sub: &str) -> PathBuf {
+    Path::new(env!("CARGO_MANIFEST_DIR"))
+        .join("../../data")
+        .join(sub)
+}
+
+struct Held(Vec<Entity>);
+
+impl EntityForms for Held {
+    fn entity(&self, id: &EntityId) -> anyhow::Result<Option<Entity>> {
+        Ok(self.0.iter().find(|e| &e.id == id).cloned())
+    }
+}
+
+fn spoken(slug: &str, form: &str) -> Entity {
+    Entity {
+        id: EntityId::parse(&format!("entity:{slug}")).unwrap(),
+        forms: vec![LanguageForms {
+            language: "en-US".into(),
+            forms: vec![form.into()],
+            pronunciation: None,
+        }],
+        origin: EntityOrigin::Cast {
+            persona: slug.into(),
+            fixture: "f.yaml".into(),
+        },
+    }
+}
+
+/// A speaker whom no referent cites contributes no entry to the lowering
+/// prompt, even when another entity is cited: only the cited entity is listed.
+#[test]
+fn an_uncited_speaker_is_absent_from_the_lowering_prompt() {
+    let cast_inv = InventoryStore::open(&data("interlingua/inventory.cc")).unwrap();
+    let entities = EntityStore::open(&data("entity/entity.cc")).unwrap();
+    let corpus = CorpusStore::open(&data("corpus/corpus.cc")).unwrap();
+    let dir = tempfile::tempdir().unwrap();
+    let view = PacketStore::open(&dir.path().join("p.cc"))
+        .unwrap()
+        .admit(proof_packet(), &cast_inv, &corpus, &entities)
+        .unwrap();
+    let state = weksa::SpeakerStateStore::open(&dir.path().join("s.cc")).unwrap();
+    let view = view
+        .with_scene(&cast_inv.inventory().unwrap(), &state, &corpus)
+        .unwrap();
+    let held = Held(vec![
+        spoken("nibu", "Nibu"),
+        spoken("other", "SPEAKERCANARY"),
+    ]);
+    let item = CorpusItemId::parse("item:nibu:1").unwrap();
+    let speaker = EntityId::parse("entity:other").unwrap();
+    let prompt = Prompt::lower(
+        &view,
+        &item,
+        &speaker,
+        "en-US",
+        &cast_inv.inventory().unwrap(),
+        &held,
+        &weksa::Ontology::empty(),
+    )
+    .unwrap();
+    let text = prompt.text();
+    assert!(
+        text.contains("\n\nentities: {\"entity:nibu\":[\"Nibu\"]}\n\n"),
+        "{text}"
+    );
+    assert!(!text.contains("SPEAKERCANARY"), "{text}");
+}
+
+/// A run refuses a panel language that lacks a live Train or a live Validation
+/// item: one no item carries, one with only a Test item, one with only Train.
+#[test]
+fn a_panel_language_no_item_carries_is_refused_at_open() {
+    let dir = tempfile::tempdir().unwrap();
+    let d = dir.path();
+    // Builds the corpus, entity and ontology stores the run reads.
+    drop(common::run_over(d));
+    let entities = common::entities_in(d);
+    let mut corpus = CorpusStore::open(&d.join("c.cc")).unwrap();
+    for (key, language, bucket) in [("item:jp:1", "ja-JP", 90), ("item:pt:1", "pt-BR", 10)] {
+        let mut item = common::item_in(
+            key,
+            &format!("line of {key}"),
+            &common::group_in_bucket(bucket),
+            common::cast(),
+        );
+        item.language = language.into();
+        corpus.add(item, &entities).unwrap();
+    }
+    drop(corpus);
+    let create = |panel: &[&str]| {
+        weksa::run::RunStores::create(
+            &d.join(format!("run-{}", panel.join("-"))),
+            "t",
+            weksa::run::RunPaths {
+                corpus: &d.join("c.cc"),
+                inventory: &d.join("i.cc"),
+                entities: &d.join("entities.cc"),
+                ontology: &d.join("ontology.cc"),
+                speaker_state: &common::speaker_state_beside(&d.join("ontology.cc")),
+            },
+            "fake-model",
+            "bag",
+            weksa::run::LowererReach::ToolLessRelay,
+            weksa::corpus::ModelFamily::Unrecorded,
+            &panel.iter().map(|t| (*t).to_string()).collect::<Vec<_>>(),
+        )
+    };
+    assert!(create(&["en-US"]).is_ok());
+    for panel in [&["ja-JP"][..], &["pt-BR"], &["xx-XX"], &["en-US", "ja-JP"]] {
+        assert!(
+            matches!(create(panel), Err(weksa::run::RunError::Panel)),
+            "{panel:?}"
+        );
+    }
+}
+
+/// A run keeps its recall probes in `recall` under its own root.
+#[test]
+fn a_run_keeps_its_recall_under_its_root() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = common::run_over(dir.path());
+    assert_eq!(run.recall_dir(), dir.path().join("run").join("recall"));
+}
diff --git a/crates/weksa/tests/ontology_mint.rs b/crates/weksa/tests/ontology_mint.rs
new file mode 100644
index 0000000..3085d5d
--- /dev/null
+++ b/crates/weksa/tests/ontology_mint.rs
@@ -0,0 +1,402 @@
+//! The ontology mint (`weksa loop mint-ontology`): a Train-only call that drafts
+//! entries for `weksa ontology admit`. It shows a model the Train lines of one
+//! panel language, the features a condition can read and that language's entry
+//! lines; it admits nothing and writes nothing of the run.
+
+mod common;
+
+use std::path::Path;
+
+use common::{cast, entities_in, group_in_bucket, item_in};
+use weksa::context::Prompt;
+use weksa::corpus::{ModelFamily, Source};
+use weksa::inventory::{Change, seed};
+use weksa::model::{AnswerFiles, ModelPort, PortError};
+use weksa::run::{LowererReach, OntologyMintOutcome, RunPaths, RunStores};
+use weksa::speaker::Annotator;
+use weksa::{CorpusStore, InventoryStore, OntologyStore, Slot, ValueKind};
+
+/// Records every prompt shown; answers with `reply`.
+struct Record {
+    prompts: Vec<(String, Vec<String>)>,
+    reply: String,
+}
+
+impl Record {
+    fn new(reply: &str) -> Self {
+        Self { prompts: vec![], reply: reply.to_string() }
+    }
+}
+
+impl ModelPort for Record {
+    fn model(&self) -> &str {
+        "record"
+    }
+    fn answer(&mut self, p: &Prompt) -> Result<String, PortError> {
+        self.prompts.push((p.text().to_string(), p.item_keys().to_vec()));
+        Ok(self.reply.clone())
+    }
+}
+
+fn public() -> Source {
+    Source::PublicDomain {
+        work: "A Work".into(),
+        author: "An Author".into(),
+        edition_url: "https://example.org/e".into(),
+        licence: "CC0".into(),
+        jurisdiction: "US".into(),
+        translator: "A Translator".into(),
+        edition_year: 1900,
+    }
+}
+
+const STANCE_G: &str = "feature:60";
+const DISC_FLAG: &str = "feature:61";
+const REF_ONLY: &str = "feature:62";
+const PRED_ONLY: &str = "feature:63";
+const STANCE_RETIRED: &str = "feature:64";
+const SCENE_G: &str = "feature:65";
+const SCENE_OPT: &str = "feature:66";
+
+/// A fixture: items in en-US and ja-JP across every split and a withdrawal, an
+/// inventory with condition-readable and unreadable features, an ontology with
+/// en-US and ja-JP entries, and a run over them with `panel`.
+fn fixture(dir: &Path, panel: &[&str]) -> RunStores {
+    let entities = entities_in(dir);
+    let mut corpus = CorpusStore::open(&dir.join("c.cc")).unwrap();
+    let rows = [
+        ("item:en:1", "en-US", "entrain mark one", 10, cast(), false),
+        ("item:en:2", "en-US", "entrain mark two", 11, cast(), false),
+        ("item:en:3", "en-US", "envalid mark three", 50, cast(), false),
+        ("item:en:4", "en-US", "engone mark four", 12, cast(), true),
+        ("item:en:5", "en-US", "entest mark five", 90, public(), false),
+        ("item:ja:1", "ja-JP", "jatrain mark one", 13, cast(), false),
+        ("item:ja:2", "ja-JP", "javalid mark two", 51, cast(), false),
+        ("item:ja:3", "ja-JP", "jatest mark three", 91, public(), false),
+    ];
+    for (id, language, text, bucket, source, withdrawn) in rows {
+        let mut item = item_in(id, text, &group_in_bucket(bucket), source);
+        item.language = language.into();
+        corpus.add(item, &entities).unwrap();
+        if withdrawn {
+            corpus.withdraw(id).unwrap();
+        }
+    }
+    drop(corpus);
+
+    let mut inv = InventoryStore::open(&dir.join("i.cc")).unwrap();
+    let (rev1, entries) = seed();
+    inv.admit_revision(rev1, entries).unwrap();
+    let f = |id, kind, slots: &[Slot]| common::feature(id, kind, slots);
+    let features = vec![
+        f(STANCE_G, ValueKind::Grade, &[Slot::Stance]),
+        f(DISC_FLAG, ValueKind::Flag, &[Slot::Discourse]),
+        f(REF_ONLY, ValueKind::Grade, &[Slot::Referent]),
+        f(PRED_ONLY, ValueKind::Grade, &[Slot::Predication]),
+        f(STANCE_RETIRED, ValueKind::Grade, &[Slot::Stance]),
+        f(SCENE_G, ValueKind::Grade, &[Slot::Scene]),
+        f(SCENE_OPT, ValueKind::Options(weksa::OptionSet::new(vec![weksa::OptionLabel::parse("below").unwrap(), weksa::OptionLabel::parse("above").unwrap()]).unwrap()), &[Slot::Scene]),
+    ];
+    let changes = features.iter().map(|e| Change::Add(e.id)).collect();
+    let mut features = features;
+    for e in &mut features {
+        e.introduced_rev = 2;
+    }
+    inv.admit_revision(common::rev_with(changes, 2, Some(1)), features).unwrap();
+    inv.admit_revision(
+        common::rev_with(vec![Change::Retire(common::iv(STANCE_RETIRED))], 3, Some(2)),
+        vec![],
+    )
+    .unwrap();
+
+    let mut onto = OntologyStore::open(&dir.join("ontology.cc")).unwrap();
+    let annotator = Annotator::Model { family: ModelFamily::Anthropic, generator: "seed".into() };
+    let entry = |language: &str, choice: &str, examples: &[&str]| {
+        weksa::encode::OntologyDraft::parse(&format!(
+            r#"{{"entries":[{{"layer":"Grammar","choice":"{choice}","examples":[{}]}}]}}"#,
+            examples.iter().map(|x| format!("\"{x}\"")).collect::<Vec<_>>().join(",")
+        ))
+        .unwrap()
+        .into_entries(language, 3, 1, &annotator)
+    };
+    onto.admit(entry("en-US", "enchoice marker", &["enexample marker"]), &inv).unwrap();
+    onto.admit(entry("ja-JP", "jachoice marker", &["jaexample marker"]), &inv).unwrap();
+    drop(onto);
+    drop(inv);
+
+    std::fs::write(dir.join("speaker-state.cc"), [0x90]).unwrap();
+    let panel: Vec<String> = panel.iter().map(|s| s.to_string()).collect();
+    RunStores::create(
+        &dir.join("run"),
+        "t",
+        RunPaths {
+            corpus: &dir.join("c.cc"),
+            inventory: &dir.join("i.cc"),
+            entities: &dir.join("entities.cc"),
+            ontology: &dir.join("ontology.cc"),
+            speaker_state: &dir.join("speaker-state.cc"),
+        },
+        "fake-model",
+        "bag",
+        LowererReach::ToolLessRelay,
+        ModelFamily::Unrecorded,
+        &panel,
+    )
+    .unwrap()
+}
+
+const DRAFT: &str =
+    r#"{"entries":[{"layer":"Discourse","when":[],"choice":"a pattern","examples":[]}]}"#;
+
+#[test]
+fn mint_ontology_prompt_shows_only_train_items_of_the_language() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = fixture(dir.path(), &["en-US", "ja-JP"]);
+    let mut m = Record::new(DRAFT);
+    run.mint_ontology(&mut m, "en-US").unwrap();
+    let (text, keys) = &m.prompts[0];
+    assert!(text.contains("language: en-US"));
+    assert_eq!(keys, &["item:en:1", "item:en:2"]);
+    for shown in ["entrain mark one", "entrain mark two"] {
+        assert!(text.contains(shown), "{shown}");
+    }
+    for hidden in [
+        "envalid", "engone", "entest", "jatrain", "javalid", "jatest", "item:en:3", "item:en:5",
+        "item:ja",
+    ] {
+        assert!(!text.contains(hidden), "the en-US mint showed {hidden}");
+    }
+    let mut m = Record::new(DRAFT);
+    run.mint_ontology(&mut m, "ja-JP").unwrap();
+    let (text, keys) = &m.prompts[0];
+    assert_eq!(keys, &["item:ja:1"]);
+    assert!(text.contains("jatrain mark one") && !text.contains("entrain"));
+}
+
+#[test]
+fn mint_ontology_refuses_a_language_outside_the_panel() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = fixture(dir.path(), &["en-US"]);
+    let mut m = Record::new(DRAFT);
+    // ja-JP has Train items in the corpus but is not in the panel.
+    for (language, code) in [("ja-JP", "language-not-in-panel"), ("fr-FR", "language-not-in-panel")] {
+        assert_eq!(
+            run.mint_ontology(&mut m, language).unwrap(),
+            OntologyMintOutcome::Refused { code }
+        );
+    }
+    assert!(m.prompts.is_empty(), "a refused mint asked the model");
+}
+
+#[test]
+fn mint_ontology_prompt_lists_only_condition_readable_features() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = fixture(dir.path(), &["en-US"]);
+    let mut m = Record::new(DRAFT);
+    run.mint_ontology(&mut m, "en-US").unwrap();
+    let text = &m.prompts[0].0;
+    let listed = |id: &str| text.contains(&format!("\n{id}: "));
+    for id in [STANCE_G, DISC_FLAG, SCENE_G] {
+        assert!(listed(id), "{id} is readable by a condition");
+    }
+    for id in [REF_ONLY, PRED_ONLY, STANCE_RETIRED] {
+        assert!(!listed(id), "{id} is not");
+    }
+    // Nothing that is not a feature: no concept or role line.
+    assert!(!text.contains("\nconcept:") && !text.contains("\nrole:"));
+    assert!(text.contains("features rev:3"));
+}
+
+#[test]
+fn mint_ontology_prompt_lists_only_the_languages_existing_entries() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = fixture(dir.path(), &["en-US", "ja-JP"]);
+    let mut m = Record::new(DRAFT);
+    run.mint_ontology(&mut m, "en-US").unwrap();
+    let text = &m.prompts[0].0;
+    assert!(text.contains("onto:en-US:1 enchoice marker"));
+    for hidden in ["jachoice", "onto:ja-JP", "enexample", "jaexample"] {
+        assert!(!text.contains(hidden), "{hidden}");
+    }
+}
+
+fn digests(dir: &Path) -> Vec<(String, Vec<u8>)> {
+    let mut out = vec![];
+    let mut stack = vec![dir.to_path_buf()];
+    while let Some(d) = stack.pop() {
+        for e in std::fs::read_dir(&d).unwrap() {
+            let p = e.unwrap().path();
+            if p.is_dir() {
+                stack.push(p);
+            } else if !p.starts_with(dir.join("run").join("ontology-mint")) {
+                out.push((p.display().to_string(), std::fs::read(&p).unwrap()));
+            }
+        }
+    }
+    out.sort();
+    out
+}
+
+#[test]
+fn mint_ontology_writes_nothing_but_its_prompt_and_answer_files() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = fixture(dir.path(), &["en-US", "ja-JP"]);
+    let before = digests(dir.path());
+    let mut files = AnswerFiles::new(run.ontology_mint_dir(), "m".into(), vec![]);
+    let OntologyMintOutcome::Unanswered { prompt } =
+        run.mint_ontology(&mut files, "en-US").unwrap()
+    else {
+        panic!("unanswered");
+    };
+    std::fs::write(run.ontology_mint_dir().join(format!("{prompt}.answer")), DRAFT).unwrap();
+    assert!(matches!(
+        run.mint_ontology(&mut files, "en-US").unwrap(),
+        OntologyMintOutcome::Drafted { entries: 1, .. }
+    ));
+    assert_eq!(digests(dir.path()), before, "the mint wrote outside ontology-mint");
+    let mut names: Vec<String> = std::fs::read_dir(run.ontology_mint_dir())
+        .unwrap()
+        .map(|e| e.unwrap().file_name().into_string().unwrap())
+        .collect();
+    names.sort();
+    assert_eq!(names, [format!("{prompt}.answer"), format!("{prompt}.prompt")]);
+    drop(run);
+    RunStores::open(&dir.path().join("run")).expect("no Drift after a mint");
+}
+
+#[test]
+fn mint_ontology_unanswered_then_drafted_then_refused() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = fixture(dir.path(), &["en-US"]);
+    let mut files = AnswerFiles::new(run.ontology_mint_dir(), "m".into(), vec![]);
+    let OntologyMintOutcome::Unanswered { prompt } =
+        run.mint_ontology(&mut files, "en-US").unwrap()
+    else {
+        panic!("unanswered");
+    };
+    let mint = run.ontology_mint_dir();
+    assert!(mint.join(format!("{prompt}.prompt")).exists());
+    let answer = mint.join(format!("{prompt}.answer"));
+    std::fs::write(&answer, DRAFT).unwrap();
+    assert_eq!(
+        run.mint_ontology(&mut files, "en-US").unwrap(),
+        OntologyMintOutcome::Drafted { prompt: prompt.clone(), entries: 1 }
+    );
+    let two = r#"{"entries":[{"layer":"Grammar","choice":"a"},{"layer":"Lexicon","choice":"b"}]}"#;
+    std::fs::write(&answer, two).unwrap();
+    assert!(matches!(
+        run.mint_ontology(&mut files, "en-US").unwrap(),
+        OntologyMintOutcome::Drafted { entries: 2, .. }
+    ));
+    let unknown = r#"{"entries":[{"layer":"Grammar","choice":"a","key":"x"}]}"#;
+    std::fs::write(&answer, unknown).unwrap();
+    assert_eq!(
+        run.mint_ontology(&mut files, "en-US").unwrap(),
+        OntologyMintOutcome::Refused { code: "unknown-field" }
+    );
+    std::fs::write(&answer, "not json").unwrap();
+    assert_eq!(
+        run.mint_ontology(&mut files, "en-US").unwrap(),
+        OntologyMintOutcome::Refused { code: "syntax" }
+    );
+}
+
+#[test]
+fn a_mint_answer_admits_into_a_copy_and_a_new_run_pins_the_copy() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = fixture(dir.path(), &["en-US"]);
+    let pinned = std::fs::read(dir.path().join("ontology.cc")).unwrap();
+    let pin = run.record().ontology_digest.clone();
+    let draft = format!(
+        r#"{{"entries":[{{"layer":"Discourse","when":[{{"slot":"Stance","feature":"{STANCE_G}","test":{{"AtLeast":500}}}}],"choice":"a grown choice","examples":[]}}]}}"#
+    );
+    let mut files = AnswerFiles::new(run.ontology_mint_dir(), "m".into(), vec![]);
+    let OntologyMintOutcome::Unanswered { prompt } =
+        run.mint_ontology(&mut files, "en-US").unwrap()
+    else {
+        panic!("unanswered");
+    };
+    let answer = run.ontology_mint_dir().join(format!("{prompt}.answer"));
+    std::fs::write(&answer, &draft).unwrap();
+
+    let copy = dir.path().join("grown.cc");
+    std::fs::copy(dir.path().join("ontology.cc"), &copy).unwrap();
+    let inv = InventoryStore::open(&dir.path().join("i.cc")).unwrap();
+    let mut grown = OntologyStore::open(&copy).unwrap();
+    let annotator = Annotator::Model { family: ModelFamily::Anthropic, generator: "minter".into() };
+    let first_n = grown.ontology().unwrap().entries().iter().filter(|e| e.language == "en-US").count() as u32 + 1;
+    let entries = weksa::encode::OntologyDraft::parse(&std::fs::read_to_string(&answer).unwrap())
+        .unwrap()
+        .into_entries("en-US", 3, first_n, &annotator);
+    grown.admit(entries, &inv).unwrap();
+    drop(grown);
+
+    assert_eq!(std::fs::read(dir.path().join("ontology.cc")).unwrap(), pinned);
+    let again = RunStores::open(&dir.path().join("run")).unwrap();
+    assert_eq!(again.record().ontology_digest, pin);
+
+    let second = RunStores::create(
+        &dir.path().join("run-grown"),
+        "t",
+        RunPaths {
+            corpus: &dir.path().join("c.cc"),
+            inventory: &dir.path().join("i.cc"),
+            entities: &dir.path().join("entities.cc"),
+            ontology: &copy,
+            speaker_state: &dir.path().join("speaker-state.cc"),
+        },
+        "fake-model",
+        "bag",
+        LowererReach::ToolLessRelay,
+        ModelFamily::Unrecorded,
+        &["en-US".to_string()],
+    )
+    .unwrap();
+    assert_ne!(second.record().ontology_digest, pin);
+
+    // A condition on a feature outside the inventory is the store's to refuse.
+    let outside = draft.replace(STANCE_G, "feature:99");
+    let entries = weksa::encode::OntologyDraft::parse(&outside)
+        .unwrap()
+        .into_entries("en-US", 3, 9, &annotator);
+    let mut grown = OntologyStore::open(&copy).unwrap();
+    assert!(grown.admit(entries, &inv).is_err());
+}
+
+/// The line after `example ` in a mint prompt.
+fn example_of(text: &str) -> &str {
+    text.lines().find_map(|l| l.strip_prefix("example ")).expect("the prompt carries an example")
+}
+
+#[test]
+fn the_mint_prompts_own_example_parses_and_admits_through_the_door() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = fixture(dir.path(), &["en-US"]);
+    let mut m = Record::new(DRAFT);
+    run.mint_ontology(&mut m, "en-US").unwrap();
+    let example = example_of(&m.prompts[0].0);
+    // It teaches the door's spelling: a capitalized layer, feature ids, each test form.
+    assert!(example.contains(r#""layer":"Grammar""#), "{example}");
+    for form in [r#"{"AtLeast":500}"#, r#"{"Is":{"Option":"#, r#"{"Is":{"Flag":true}}"#] {
+        assert!(example.contains(form), "{form} in {example}");
+    }
+    let draft = weksa::encode::OntologyDraft::parse(example).unwrap();
+    let inv = InventoryStore::open(&dir.path().join("i.cc")).unwrap();
+    let copy = dir.path().join("grown.cc");
+    std::fs::copy(dir.path().join("ontology.cc"), &copy).unwrap();
+    let mut grown = OntologyStore::open(&copy).unwrap();
+    let annotator = Annotator::Model { family: ModelFamily::Anthropic, generator: "minter".into() };
+    grown.admit(draft.into_entries("en-US", 3, 2, &annotator), &inv).unwrap();
+}
+
+#[test]
+fn the_mint_example_names_only_features_the_prompt_lists() {
+    let dir = tempfile::tempdir().unwrap();
+    let run = fixture(dir.path(), &["en-US"]);
+    let mut m = Record::new(DRAFT);
+    run.mint_ontology(&mut m, "en-US").unwrap();
+    let example = example_of(&m.prompts[0].0);
+    for unreadable in [REF_ONLY, PRED_ONLY, STANCE_RETIRED] {
+        assert!(!example.contains(unreadable), "{unreadable}");
+    }
+}
diff --git a/crates/weksa/tests/original_corpus.rs b/crates/weksa/tests/original_corpus.rs
index 21f7a1d..44af0cc 100644
--- a/crates/weksa/tests/original_corpus.rs
+++ b/crates/weksa/tests/original_corpus.rs
@@ -1,7 +1,11 @@
-//! The original corpus (`data/original`): 28 passages written for the
-//! non-memorised golf-loop target (Train and Validation, all model-written)
-//! and 8 public-domain Test items, each with its full provenance. Test is only
-//! read at a checkpoint: no round or recall prompt over this store holds it.
+//! The original corpus (`data/original`), in en-US and ja-JP: per language, 49
+//! passages written for the non-memorised golf-loop target (Train and
+//! Validation, all model-written: 28, then 21 more Validation items grown blind) and 8 public-domain Test sentences, each with
+//! its full provenance. Test is only read at a checkpoint: no round or recall
+//! prompt over this store holds it. The ja-JP passages are written in Japanese,
+//! not translated; the ja-JP Test sentences are Aozora Bunko excerpts.
+
+const PANEL: [&str; 2] = ["en-US", "ja-JP"];
 
 mod common;
 
@@ -14,7 +18,7 @@ use weksa::{CorpusStore, EntityStore, InventoryStore};
 fn stores() -> (CorpusStore, EntityStore) {
     let dir = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/original");
     let tmp = tempfile::tempdir().unwrap();
-    for f in ["corpus.cc", "entity.cc", "inventory.cc"] {
+    for f in ["corpus.cc", "entity.cc", "inventory.cc", "speaker-state.cc"] {
         std::fs::copy(dir.join(f), tmp.path().join(f)).unwrap();
     }
     let keep = tmp.keep();
@@ -28,15 +32,22 @@ fn stores() -> (CorpusStore, EntityStore) {
 fn every_original_item_records_its_author_and_the_public_domain_ones_their_provenance() {
     let (corpus, entities) = stores();
     let items = corpus.all().unwrap();
-    assert_eq!(items.len(), 36);
-    let (mut model, mut public) = (0, 0);
+    assert_eq!(items.len(), 114);
+    let (mut model, mut public) = ([0; 2], [0; 2]);
     for item in &items {
+        let lang = PANEL.iter().position(|l| *l == item.language).unwrap();
         match &item.source {
             Source::ModelWritten {
                 family, generator, ..
             } => {
-                model += 1;
-                assert!(item.id.starts_with("item:original:"), "{}", item.id);
+                model[lang] += 1;
+                assert!(
+                    item.id
+                        .starts_with(["item:original:", "item:original-ja:"][lang])
+                        || item.id.starts_with(["item:vgrow:", "item:vgrow-ja:"][lang]),
+                    "{}",
+                    item.id
+                );
                 assert_eq!(*family, ModelFamily::Anthropic, "{}", item.id);
                 let generator = generator.as_deref().unwrap_or_default();
                 assert!(generator.contains("claude-sonnet-5-5"), "{}", item.id);
@@ -50,22 +61,42 @@ fn every_original_item_records_its_author_and_the_public_domain_ones_their_prove
                 translator,
                 edition_year,
             } => {
-                public += 1;
-                assert!(item.id.starts_with("item:holdout:"), "{}", item.id);
-                // The edition is the page the text was taken from.
+                public[lang] += 1;
                 assert!(
-                    edition_url.starts_with("https://www.gutenberg.org/cache/epub/")
-                        && edition_url.ends_with(".txt"),
+                    item.id
+                        .starts_with(["item:holdout:", "item:holdout-ja:"][lang]),
                     "{}",
                     item.id
                 );
                 assert!(licence.contains("Public domain"), "{}", item.id);
-                assert!(
-                    licence.contains("trademark or licence matter"),
-                    "{}",
-                    item.id
-                );
                 assert!(jurisdiction.starts_with("United States"), "{}", item.id);
+                if lang == 0 {
+                    // The edition is the page the text was taken from.
+                    assert!(
+                        edition_url.starts_with("https://www.gutenberg.org/cache/epub/")
+                            && edition_url.ends_with(".txt"),
+                        "{}",
+                        item.id
+                    );
+                    assert!(
+                        licence.contains("trademark or licence matter"),
+                        "{}",
+                        item.id
+                    );
+                } else {
+                    // The card file the text was taken from, its sources kept attached.
+                    assert!(
+                        edition_url.starts_with("https://www.aozora.gr.jp/cards/")
+                            && edition_url.ends_with(".html"),
+                        "{}",
+                        item.id
+                    );
+                    for kept in ["Aozora Bunko", "底本", "入力", "校正"] {
+                        assert!(licence.contains(kept), "{} lacks {kept}", item.id);
+                    }
+                    assert!(jurisdiction.contains("Japan"), "{}", item.id);
+                    assert!(translator.starts_with("none"), "{}", item.id);
+                }
                 assert!(
                     [work, author, translator]
                         .iter()
@@ -73,8 +104,10 @@ fn every_original_item_records_its_author_and_the_public_domain_ones_their_prove
                     "{}",
                     item.id
                 );
-                // Every edition and every author is out of copyright by date.
-                assert!((1600..=1900).contains(edition_year), "{}", item.id);
+                // Every edition and every author is out of copyright by date;
+                // a ja-JP edition year is the work's first appearance.
+                let years = [1600..=1900, 1868..=1930][lang].clone();
+                assert!(years.contains(edition_year), "{}", item.id);
             }
             other => panic!("{}: not model-written or public-domain: {other:?}", item.id),
         }
@@ -84,7 +117,7 @@ fn every_original_item_records_its_author_and_the_public_domain_ones_their_prove
             item.id
         );
     }
-    assert_eq!((model, public), (28, 8));
+    assert_eq!((model, public), ([49, 49], [8, 8]));
 }
 
 #[test]
@@ -99,14 +132,30 @@ fn the_original_items_spread_over_train_and_validation_and_test_is_public_domain
             .filter(|i| SplitScheme::V1.live(i) == Some(s))
             .collect::<Vec<_>>()
     };
-    assert_eq!(in_split(Split::Train).len(), 14);
-    assert_eq!(in_split(Split::Validation).len(), 14);
+    for lang in PANEL {
+        let of = |s| {
+            in_split(s)
+                .into_iter()
+                .filter(|i| i.language == lang)
+                .count()
+        };
+        assert_eq!(
+            (of(Split::Train), of(Split::Validation), of(Split::Test)),
+            (14, 35, 8),
+            "{lang}"
+        );
+    }
     let test = in_split(Split::Test);
-    assert_eq!(test.len(), 8);
+    assert_eq!(test.len(), 16);
     assert!(
         test.iter()
             .all(|i| matches!(i.source, Source::PublicDomain { .. }))
     );
+    // No model-written passage was admitted into a Test group at all.
+    assert!(items.iter().all(|i| {
+        !matches!(i.source, Source::ModelWritten { .. })
+            || SplitScheme::V1.of_bucket(SplitScheme::V1.bucket(&i.group)) != Split::Test
+    }));
     // Train and Validation hold no public-domain item.
     for s in [Split::Train, Split::Validation] {
         assert!(
@@ -117,6 +166,85 @@ fn the_original_items_spread_over_train_and_validation_and_test_is_public_domain
     }
 }
 
+/// The 42 Validation items grown after the 56: written blind, one new group
+/// each, every group bucketed Validation by its name alone, none sharing text
+/// with a Test item in either direction.
+#[test]
+fn grown_items_hold_no_test_text_and_every_group_buckets_validation() {
+    let (corpus, _) = stores();
+    let all = corpus.all().unwrap();
+    let mut grown: Vec<_> = all
+        .iter()
+        .filter(|i| i.id.starts_with("item:vgrow"))
+        .collect();
+    grown.sort_by(|a, b| a.id.cmp(&b.id));
+    assert_eq!(grown.len(), 42);
+    let test: Vec<_> = all
+        .iter()
+        .filter(|i| SplitScheme::V1.live(i) == Some(Split::Test))
+        .collect();
+    assert_eq!(test.len(), 16);
+    let mut groups = std::collections::BTreeSet::new();
+    for item in &grown {
+        match &item.source {
+            Source::ModelWritten {
+                family, generator, ..
+            } => {
+                assert_eq!(*family, ModelFamily::Anthropic, "{}", item.id);
+                assert!(
+                    generator
+                        .as_deref()
+                        .is_some_and(|g| g.contains("claude-sonnet-5-5")),
+                    "{}",
+                    item.id
+                );
+            }
+            other => panic!("{}: {other:?}", item.id),
+        }
+        assert_eq!(item.speaker.as_str(), "entity:keeper", "{}", item.id);
+        assert_eq!(
+            SplitScheme::V1.live(item),
+            Some(Split::Validation),
+            "{}",
+            item.id
+        );
+        assert!(groups.insert(item.group.clone()), "{}", item.group);
+        assert!(
+            all.iter()
+                .filter(|o| o.id != item.id)
+                .all(|o| o.group != item.group),
+            "{} shares its group",
+            item.group
+        );
+        for t in &test {
+            assert!(
+                !leaks(std::slice::from_ref(&item.text), t),
+                "{} holds Test text",
+                item.id
+            );
+            // The reverse: the Test item contains the new text.
+            assert!(
+                !t.text.contains(&item.text),
+                "{} is inside Test text",
+                item.id
+            );
+        }
+    }
+    let lines: Vec<String> = grown
+        .iter()
+        .map(|i| format!("{}\n{}\n{}\n{:?}", i.id, i.text, i.group, i.source))
+        .collect();
+    let parts: Vec<&[u8]> = lines.iter().map(|l| l.as_bytes()).collect();
+    assert_eq!(
+        weksa::split::fnv1a64_of(&parts),
+        DIGEST_OF_THE_42,
+        "a grown item changed"
+    );
+}
+
+/// Taken over the 42 grown items at admission, 2026-11-13.
+const DIGEST_OF_THE_42: u64 = 15237292705431734093;
+
 /// The 28 model-written items are byte-for-byte what they were before Test
 /// was added: id, text, group and source, folded in key order.
 #[test]
@@ -192,15 +320,176 @@ fn the_first_six_original_items_are_unchanged() {
     }
 }
 
+/// Revisions 5 and 6 of `data/original/inventory.cc` are the original bed's own
+/// lexicon (rev 5, 233 adds; rev 6, five adds for try, someday, a little, as one
+/// pleases and the one who flies a kite, same generator): concepts and frames drafted by claude-sonnet-5-5 (Weksa Hands,
+/// model-drafted original-bed lexicon from Train and Validation passages) so an
+/// encoder can name baths, kites and persimmons. It is Validation-informed on
+/// purpose: numbers on this bed measure the lowering half (register, scene,
+/// ontology), never inventory generalization or convergence; scored runs use
+/// `data/interlingua`. The Dao De Jing inventory is its revision prefix.
+const ORIGINAL_OWN_ADDS: [usize; 2] = [233, 5];
+
 #[test]
-fn the_original_inventory_is_the_dao_revision_three() {
-    let dao = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/daodejing/inventory.cc");
-    let own = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/original/inventory.cc");
-    assert_eq!(std::fs::read(dao).unwrap(), std::fs::read(&own).unwrap());
+fn the_dao_inventory_is_a_prefix_of_the_original_inventory() {
+    use weksa::inventory::{Change, Family};
+    let data = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data");
     let tmp = tempfile::tempdir().unwrap();
-    let copy = tmp.path().join("inventory.cc");
-    std::fs::copy(&own, &copy).unwrap();
-    assert!(InventoryStore::open(&copy).is_ok());
+    let open = |name: &str| {
+        let copy = tmp.path().join(format!("{name}.cc"));
+        std::fs::copy(data.join(name).join("inventory.cc"), &copy).unwrap();
+        InventoryStore::open(&copy).unwrap().inventory().unwrap()
+    };
+    let (dao, own) = (open("daodejing"), open("original"));
+    assert_eq!(dao.latest().unwrap().n, 4);
+    assert_eq!(own.latest().unwrap().n, 6);
+    for n in 1..=4 {
+        let revision = |inv: &weksa::Inventory| inv.revisions().find(|r| r.n == n).cloned();
+        assert_eq!(revision(&dao), revision(&own), "rev {n}");
+    }
+    let mut glosses = std::collections::BTreeSet::new();
+    for e in dao.entries() {
+        assert_eq!(own.entry(&e.id), Some(e), "{}", e.gloss);
+        glosses.insert(e.gloss.clone());
+    }
+    for (n, expected) in [5u32, 6].into_iter().zip(ORIGINAL_OWN_ADDS) {
+        let rev = own.revisions().find(|r| r.n == n).unwrap();
+        assert_eq!(rev.parent, Some(n - 1), "rev {n}");
+        assert_eq!(rev.changes.len(), expected, "rev {n}");
+        for change in &rev.changes {
+            let Change::Add(id) = change else {
+                panic!("rev {n} retires {change:?}");
+            };
+            let e = own.entry(id).unwrap();
+            assert!(matches!(id.family(), Family::Concept | Family::Frame), "{id}");
+            assert_eq!(e.introduced_rev, n, "{id}");
+            assert!(glosses.insert(e.gloss.clone()), "{} repeats a gloss", e.gloss);
+        }
+    }
+    assert_eq!(own.entries().count(), dao.entries().count() + ORIGINAL_OWN_ADDS.iter().sum::<usize>());
+}
+
+/// The committed seed ontology: every entry model-drafted, exactly the two
+/// panel languages, each with a Stance-conditioned entry, and every committed
+/// corpus opens a run over it (ruling `ja-ontology-owner-answer`: a model-drafted
+/// entry is labelled so and is never Test evidence).
+#[test]
+fn committed_ontology_is_model_drafted_and_reads_every_inventory() {
+    use weksa::OntologyStore;
+    use weksa::ontology::Condition;
+    use weksa::run::{LowererReach, RunPaths, RunStores};
+    use weksa::speaker::Annotator;
+    let data = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data");
+    let tmp = tempfile::tempdir().unwrap();
+    let onto = tmp.path().join("ontology.cc");
+    std::fs::copy(data.join("ontology/ontology.cc"), &onto).unwrap();
+    let entries = OntologyStore::open(&onto).unwrap().all().unwrap();
+    for e in &entries {
+        match &e.annotator {
+            Annotator::Model { family, generator } => {
+                assert_eq!(*family, ModelFamily::Anthropic, "{}", e.key());
+                assert!(
+                    [
+                        "claude-sonnet-5-5 (Weksa Hands, model-drafted seed ontology)",
+                        "claude-sonnet-5-5 (Weksa Hands, model-drafted scene ontology)",
+                        "claude-sonnet-5-5 (Weksa Hands, reworded seed entry)",
+                        "claude-sonnet-5-5 (Weksa Hands, conditioned seed entry)",
+                    ]
+                    .contains(&generator.as_str()),
+                    "{}",
+                    e.key()
+                );
+            }
+            other => panic!("{} is {other:?}", e.key()),
+        }
+    }
+    let mut langs: Vec<&str> = entries.iter().map(|e| e.language.as_str()).collect();
+    langs.sort();
+    langs.dedup();
+    assert_eq!(langs, PANEL);
+    // Every entry from number 10 on is conditioned on the scene relation, and
+    // only an entry with a Scene condition may name a politeness level.
+    for e in entries.iter().filter(|e| e.n >= 10) {
+        assert!(
+            e.when.iter().any(|c| c.slot == weksa::inventory::Slot::Scene),
+            "{} has no Scene condition",
+            e.key()
+        );
+    }
+    for lang in PANEL {
+        let stance = |c: &Condition| c.slot == weksa::inventory::Slot::Stance;
+        assert!(
+            entries
+                .iter()
+                .any(|e| e.language == lang && e.when.iter().any(stance)),
+            "{lang} has no Stance-conditioned entry"
+        );
+    }
+    // A run opens over every committed inventory bed with its panel. The default
+    // bed (data/interlingua) numbers the scene revision 3 and holds no Dao
+    // revision; the Dao beds number it 4. Entries and scenes admitted at 4 open
+    // over both because a run reads features at its own head. The default bed is
+    // read with the original corpus, entities and scenes, as `loop open` with its
+    // defaults and `--corpus data/original` does.
+    for (corpus, bed, panel) in [
+        ("original", "original", &PANEL[..]),
+        ("daodejing", "daodejing", &PANEL[..1]),
+        ("original", "interlingua", &PANEL[..]),
+    ] {
+        let dir = data.join(corpus);
+        let name = format!("{corpus}-{bed}");
+        let copy = |from: &Path, f: &str| {
+            let to = tmp.path().join(format!("{name}-{f}"));
+            std::fs::copy(from.join(f), &to).unwrap();
+            to
+        };
+        let (c, i, e) = (copy(&dir, "corpus.cc"), copy(&data.join(bed), "inventory.cc"), copy(&dir, "entity.cc"));
+        let s = copy(&dir, "speaker-state.cc");
+        RunStores::create(
+            &tmp.path().join(format!("run-{name}")),
+            corpus,
+            RunPaths {
+                corpus: &c,
+                inventory: &i,
+                entities: &e,
+                ontology: &onto,
+                speaker_state: &s,
+            },
+            "m",
+            "bag",
+            LowererReach::BriefedSubagent,
+            ModelFamily::Unrecorded,
+            &panel.iter().map(|l| l.to_string()).collect::<Vec<_>>(),
+        )
+.unwrap_or_else(|e| panic!("{name}: {e:?}"));
+    }
+    // Revision numbers are local to a bed, so agreement is proven on the beds:
+    // every feature an entry condition or a committed scene relation names means
+    // the same in all three (gloss, value kind, slots, retirement).
+    let mut named: std::collections::BTreeSet<weksa::InvId> = entries
+        .iter()
+        .flat_map(|e| e.when.iter().map(|c| c.feature))
+        .collect();
+    let scenes = weksa::SpeakerStateStore::open(&data.join("original/speaker-state.cc")).unwrap();
+    for s in scenes.all_scenes().unwrap() {
+        named.extend(s.relations.iter().flat_map(|r| r.features.iter().map(|f| f.feature)));
+    }
+    let beds: Vec<_> = ["interlingua", "original", "daodejing"]
+        .iter()
+        .map(|b| {
+            let copy = tmp.path().join(format!("bed-{b}.cc"));
+            std::fs::copy(data.join(b).join("inventory.cc"), &copy).unwrap();
+            InventoryStore::open(&copy).unwrap().inventory().unwrap()
+        })
+        .collect();
+    for id in named {
+        let shape = |inv: &weksa::Inventory| {
+            let e = inv.entry(&id).unwrap_or_else(|| panic!("{id} is missing from a bed"));
+            (e.gloss.clone(), e.value_kind.clone(), e.applies_to.clone(), e.retired_rev)
+        };
+        assert_eq!(shape(&beds[0]), shape(&beds[1]), "{id}");
+        assert_eq!(shape(&beds[1]), shape(&beds[2]), "{id}");
+    }
 }
 
 /// The probe over the real original corpus: every item is offered, none names a
@@ -226,6 +515,8 @@ fn the_recall_probe_covers_every_live_original_item_and_names_no_work() {
         tmp.path().join(f)
     };
     let (c, i, e) = (path("corpus.cc"), path("inventory.cc"), path("entity.cc"));
+    let o = tmp.path().join("ontology.cc");
+    std::fs::write(&o, [0x90]).unwrap();
     let run = RunStores::create(
         &tmp.path().join("run"),
         "orig",
@@ -233,32 +524,34 @@ fn the_recall_probe_covers_every_live_original_item_and_names_no_work() {
             corpus: &c,
             inventory: &i,
             entities: &e,
+            ontology: &o,
+            speaker_state: &common::speaker_state_beside(&o),
         },
         "m",
         "bag",
         weksa::run::LowererReach::BriefedSubagent,
         ModelFamily::Unrecorded,
-        &["en-US".to_string()],
+        &PANEL.map(String::from),
     )
     .unwrap();
     let mut model = Unrelated(vec![]);
     let RecallOutcome::Read(reading) = run.recall(&mut model).unwrap() else {
         panic!("answered");
     };
-    let r = reading.languages[0].clone();
-    assert_eq!((r.n, r.answered), (28, 28));
-    assert!(r.chrf < 25.0, "{}", r.chrf);
-    assert_eq!(model.0.len(), 28);
+    assert_eq!(reading.languages.len(), 2);
+    for r in &reading.languages {
+        assert_eq!((r.n, r.answered), (49, 49), "{}", r.language);
+        assert!(r.chrf < 25.0, "{} {}", r.language, r.chrf);
+    }
+    assert_eq!(model.0.len(), 98);
     // No item outside Train and Validation is shown to the model.
     let all = CorpusStore::open(&c).unwrap().all().unwrap();
     for item in &all {
         let live = SplitScheme::V1.live(item);
         // A recall prompt shows the first half of the item, cut at a word boundary.
-        let mut cut = item.text.len() / 4;
-        while !item.text.is_char_boundary(cut) {
-            cut -= 1;
-        }
-        let opening = item.text[..cut].trim_end().to_string();
+        let quarter = item.text.chars().count() / 4;
+        let opening: String = item.text.chars().take(quarter).collect();
+        let opening = opening.trim_end().to_string();
         let shown = model.0.iter().any(|t| t.contains(&opening));
         assert_eq!(
             shown,
@@ -299,9 +592,10 @@ fn original_round(family: ModelFamily) -> (weksa::run::RunStores, weksa::run::Ro
     use weksa::run::{LowererReach, RoundOutcome, RunPaths, RunStores, round};
     let src = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/original");
     let tmp = tempfile::tempdir().unwrap().keep();
-    for f in ["corpus.cc", "entity.cc", "inventory.cc"] {
+    for f in ["corpus.cc", "entity.cc", "inventory.cc", "speaker-state.cc"] {
         std::fs::copy(src.join(f), tmp.join(f)).unwrap();
     }
+    std::fs::write(tmp.join("ontology.cc"), [0x90]).unwrap();
     let mut run = RunStores::create(
         &tmp.join("run"),
         "orig",
@@ -309,12 +603,14 @@ fn original_round(family: ModelFamily) -> (weksa::run::RunStores, weksa::run::Ro
             corpus: &tmp.join("corpus.cc"),
             inventory: &tmp.join("inventory.cc"),
             entities: &tmp.join("entity.cc"),
+            ontology: &tmp.join("ontology.cc"),
+            speaker_state: &common::speaker_state_beside(&tmp.join("ontology.cc")),
         },
         "nope",
         "bag",
         LowererReach::ToolLessRelay,
         family,
-        &["en-US".to_string()],
+        &PANEL.map(String::from),
     )
     .unwrap();
     let scorer = weksa::score::Scorer::new(Bag);
@@ -328,14 +624,14 @@ fn original_round(family: ModelFamily) -> (weksa::run::RunStores, weksa::run::Ro
 fn own_family_counts_and_labels() {
     // The original corpus is Anthropic-written items, all offered.
     let (run, r) = original_round(ModelFamily::Anthropic);
-    assert_eq!(r.own_family(), 28);
+    assert_eq!(r.own_family(), 98);
     assert_eq!(
         r.parse_reasons().iter().map(|c| c.count).sum::<u32>(),
-        28,
+        98,
         "every item was refused at Parse and says why"
     );
     let line = run.round_line(&r);
-    assert!(line.contains(" own-family 28"), "{line}");
+    assert!(line.contains(" own-family 98"), "{line}");
 
     // A different answerer family, or none recorded, labels nothing.
     for family in [ModelFamily::OpenAi, ModelFamily::Unrecorded] {
@@ -448,6 +744,20 @@ impl weksa::model::ModelPort for Record {
     }
 }
 
+/// A Test item's text, or any run of five of its words (twelve characters of a
+/// text written without spaces), in a prompt.
+fn leaks(prompts: &[String], item: &weksa::corpus::CorpusItem) -> bool {
+    let w: Vec<&str> = item.text.split_whitespace().collect();
+    let c: Vec<char> = item.text.chars().collect();
+    prompts.iter().any(|t| {
+        t.contains(&item.text)
+            || w.windows(5).any(|k| t.contains(&k.join(" ")))
+            || (w.len() == 1
+                && c.windows(12)
+                    .any(|k| t.contains(&k.iter().collect::<String>())))
+    })
+}
+
 /// The public-domain Test items are held out: no prompt of round 1 over
 /// `data/original`, no recall prompt, and no round record names one.
 #[test]
@@ -455,9 +765,10 @@ fn no_test_item_is_offered_to_a_round_or_recall_or_recorded() {
     use weksa::run::{LowererReach, RoundOutcome, RunPaths, RunStores, round};
     let src = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/original");
     let tmp = tempfile::tempdir().unwrap();
-    for f in ["corpus.cc", "entity.cc", "inventory.cc"] {
+    for f in ["corpus.cc", "entity.cc", "inventory.cc", "speaker-state.cc"] {
         std::fs::copy(src.join(f), tmp.path().join(f)).unwrap();
     }
+    std::fs::write(tmp.path().join("ontology.cc"), [0x90]).unwrap();
     let p = |f: &str| tmp.path().join(f);
     let mut run = RunStores::create(
         &p("run"),
@@ -466,12 +777,14 @@ fn no_test_item_is_offered_to_a_round_or_recall_or_recorded() {
             corpus: &p("corpus.cc"),
             inventory: &p("inventory.cc"),
             entities: &p("entity.cc"),
+            ontology: &p("ontology.cc"),
+            speaker_state: &common::speaker_state_beside(&p("ontology.cc")),
         },
         "nope",
         "bag",
         LowererReach::ToolLessRelay,
         ModelFamily::Unrecorded,
-        &["en-US".to_string()],
+        &PANEL.map(String::from),
     )
     .unwrap();
     let items = CorpusStore::open(&p("corpus.cc")).unwrap().all().unwrap();
@@ -479,28 +792,38 @@ fn no_test_item_is_offered_to_a_round_or_recall_or_recorded() {
         .iter()
         .filter(|i| SplitScheme::V1.live(i) == Some(Split::Test))
         .collect();
-    assert_eq!(held.len(), 8);
-    // A Test item's text, or any run of five of its words, in a prompt.
+    assert_eq!(held.len(), 16);
+    // A Test item's text, or any run of five of its words (twelve characters
+    // of a text written without spaces), in a prompt.
     let leaks = |prompts: &[String], item: &weksa::corpus::CorpusItem| {
         let w: Vec<&str> = item.text.split_whitespace().collect();
-        prompts
-            .iter()
-            .any(|t| t.contains(&item.text) || w.windows(5).any(|k| t.contains(&k.join(" "))))
+        let c: Vec<char> = item.text.chars().collect();
+        prompts.iter().any(|t| {
+            t.contains(&item.text)
+                || w.windows(5).any(|k| t.contains(&k.join(" ")))
+                || (w.len() == 1
+                    && c.windows(12)
+                        .any(|k| t.contains(&k.iter().collect::<String>())))
+        })
     };
     let scorer = weksa::score::Scorer::new(Bag);
     let mut model = Record(vec![]);
     let RoundOutcome::Recorded(r) = round(&mut run, &mut model, &scorer).unwrap() else {
         panic!("answered");
     };
-    // The check bites: the round did show live items, 28 of them.
-    assert!(model.0.len() >= 28, "{}", model.0.len());
-    assert!(
-        items
-            .iter()
-            .filter(|i| matches!(SplitScheme::V1.live(i), Some(Split::Train)))
-            .any(|i| leaks(&model.0, i)),
-        "the probe cannot see a shown Train item"
-    );
+    // The check bites: the round did show live items, 98 of them, and the
+    // probe sees a shown Train item of each language.
+    assert!(model.0.len() >= 98, "{}", model.0.len());
+    for lang in PANEL {
+        assert!(
+            items
+                .iter()
+                .filter(|i| i.language == lang)
+                .filter(|i| matches!(SplitScheme::V1.live(i), Some(Split::Train)))
+                .any(|i| leaks(&model.0, i)),
+            "the probe cannot see a shown {lang} Train item"
+        );
+    }
     for item in &held {
         assert!(!leaks(&model.0, item), "round prompt held {}", item.id);
         assert!(r.calls().iter().all(|c| !c.items.contains(&item.id)));
@@ -510,8 +833,9 @@ fn no_test_item_is_offered_to_a_round_or_recall_or_recorded() {
     let weksa::run::RecallOutcome::Read(reading) = run.recall(&mut recall).unwrap() else {
         panic!("answered");
     };
-    let rr = reading.languages[0].clone();
-    assert_eq!((rr.n, rr.answered), (28, 28));
+    for rr in &reading.languages {
+        assert_eq!((rr.n, rr.answered), (49, 49), "{}", rr.language);
+    }
     for item in &held {
         assert!(!leaks(&recall.0, item), "recall prompt held {}", item.id);
     }
@@ -540,3 +864,521 @@ fn a_model_written_item_in_a_test_group_is_read_in_no_split() {
     let item = item_in("item:f:2", "x opens", &group_in_bucket(80), public);
     assert_eq!(SplitScheme::V1.live(&item), Some(Split::Test));
 }
+
+/// An Aozora Bunko file carries ruby, 《》 and ｜, and ［＃…］ notes; the items
+/// hold the base text only, in NFC.
+#[test]
+fn ja_test_text_carries_no_aozora_markup() {
+    use unicode_normalization::UnicodeNormalization;
+    let (corpus, _) = stores();
+    let ja: Vec<_> = corpus
+        .all()
+        .unwrap()
+        .into_iter()
+        .filter(|i| i.language == "ja-JP")
+        .collect();
+    assert_eq!(ja.len(), 57);
+    for item in &ja {
+        for bad in ["《", "》", "｜", "［＃", "※"] {
+            assert!(!item.text.contains(bad), "{} holds {bad}", item.id);
+        }
+        assert!(!item.text.starts_with('\u{3000}'), "{}", item.id);
+        assert_eq!(
+            item.text.nfc().collect::<String>(),
+            item.text,
+            "{}",
+            item.id
+        );
+    }
+}
+
+/// A packet that cites an item's speaker lowers only if the speaker has a form
+/// in the item's language.
+#[test]
+fn every_cited_speaker_has_a_form_in_its_items_language() {
+    let (corpus, entities) = stores();
+    for item in corpus.all().unwrap() {
+        let speaker = entities.get(&item.speaker).unwrap().unwrap();
+        assert!(speaker.forms_in(&item.language).is_some(), "{}", item.id);
+    }
+}
+
+/// The panel [en-US, ja-JP] over `data/original`: both languages are read, each
+/// with 35 Validation items, and no Test item is in any call.
+#[test]
+fn a_panel_round_reads_both_languages() {
+    let (run, r) = original_round(ModelFamily::Unrecorded);
+    assert_eq!(run.record().panel, PANEL);
+    let tags: Vec<&str> = r.languages().iter().map(|l| l.language.as_str()).collect();
+    assert_eq!(tags, PANEL);
+    for l in r.languages() {
+        let refused = &l.validation_refused;
+        assert_eq!(
+            refused.parse + refused.admit + refused.lower,
+            35,
+            "{}",
+            l.language
+        );
+    }
+    let (corpus, _) = stores();
+    for item in &corpus.all().unwrap() {
+        if SplitScheme::V1.live(item) == Some(Split::Test) {
+            assert!(
+                r.calls().iter().all(|c| !c.items.contains(&item.id)),
+                "{}",
+                item.id
+            );
+        }
+    }
+}
+
+/// The eight ja-JP Test sentences, byte for byte: each is the Aozora Bunko
+/// card file's text with only the ruby (《》, ｜) removed and NFC applied, a whole
+/// sentence, checked against the card's XHTML on 2026-11-12. A change to one
+/// is a new item, never an edit of these.
+#[test]
+fn the_eight_ja_test_sentences_are_pinned_verbatim() {
+    let want = [
+        (
+            "item:holdout-ja:1",
+            "親譲りの無鉄砲で小供の時から損ばかりしている。",
+            "holdout-ja-bocchan-6",
+            "entity:pd-soseki",
+            "https://www.aozora.gr.jp/cards/000148/files/752_14964.html",
+        ),
+        (
+            "item:holdout-ja:2",
+            "尾張の停車場で他の乗組員は言合せたように、残らず下りたので、函の中にはただ上人と私と二人になった。",
+            "holdout-ja-koya-hijiri-4",
+            "entity:pd-kyoka",
+            "https://www.aozora.gr.jp/cards/000050/files/521_20583.html",
+        ),
+        (
+            "item:holdout-ja:3",
+            "高瀬舟に乗る罪人の過半は、いわゆる心得違いのために、思わぬ科を犯した人であった。",
+            "holdout-ja-takasebune-14",
+            "entity:pd-ogai",
+            "https://www.aozora.gr.jp/cards/000129/files/45245_22007.html",
+        ),
+        (
+            "item:holdout-ja:4",
+            "ジムは僕より身長が高いくせに、絵はずっと下手でした。",
+            "holdout-ja-hitofusa-no-budo-4",
+            "entity:pd-arishima",
+            "https://www.aozora.gr.jp/cards/000025/files/211_20472.html",
+        ),
+        (
+            "item:holdout-ja:5",
+            "風がどうと吹いてきて、草はざわざわ、木の葉はかさかさ、木はごとんごとんと鳴りました。",
+            "holdout-ja-chumon-6",
+            "entity:pd-kenji",
+            "https://www.aozora.gr.jp/cards/000081/files/43754_17659.html",
+        ),
+        (
+            "item:holdout-ja:6",
+            "えたいの知れない不吉な塊が私の心を始終圧えつけていた。",
+            "holdout-ja-lemon-3",
+            "entity:pd-kajii",
+            "https://www.aozora.gr.jp/cards/000074/files/424_19826.html",
+        ),
+        (
+            "item:holdout-ja:7",
+            "多摩川の二子の渡しをわたって少しばかり行くと溝口という宿場がある。",
+            "holdout-ja-wasureenu-7",
+            "entity:pd-kunikida",
+            "https://www.aozora.gr.jp/cards/000038/files/1409_34798.html",
+        ),
+        (
+            "item:holdout-ja:8",
+            "一人の下人が、羅生門の下で雨やみを待っていた。",
+            "holdout-ja-rashomon-1",
+            "entity:pd-akutagawa",
+            "https://www.aozora.gr.jp/cards/000879/files/127_15260.html",
+        ),
+    ];
+    let (corpus, _) = stores();
+    for (id, text, group, speaker, url) in want {
+        let item = corpus.get(id).unwrap().unwrap();
+        assert_eq!(item.text, text, "{id}");
+        assert_eq!(
+            (item.group.as_str(), item.speaker.as_str()),
+            (group, speaker),
+            "{id}"
+        );
+        assert_eq!(item.language, "ja-JP", "{id}");
+        assert_eq!(SplitScheme::V1.live(&item), Some(Split::Test), "{id}");
+        let Source::PublicDomain { edition_url, .. } = &item.source else {
+            panic!("{id}: not public-domain");
+        };
+        assert_eq!(edition_url, url, "{id}");
+    }
+}
+
+/// The committed scenes: one per live Train or Validation group of
+/// `data/original`, none for any other group, every one model-annotated and
+/// never Test evidence (a Test group gets no scene and reads `NoScene`).
+#[test]
+fn committed_scenes_cover_original_groups() {
+    use std::collections::BTreeSet;
+    use weksa::speaker::Annotator;
+    use weksa::{CorpusStore, Split, SplitScheme, SpeakerStateStore};
+    let data = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data/original");
+    let tmp = tempfile::tempdir().unwrap();
+    let state = tmp.path().join("speaker-state.cc");
+    std::fs::copy(data.join("speaker-state.cc"), &state).unwrap();
+    let scenes = SpeakerStateStore::open(&state).unwrap().all_scenes().unwrap();
+    let live: BTreeSet<String> = CorpusStore::open(&data.join("corpus.cc"))
+        .unwrap()
+        .all()
+        .unwrap()
+        .into_iter()
+        .filter(|i| matches!(SplitScheme::V1.live(i), Some(Split::Train | Split::Validation)))
+        .map(|i| i.group)
+        .collect();
+    assert_eq!(live.len(), 98);
+    let held: BTreeSet<String> = scenes.iter().map(|s| s.group.clone()).collect();
+    assert_eq!(held, live, "a scene for each live Train or Validation group, none other");
+    // Revisions append: a group's later revisions re-derived its relation.
+    assert!(scenes.iter().all(|s| s.n <= 3));
+    const S7: &str = "claude-sonnet-5-5 (Weksa Hands, model-annotated original scenes)";
+    const GROWTH: &str = "claude-sonnet-5-5 (Weksa Hands, model-annotated validation-growth scenes; annotator is not the writer)";
+    let grown: BTreeSet<String> = CorpusStore::open(&data.join("corpus.cc"))
+        .unwrap()
+        .all()
+        .unwrap()
+        .into_iter()
+        .filter(|i| i.id.starts_with("item:vgrow"))
+        .map(|i| i.group)
+        .collect();
+    assert_eq!(grown.len(), 42);
+    const RUBRIC: &str =
+        "claude-sonnet-5-5 (Weksa Hands, scene rubric r1, docs/scene-annotation.md)";
+    assert!(
+        Path::new(env!("CARGO_MANIFEST_DIR"))
+            .join("../../docs/scene-annotation.md")
+            .is_file(),
+        "the rubric r1 names a doc, and the doc is in the repo"
+    );
+    let mut by_growth = BTreeSet::new();
+    for s in &scenes {
+        match &s.annotator {
+            Annotator::Model { family, generator } => {
+                assert_eq!(*family, ModelFamily::Anthropic, "{}", s.group);
+                assert!(
+                    generator == S7 || generator == GROWTH || generator == RUBRIC,
+                    "{}",
+                    s.group
+                );
+                if generator == GROWTH {
+                    by_growth.insert(s.group.clone());
+                    // Written once, never revised by its own generator.
+                    assert_eq!(s.n, 1, "{}", s.group);
+                }
+                if generator == GROWTH || generator == RUBRIC {
+                    // One relation, keeper to unnamed, the three Scene features.
+                    assert_eq!(s.relations.len(), 1, "{}", s.group);
+                    let rel = &s.relations[0];
+                    assert_eq!(rel.from.as_str(), "entity:keeper", "{}", s.group);
+                    assert_eq!(rel.to, weksa::speaker::Party::Unnamed, "{}", s.group);
+                    assert_eq!(rel.features.len(), 3, "{}", s.group);
+                }
+            }
+            other => panic!("{} is {other:?}", s.group),
+        }
+    }
+    assert_eq!(
+        by_growth, grown,
+        "the growth scenes are exactly the vgrow groups"
+    );
+    // The label a run reads is each group's latest revision: all 98 are rubric r1's.
+    let mut latest = std::collections::BTreeMap::new();
+    for s in &scenes {
+        if latest.get(&s.group).is_none_or(|l: &&weksa::speaker::Scene| l.n < s.n) {
+            latest.insert(s.group.clone(), s);
+        }
+    }
+    let mut lines = Vec::new();
+    for (group, s) in &latest {
+        let Annotator::Model { generator, .. } = &s.annotator else {
+            panic!("{group} is not model-annotated");
+        };
+        assert_eq!(generator, RUBRIC, "{group}: the latest revision follows rubric r1");
+        lines.push(format!("{group}\n{}\n{:?}", s.n, s.relations[0].features));
+    }
+    let parts: Vec<&[u8]> = lines.iter().map(|l| l.as_bytes()).collect();
+    assert_eq!(
+        weksa::split::fnv1a64_of(&parts),
+        DIGEST_OF_THE_SCENES,
+        "a latest scene changed without a rubric revision"
+    );
+    // The revisions before rubric r1 are provenance and never change: 113 of them.
+    let mut earlier: Vec<&weksa::speaker::Scene> = scenes
+        .iter()
+        .filter(|s| !matches!(&s.annotator, Annotator::Model { generator, .. } if generator == RUBRIC))
+        .collect();
+    earlier.sort_by(|a, b| (&a.group, a.n).cmp(&(&b.group, b.n)));
+    assert_eq!(earlier.len(), 113);
+    let lines: Vec<String> = earlier
+        .iter()
+        .map(|s| format!("{}\n{}\n{:?}\n{:?}", s.group, s.n, s.annotator, s.relations))
+        .collect();
+    let parts: Vec<&[u8]> = lines.iter().map(|l| l.as_bytes()).collect();
+    assert_eq!(
+        weksa::split::fnv1a64_of(&parts),
+        DIGEST_OF_THE_EARLIER_SCENES,
+        "an earlier scene revision changed"
+    );
+    // Rubric r1 is text the labels cite: the section, as committed, is pinned.
+    let doc = std::fs::read_to_string(
+        Path::new(env!("CARGO_MANIFEST_DIR")).join("../../docs/scene-annotation.md"),
+    )
+    .unwrap();
+    let from = doc.find("## Rubric r1").expect("the doc holds Rubric r1");
+    let rest = &doc[from + "## Rubric r1".len()..];
+    let section = &doc[from..from + "## Rubric r1".len() + rest.find("\n## ").expect("a section follows r1")];
+    assert_eq!(
+        weksa::split::fnv1a64_of(&[section.trim().as_bytes()]),
+        DIGEST_OF_THE_RUBRIC,
+        "rubric r1 was edited; a new rubric is a new section and a new generator"
+    );
+}
+
+/// Taken over the 113 scene revisions that precede rubric r1, 2026-11-13.
+const DIGEST_OF_THE_EARLIER_SCENES: u64 = 2598828882325200913;
+
+/// Taken over the text of the `## Rubric r1` section of docs/scene-annotation.md
+/// (trimmed), 2026-11-13.
+const DIGEST_OF_THE_RUBRIC: u64 = 11823581212652524671;
+
+/// Taken over each live group's latest revision (group, n, features) at rubric r1,
+/// 2026-11-13.
+const DIGEST_OF_THE_SCENES: u64 = 2505219080875817063;
+
+/// The sweep both seed-pair tests share: over a grid of grades per feature (each
+/// also ABSENT) and the production `Condition::holds`, no listed pair of one
+/// language's entries co-holds; and each witness entry fires where it should and
+/// stays silent where it should, so a tightened or dropped bound does not pass
+/// as a disjoint one. `glosses` names the swept features, in point order.
+fn sweep_seed_pairs<const N: usize>(
+    language: &str,
+    glosses: [&str; N],
+    pairs: &[(u32, u32)],
+    fires: &[(u32, [Option<u16>; N])],
+    silent: &[(u32, [Option<u16>; N])],
+) {
+    use weksa::inventory::Slot;
+    use weksa::ontology::{Condition, Test};
+    use weksa::OntologyStore;
+    let data = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data");
+    let tmp = tempfile::tempdir().unwrap();
+    let onto = tmp.path().join("ontology.cc");
+    std::fs::copy(data.join("ontology/ontology.cc"), &onto).unwrap();
+    let inv = InventoryStore::open(&data.join("original/inventory.cc")).unwrap().inventory().unwrap();
+    let id = |gloss: &str| inv.entries().find(|e| e.gloss == gloss).unwrap().id;
+    let feats = glosses.map(id);
+    let entries = OntologyStore::open(&onto).unwrap().all().unwrap();
+    let entry = |n: u32| {
+        entries
+            .iter()
+            .find(|e| e.language == language && e.n == n)
+            .unwrap_or_else(|| panic!("onto:{language}:{n} is absent"))
+    };
+    type Point<const N: usize> = [Option<u16>; N];
+    // The production evaluator over the slot's feature values: absent features
+    // are left out of the list, as a view leaves them out.
+    let holds = |e: &weksa::OntologyEntry, point: &Point<N>| {
+        use weksa::packet::{FeatValue, FeatureValue, Grade};
+        e.when.iter().all(|c: &Condition| {
+            assert!(matches!(c.slot, Slot::Stance | Slot::Discourse), "{}", e.key());
+            assert!(
+                matches!(c.test, Test::AtLeast(_) | Test::AtMost(_) | Test::AtMostOrUnset(_)),
+                "{}",
+                e.key()
+            );
+            let values: Vec<FeatureValue> = feats
+                .iter()
+                .zip(point)
+                .filter_map(|(f, v)| {
+                    v.map(|v| FeatureValue { feature: *f, value: FeatValue::Grade(Grade::new(v).unwrap()) })
+                })
+                .collect();
+            assert!(feats.contains(&c.feature), "{} reads a feature this test does not sweep", e.key());
+            c.holds(&values)
+        })
+    };
+    let grid = [None, Some(0u16), Some(300), Some(500), Some(599), Some(600), Some(700), Some(799), Some(800), Some(1000)];
+    for p in 0..grid.len().pow(N as u32) {
+        let point: Point<N> = std::array::from_fn(|i| grid[p / grid.len().pow(i as u32) % grid.len()]);
+        for &(a, b) in pairs {
+            assert!(
+                !(holds(entry(a), &point) && holds(entry(b), &point)),
+                "onto:{language}:{a} and :{b} co-select at {glosses:?} = {point:?}"
+            );
+        }
+    }
+    for (e, point) in fires {
+        assert!(holds(entry(*e), point), "onto:{language}:{e} does not fire at {point:?}");
+    }
+    for (e, point) in silent {
+        assert!(!holds(entry(*e), point), "onto:{language}:{e} fires at {point:?}");
+    }
+}
+
+/// ja-JP seed entries :3 to :8 over the stance and discourse grades that bear on
+/// them (anger, hedge, certainty, sadness, affection, restraint): the pairs that
+/// gave opposed instructions (clipped anger against hedge or soft particles,
+/// hedge against certainty, particles, final force) never hold together; and
+/// each of :3, :5, :7, :8 still fires where it should (anger with hedge and
+/// affection unrated or below 600, hedged at certainty 700-799, affection with
+/// certainty or restraint unrated).
+#[test]
+fn ja_seed_pairs_never_co_select() {
+    let (n, s) = (None, Some);
+    sweep_seed_pairs(
+        "ja-JP",
+        ["anger", "hedge", "certainty", "sadness", "affection", "restraint"],
+        &[(5, 6), (4, 7), (6, 7), (6, 8), (3, 5), (3, 7)],
+        &[
+            (3, [s(700), n, n, n, n, s(300)]),
+            (3, [s(700), s(599), n, n, s(599), s(300)]),
+            (3, [s(1000), s(0), s(799), n, s(0), s(0)]),
+            (5, [n, s(600), n, n, n, n]),
+            (5, [n, s(700), s(799), n, n, n]),
+            (5, [n, s(700), n, n, n, n]),
+            (7, [n, n, s(799), n, s(700), s(599)]),
+            (7, [n, n, n, n, s(700), n]),
+            (7, [n, s(1000), s(0), s(1000), s(600), s(0)]),
+            (8, [n, n, s(799), s(700), n, s(700)]),
+            (8, [n, n, n, s(600), n, s(600)]),
+            (6, [n, n, s(800), n, n, n]),
+        ],
+        &[
+            (3, [s(700), s(600), n, n, n, s(300)]),
+            (3, [s(700), n, n, n, s(600), s(300)]),
+            (3, [s(699), n, n, n, n, s(300)]),
+            (3, [s(700), n, n, n, n, s(301)]),
+            (3, [s(700), n, n, n, n, n]),
+            (8, [n, n, n, s(599), n, s(700)]),
+            (8, [n, n, n, n, n, s(700)]),
+            (5, [n, s(599), n, n, n, n]),
+            (7, [n, n, n, n, s(599), n]),
+            (7, [n, n, n, n, s(700), s(600)]),
+            (8, [n, n, n, s(600), n, s(599)]),
+        ],
+    );
+}
+
+/// en-US seed entries :3, :5, :6, :8 over anger, restraint, hedge, certainty and
+/// affection: blunt anger never holds with a hedge or affection entry, and a
+/// hedge never holds with a flatly certain line, nor affection (:8, certainty
+/// bound 799) with one, so the pairs that gave opposed instructions (no
+/// cushioning against softening, hedge against no hedge, flat declaratives
+/// against softened phrasing and tags) are
+/// disjoint by condition; each of :3, :5, :6, :8 fires and stays silent at its
+/// witnesses, so a dropped or tightened bound does not pass as a disjoint one.
+/// :6 against the Scene entry :10 is kept apart by scoping in the text only.
+#[test]
+fn en_us_seed_pairs_never_co_select() {
+    let (n, s) = (None, Some);
+    sweep_seed_pairs(
+        "en-US",
+        ["anger", "restraint", "hedge", "certainty", "affection"],
+        &[(3, 5), (3, 8), (5, 6), (6, 8)],
+        &[
+            (3, [s(600), s(300), n, n, n]),
+            (3, [s(600), s(300), s(599), n, s(599)]),
+            (3, [s(1000), s(0), s(0), s(799), s(0)]),
+            (5, [n, n, s(600), n, n]),
+            (5, [n, n, s(700), s(799), n]),
+            (5, [s(1000), s(1000), s(600), n, n]),
+            (6, [n, n, n, s(800), n]),
+            (8, [n, n, n, n, s(600)]),
+            (8, [s(1000), s(0), n, n, s(600)]),
+            (8, [n, n, n, s(799), s(600)]),
+        ],
+        &[
+            (3, [s(600), s(300), s(600), n, n]),
+            (3, [s(600), s(300), n, n, s(600)]),
+            (3, [s(599), s(300), n, n, n]),
+            (3, [s(600), s(301), n, n, n]),
+            (3, [s(600), n, n, n, n]),
+            (5, [n, n, s(599), n, n]),
+            (5, [n, n, s(700), s(800), n]),
+            (6, [n, n, n, s(799), n]),
+            (8, [n, n, n, n, s(599)]),
+            (8, [n, n, n, s(800), s(600)]),
+        ],
+    );
+}
+
+/// The committed ontology's Scene-conditioned entries, over every scene relation
+/// (relative_status x in_group x intimacy in steps of 50): two entries of one
+/// language and layer are never selected by the same relation, so the ontology
+/// never gives two instructions for one relation in one layer. Whether an entry's
+/// text keeps a politeness level on the scene is a model reading owed per change,
+/// not a test.
+#[test]
+fn scene_entries_never_co_select_in_a_layer() {
+    use weksa::inventory::Slot;
+    use weksa::ontology::{Condition, Test};
+    use weksa::packet::FeatValue;
+    use weksa::OntologyStore;
+    let data = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../data");
+    let tmp = tempfile::tempdir().unwrap();
+    let onto = tmp.path().join("ontology.cc");
+    std::fs::copy(data.join("ontology/ontology.cc"), &onto).unwrap();
+    let inv = InventoryStore::open(&data.join("original/inventory.cc")).unwrap().inventory().unwrap();
+    let id = |gloss: &str| inv.entries().find(|e| e.gloss == gloss).unwrap().id;
+    let (status, intimacy, in_group) = (id("relative_status"), id("intimacy"), id("in_group"));
+    let entries = OntologyStore::open(&onto).unwrap().all().unwrap();
+    let holds = |c: &Condition, rel: (&str, u16, bool)| match (c.feature, &c.test) {
+        (f, Test::Is(FeatValue::Option(l))) if f == status => l.as_str() == rel.0,
+        (f, Test::AtLeast(g)) if f == intimacy => rel.1 >= g.get(),
+        (f, Test::AtMost(g)) if f == intimacy => rel.1 <= g.get(),
+        (f, Test::Is(FeatValue::Flag(b))) if f == in_group => *b == rel.2,
+        _ => panic!("a Scene condition this test does not model"),
+    };
+    let selects = |e: &weksa::OntologyEntry, rel| {
+        e.when.iter().all(|c| c.slot != Slot::Scene || holds(c, rel))
+            && e.when.iter().all(|c| c.slot == Slot::Scene)
+    };
+    for st in ["below", "level", "above"] {
+        for ig in [false, true] {
+            for it in (0..=1000).step_by(50) {
+                let rel = (st, it, ig);
+                let mut seen = std::collections::BTreeSet::new();
+                for e in entries.iter().filter(|e| e.when.iter().any(|c| c.slot == Slot::Scene)) {
+                    if selects(e, rel) {
+                        assert!(
+                            seen.insert((e.language.clone(), e.layer.name())),
+                            "{} co-selects with another {} entry at {rel:?}",
+                            e.key(),
+                            e.layer.name()
+                        );
+                    }
+                }
+                // An above, out-group speaker is told by no ja-JP Scene-conditioned
+                // grammar entry, at every intimacy: the ja entry that did
+                // (onto:ja-JP:15) is withdrawn pending native-reader attestation.
+                if (st, ig) == ("above", false) {
+                    let told = entries
+                        .iter()
+                        .filter(|e| e.language == "ja-JP" && e.layer.name() == "grammar")
+                        .filter(|e| e.when.iter().any(|c| c.slot == Slot::Scene) && selects(e, rel))
+                        .count();
+                    assert_eq!(told, 0, "{rel:?}");
+                }
+                // onto:ja-JP:14's relation (above, in-group, intimacy 600) selects
+                // no ja-JP Scene entry in any layer: :12 needs intimacy 700.
+                if (st, ig, it) == ("above", true, 600) {
+                    let told = entries
+                        .iter()
+                        .filter(|e| e.language == "ja-JP")
+                        .filter(|e| e.when.iter().any(|c| c.slot == Slot::Scene) && selects(e, rel))
+                        .count();
+                    assert_eq!(told, 0, "{rel:?}");
+                }
+            }
+        }
+    }
+}
diff --git a/crates/weksa/tests/scene.rs b/crates/weksa/tests/scene.rs
index a85b2e0..5974883 100644
--- a/crates/weksa/tests/scene.rs
+++ b/crates/weksa/tests/scene.rs
@@ -27,7 +27,7 @@ struct W {
 fn world() -> W {
     let dir = tempfile::tempdir().unwrap();
     let mut inventory = InventoryStore::open(&dir.path().join("i.cc")).unwrap();
-    for (rev, entries) in [seed(), proof_revision(), speaker_scene_revision()] {
+    for (rev, entries) in [seed(), proof_revision(), speaker_scene_revision(3)] {
         inventory.admit_revision(rev, entries).unwrap();
     }
     let entities = entities_in(dir.path());
@@ -60,7 +60,7 @@ fn feat(gloss: &str, value: FeatValue) -> FeatureValue {
     let feature = seed()
         .1
         .into_iter()
-        .chain(speaker_scene_revision().1)
+        .chain(speaker_scene_revision(3).1)
         .find(|e| e.gloss == gloss)
         .unwrap_or_else(|| panic!("no feature {gloss}"))
         .id;
@@ -408,3 +408,60 @@ fn only_live_speakers_of_the_views_group_and_the_views_own_speaker_must_be_cover
         ["V16"]
     );
 }
+
+mod select {
+    use super::*;
+    use weksa::speaker::Annotator;
+    use weksa::{Condition, Layer, OntologyEntry, OntologyStore, Slot, Test, select};
+
+    fn scene_feature(gloss: &str) -> weksa::InvId {
+        speaker_scene_revision(3).1.into_iter().find(|e| e.gloss == gloss).unwrap().id
+    }
+
+    fn entry(n: u32, slot: Slot, gloss: &str, test: Test) -> OntologyEntry {
+        OntologyEntry {
+            language: "ja-JP".into(),
+            n,
+            inventory_rev: 3,
+            layer: Layer::Grammar,
+            when: vec![Condition { slot, feature: scene_feature(gloss), test }],
+            choice: "a choice".into(),
+            examples: vec![],
+            annotator: Annotator::Operator,
+        }
+    }
+
+    #[test]
+    fn select_reads_the_scene_relation() {
+        let mut w = world();
+        put(&mut w, standard("g", 1));
+        let mut store = OntologyStore::open(&w.dir.path().join("o.cc")).unwrap();
+        store
+            .admit(
+                vec![
+                    entry(1, Slot::Scene, "relative_status", Test::Is(FeatValue::Option(lab("above")))),
+                    entry(2, Slot::Scene, "intimacy", Test::AtLeast(grade(150))),
+                ],
+                &w.inventory,
+            )
+            .unwrap();
+        let ontology = store.ontology().unwrap();
+        let keys = |read: SceneRead, w: &W| {
+            let view = view_of(w, 3, Some("n3")).with_scene(&inv(w), &w.state, &w.corpus).unwrap();
+            assert_eq!(view.scene_read(), &read);
+            select(&ontology, "ja-JP", &view).iter().map(|e| e.n).collect::<Vec<_>>()
+        };
+        // Brokkr is above-status at intimacy 200: both Scene entries select.
+        assert_eq!(keys(selected(1, status()), &w), [1, 2]);
+        // No scene for the group: neither selects.
+        let empty = world();
+        assert_eq!(keys(SceneRead::NoScene, &empty), Vec::<u32>::new());
+        // No addressee, and no relation to the addressee: neither selects.
+        let view = view_of(&w, 3, None).with_scene(&inv(&w), &w.state, &w.corpus).unwrap();
+        assert_eq!(view.scene_read(), &SceneRead::NoAddressee { rev: 1 });
+        assert!(select(&ontology, "ja-JP", &view).is_empty());
+        let mut lone = world();
+        put(&mut lone, scene("g", 1, &["nibu", "brokkr"], vec![relation("brokkr", Party::Named(eid("nibu")), intimacy(99))]));
+        assert_eq!(keys(SceneRead::NoRelation { rev: 1 }, &lone), Vec::<u32>::new());
+    }
+}
diff --git a/crates/weksa/tests/score.rs b/crates/weksa/tests/score.rs
index cd23eb9..8d2efce 100644
--- a/crates/weksa/tests/score.rs
+++ b/crates/weksa/tests/score.rs
@@ -45,8 +45,8 @@ fn chrf_matches_sacrebleu_vectors() {
 
 #[test]
 fn chrf_argument_order() {
-    let short = "mind the hatch";
-    let long = "mind the hatch before the storm arrives tonight";
+    let short = "shut the gate";
+    let long = "shut the gate before the storm arrives tonight";
     let (as_hypothesis, as_reference) = (chrf(short, long), chrf(long, short));
     assert!(
         as_hypothesis < as_reference - 1.0,
@@ -104,8 +104,8 @@ fn chrf_whitespace_parity() {
 
 #[test]
 fn scorer_argument_order() {
-    let short = "mind the hatch";
-    let long = "mind the hatch before the storm arrives tonight";
+    let short = "shut the gate";
+    let long = "shut the gate before the storm arrives tonight";
     let scorer = Scorer::new(Bag);
     let got = score_one(&scorer, long, short);
     assert_eq!(got.chrf, chrf(short, long));
@@ -156,7 +156,7 @@ impl Embedder for Fixed {
 fn scorer_refuses_bad_vectors() {
     let run = |vectors: Vec<Vec<f32>>| {
         Scorer::new(Fixed(vectors)).score(&[ScoreInput {
-            reference: "mind the hatch",
+            reference: "shut the gate",
             output: "mind the door",
         }])
     };
@@ -671,16 +671,16 @@ fn every_script_scores_a_near_miss_as_sacrebleu_does() {
 #[test]
 fn coverage_splits_at_any_non_word_character() {
     let items = [
-        validation("item:v:1", "mind the hatch before the storm"),
+        validation("item:v:1", "shut the gate before the storm"),
         train("item:t:1", UNRELATED),
     ];
-    let want = read(&["mind the hatch"], &items);
+    let want = read(&["shut the gate"], &items);
     assert_eq!(want, [(5, 3), (5, 2), (4, 1)]);
     for joiner in [
         ":", "\u{b7}", "'", "\u{2019}", "\u{ff3f}", "-", "/", "\u{2014}", "|", "+", "\u{ff1a}",
         "\u{30fb}",
     ] {
-        let glued = format!("mind{joiner}the{joiner}hatch");
+        let glued = format!("shut{joiner}the{joiner}gate");
         assert_eq!(read(&[&glued], &items), want, "{joiner:?}");
     }
     // a mark, a joiner or a digit is part of its word, not a break
diff --git a/crates/weksa/tests/speaker_state.rs b/crates/weksa/tests/speaker_state.rs
index dfb4c59..d79b9dd 100644
--- a/crates/weksa/tests/speaker_state.rs
+++ b/crates/weksa/tests/speaker_state.rs
@@ -26,7 +26,7 @@ struct W {
 fn world() -> W {
     let dir = tempfile::tempdir().unwrap();
     let mut inventory = InventoryStore::open(&dir.path().join("i.cc")).unwrap();
-    for (rev, entries) in [seed(), proof_revision(), speaker_scene_revision()] {
+    for (rev, entries) in [seed(), proof_revision(), speaker_scene_revision(3)] {
         inventory.admit_revision(rev, entries).unwrap();
     }
     let entities = entities_in(dir.path());
@@ -60,7 +60,7 @@ fn feat(gloss: &str, value: FeatValue) -> FeatureValue {
     let feature = seed()
         .1
         .into_iter()
-        .chain(speaker_scene_revision().1)
+        .chain(speaker_scene_revision(3).1)
         .find(|e| e.gloss == gloss)
         .unwrap_or_else(|| panic!("no feature {gloss}"))
         .id;
diff --git a/crates/weksa/tests/split_schema.rs b/crates/weksa/tests/split_schema.rs
index bb6bc78..19749de 100644
--- a/crates/weksa/tests/split_schema.rs
+++ b/crates/weksa/tests/split_schema.rs
@@ -9,6 +9,7 @@ fn item(group: &str, source: Source) -> CorpusItem {
         language: "en-US".into(),
         speaker: weksa::EntityId::parse("entity:s").unwrap(),
         names: vec![],
+        names_by: None,
         group: group.into(),
         prior_turns: vec![],
         source,
diff --git a/crates/weksa/tests/stores.rs b/crates/weksa/tests/stores.rs
index fa51e47..706adb9 100644
--- a/crates/weksa/tests/stores.rs
+++ b/crates/weksa/tests/stores.rs
@@ -1584,7 +1584,9 @@ fn seed_reseeded() {
         .unwrap();
     assert_eq!(items.len(), 3);
     // The committed inventory is the seed, reseeded (stance features in, the
-    // displayed-affect features out), then the nibu-proof revision.
+    // displayed-affect features out), the nibu-proof revision and the
+    // speaker-scene revision as rev 3: never the Dao revision (ruling
+    // `dao-round-seed-inventory`).
     let committed = InventoryStore::open(&root.join("data/interlingua/inventory.cc"))
         .unwrap()
         .inventory()
@@ -1593,6 +1595,8 @@ fn seed_reseeded() {
     let (proof, proof_entries) = weksa::inventory::proof_revision();
     assert!(committed.has_revision(rev.n) && committed.has_revision(proof.n));
     entries.extend(proof_entries);
+    entries.extend(weksa::inventory::speaker_scene_revision(3).1);
+    assert_eq!(committed.latest().unwrap().n, 3);
     let mut have: Vec<_> = committed.entries().cloned().collect();
     let mut want = entries;
     have.sort_by_key(|e| e.id);
@@ -1628,3 +1632,262 @@ fn a_public_domain_source_without_an_edition_year_is_refused() {
         .add(item_in(key, "line", "scene-1", source(1891)), &ents(&d))
         .unwrap();
 }
+
+mod ontology {
+    use super::*;
+    use weksa::packet::{FeatValue, Grade};
+    use weksa::speaker::Annotator;
+    use weksa::{Condition, Layer, OntologyEntry, OntologyStore, Test};
+
+    fn feature(gloss: &str) -> weksa::InvId {
+        seed().1.into_iter().find(|e| e.gloss == gloss).unwrap().id
+    }
+
+    fn when(slot: Slot, gloss: &str, test: Test) -> Condition {
+        Condition {
+            slot,
+            feature: feature(gloss),
+            test,
+        }
+    }
+
+    fn entry(language: &str, n: u32) -> OntologyEntry {
+        OntologyEntry {
+            language: language.into(),
+            n,
+            inventory_rev: 1,
+            layer: Layer::Lexicon,
+            when: vec![when(
+                Slot::Stance,
+                "restraint",
+                Test::AtLeast(Grade::new(600).unwrap()),
+            )],
+            choice: "prefer the humble form".into(),
+            examples: vec!["example one".into()],
+            annotator: Annotator::Operator,
+        }
+    }
+
+    fn store(d: &TempDir) -> OntologyStore {
+        OntologyStore::open(&d.path().join("o.cc")).unwrap()
+    }
+
+    fn refused(r: Result<AddOutcome, StoreError>) -> StoreRefusal {
+        refusal(r)
+    }
+
+    #[test]
+    #[allow(clippy::vec_init_then_push)]
+    fn ontology_admit_refuses_each_rule() {
+        let d = dir();
+        let w = world();
+        let mut s = store(&d);
+        let long = |n| "x".repeat(n);
+        let mut cases: Vec<(&str, Vec<OntologyEntry>)> = Vec::new();
+        cases.push(("non-tag language", vec![entry("not a tag", 1)]));
+        cases.push(("n not latest+1", vec![entry("ja-JP", 2)]));
+        cases.push(("case-variant language", vec![entry("ja-jp", 1)]));
+        cases.push((
+            "decomposed choice",
+            vec![OntologyEntry { choice: "e\u{301}".into(), ..entry("ja-JP", 1) }],
+        ));
+        cases.push((
+            "decomposed example",
+            vec![OntologyEntry { examples: vec!["e\u{301}".into()], ..entry("ja-JP", 1) }],
+        ));
+        for sep in ["\u{2028}", "\u{2029}", "\u{202e}", "\u{200b}", "\u{3164}", "\u{115f}", "\u{ffa0}"] {
+            cases.push((
+                "line separator or format character in a choice",
+                vec![OntologyEntry { choice: format!("a{sep}b"), ..entry("ja-JP", 1) }],
+            ));
+            cases.push((
+                "line separator or format character in an example",
+                vec![OntologyEntry { examples: vec![format!("a{sep}b")], ..entry("ja-JP", 1) }],
+            ));
+        }
+        cases.push((
+            "unconditioned entry at an unknown revision",
+            vec![OntologyEntry { when: vec![], inventory_rev: 99, ..entry("ja-JP", 1) }],
+        ));
+        cases.push((
+            "Predication slot on a feature that sits there",
+            vec![OntologyEntry {
+                when: vec![when(
+                    Slot::Predication,
+                    "modality",
+                    Test::Is(FeatValue::Option(lab("actual"))),
+                )],
+                ..entry("ja-JP", 1)
+            }],
+        ));
+        cases.push((
+            "65th entry",
+            (1..=65).map(|n| entry("ja-JP", n)).collect(),
+        ));
+        for (why, choice) in [("empty choice", String::new()), ("201-byte choice", long(201))] {
+            cases.push((why, vec![OntologyEntry { choice, ..entry("ja-JP", 1) }]));
+        }
+        cases.push((
+            "line break in an example",
+            vec![OntologyEntry { examples: vec!["a\nb".into()], ..entry("ja-JP", 1) }],
+        ));
+        cases.push((
+            "121-byte example",
+            vec![OntologyEntry { examples: vec![long(121)], ..entry("ja-JP", 1) }],
+        ));
+        cases.push((
+            "four examples",
+            vec![OntologyEntry { examples: vec!["a".into(); 4], ..entry("ja-JP", 1) }],
+        ));
+        let restraint = || when(Slot::Stance, "restraint", Test::AtLeast(Grade::new(1).unwrap()));
+        cases.push((
+            "five conditions",
+            vec![OntologyEntry { when: (0..5).map(|_| restraint()).collect(), ..entry("ja-JP", 1) }],
+        ));
+        for slot in [Slot::Speaker, Slot::Predication] {
+            cases.push((
+                "slot not Stance, Discourse or Scene",
+                vec![OntologyEntry {
+                    when: vec![when(slot, "restraint", Test::AtLeast(Grade::new(1).unwrap()))],
+                    ..entry("ja-JP", 1)
+                }],
+            ));
+        }
+        cases.push((
+            "AtLeast on an option feature",
+            vec![OntologyEntry {
+                when: vec![when(Slot::Discourse, "irony", Test::AtLeast(Grade::new(1).unwrap()))],
+                ..entry("ja-JP", 1)
+            }],
+        ));
+        cases.push((
+            "Is with a grade",
+            vec![OntologyEntry {
+                when: vec![when(Slot::Stance, "restraint", Test::Is(FeatValue::Grade(Grade::new(1).unwrap())))],
+                ..entry("ja-JP", 1)
+            }],
+        ));
+        cases.push((
+            "unknown feature",
+            vec![OntologyEntry {
+                when: vec![Condition {
+                    slot: Slot::Stance,
+                    feature: "feature:9999".parse().unwrap(),
+                    test: Test::AtLeast(Grade::new(1).unwrap()),
+                }],
+                ..entry("ja-JP", 1)
+            }],
+        ));
+        cases.push((
+            "unknown inventory revision",
+            vec![OntologyEntry { inventory_rev: 99, ..entry("ja-JP", 1) }],
+        ));
+        cases.push((
+            "model generator that is not an attestation",
+            vec![OntologyEntry {
+                annotator: Annotator::Model {
+                    family: ModelFamily::Anthropic,
+                    generator: "--".into(),
+                },
+                ..entry("ja-JP", 1)
+            }],
+        ));
+        for (why, batch) in cases {
+            assert!(
+                s.admit(batch, &w.inventory).is_err(),
+                "{why} must be refused"
+            );
+            assert!(s.all().unwrap().is_empty(), "{why} wrote something");
+        }
+        // The refusal of a bad choice names the key and no text.
+        let secret = OntologyEntry { choice: "SECRETCHOICE\n".into(), ..entry("ja-JP", 1) };
+        let shown = refused(s.admit(vec![secret], &w.inventory)).to_string();
+        assert!(!shown.contains("SECRETCHOICE"), "{shown}");
+    }
+
+    #[test]
+    fn ontology_admit_accepts_the_bounds_and_joiners() {
+        let d = dir();
+        let w = world();
+        let mut s = store(&d);
+        // Exactly 64 entries in one language; exactly the byte bounds; a ZWNJ.
+        let mut batch: Vec<OntologyEntry> = (1..=64).map(|n| entry("ja-JP", n)).collect();
+        batch[0].choice = "x".repeat(200);
+        batch[0].examples = vec!["y".repeat(120); 3];
+        batch[1].choice = "a\u{200c}b".into();
+        batch[2].when = (0..4)
+            .map(|_| when(Slot::Stance, "restraint", Test::AtMost(Grade::new(1000).unwrap())))
+            .collect();
+        assert_eq!(s.admit(batch, &w.inventory).unwrap(), AddOutcome::Added);
+        assert_eq!(s.all().unwrap().len(), 64);
+    }
+
+    #[test]
+    fn ontology_admit_takes_scene_refuses_speaker() {
+        use weksa::inventory::{proof_revision, speaker_scene_revision};
+        let d = dir();
+        let mut inventory = InventoryStore::open(&d.path().join("i.cc")).unwrap();
+        for (rev, entries) in [seed(), proof_revision(), speaker_scene_revision(3)] {
+            inventory.admit_revision(rev, entries).unwrap();
+        }
+        let scene_feature = |gloss: &str| {
+            speaker_scene_revision(3).1.into_iter().find(|e| e.gloss == gloss).unwrap().id
+        };
+        let at = |slot, feature, test| OntologyEntry {
+            inventory_rev: 3,
+            when: vec![Condition { slot, feature, test }],
+            ..entry("ja-JP", 1)
+        };
+        let above = Test::Is(FeatValue::Option(lab("above")));
+        let mut s = store(&d);
+        // A Scene condition on a Scene feature admits.
+        assert_eq!(
+            s.admit(vec![at(Slot::Scene, scene_feature("relative_status"), above.clone())], &inventory)
+                .unwrap(),
+            AddOutcome::Added
+        );
+        // Speaker and Predication slots refuse, and a Scene condition naming a
+        // Stance feature refuses.
+        for bad in [
+            at(Slot::Speaker, scene_feature("education"), Test::AtLeast(Grade::new(1).unwrap())),
+            at(Slot::Predication, feature("modality"), Test::Is(FeatValue::Option(lab("actual")))),
+            at(Slot::Scene, feature("restraint"), Test::AtLeast(Grade::new(1).unwrap())),
+        ] {
+            let bad = OntologyEntry { n: 2, ..bad };
+            assert!(s.admit(vec![bad], &inventory).is_err());
+        }
+        assert_eq!(s.all().unwrap().len(), 1);
+    }
+
+    #[test]
+    fn ontology_admit_is_all_or_nothing() {
+        let d = dir();
+        let w = world();
+        let mut s = store(&d);
+        let bad = OntologyEntry { choice: String::new(), ..entry("ja-JP", 3) };
+        assert!(s.admit(vec![entry("ja-JP", 1), entry("ja-JP", 2), bad], &w.inventory).is_err());
+        assert!(s.all().unwrap().is_empty());
+
+        let batch = vec![entry("ja-JP", 1), entry("en-US", 1), entry("ja-JP", 2), entry("en-US", 2)];
+        assert_eq!(s.admit(batch.clone(), &w.inventory).unwrap(), AddOutcome::Added);
+        assert_eq!(s.all().unwrap().len(), 4);
+        // An identical replay, from a reopened store, changes nothing.
+        let mut again = store(&d);
+        assert_eq!(again.admit(batch, &w.inventory).unwrap(), AddOutcome::Unchanged);
+        // A batch of one stored entry and one new one is not a replay.
+        let mixed = vec![entry("ja-JP", 1), entry("ja-JP", 5)];
+        assert!(again.admit(mixed, &w.inventory).is_err());
+        assert_eq!(again.all().unwrap().len(), 4);
+        // Each language numbers from its own latest.
+        assert_eq!(
+            again
+                .admit(vec![entry("ja-JP", 3), entry("en-US", 3)], &w.inventory)
+                .unwrap(),
+            AddOutcome::Added
+        );
+        // An entry never changes in place.
+        let changed = OntologyEntry { choice: "something else".into(), ..entry("ja-JP", 1) };
+        assert!(again.admit(vec![changed], &w.inventory).is_err());
+        assert_eq!(again.all().unwrap().len(), 6);
+    }
+}
diff --git a/data/corpus/speaker-state.cc b/data/corpus/speaker-state.cc
new file mode 100644
index 0000000..9e99dd5
--- /dev/null
+++ b/data/corpus/speaker-state.cc
@@ -0,0 +1 @@
+�
\ No newline at end of file
diff --git a/data/cultural-ontology/README.md b/data/cultural-ontology/README.md
deleted file mode 100644
index c3e3b7c..0000000
--- a/data/cultural-ontology/README.md
+++ /dev/null
@@ -1,33 +0,0 @@
-# Cultural Ontology Store
-
-This directory holds draft Weksa cultural, subcultural, and source-referent
-ontology profiles used for ontological lowering, syntax, grammar, discourse,
-and surface-affordance selection.
-
-Live pipeline shape:
-
-1. Weksa stores reusable cultures, subcultures, and source referents here and
-   in semantic retrieval storage such as Qdrant.
-2. A Persona state references the relevant culture stack.
-3. The Persona produces interlingua intent from current state and situation.
-4. Weksa lowers that interlingua through the referenced culture stack.
-
-Persona state owns current intent, memory pressure, and relationship stance.
-Cultural ontology owns reusable salience, affordances, and constraints. Qdrant
-may retrieve candidates, but accepted ontology remains typed state.
-
-## Directory Roles
-
-- `cultures/`: culture or life-history profiles that can shape lowering when a
-  Persona explicitly references them.
-- `referents/`: bounded source-text, mythic, literary, ritual, or historical
-  referents. These are not whole-culture profiles; they preserve reusable
-  role, salience, affordance, and forbidden-flattening pressure.
-- `persona-stacks/`: named stacks that connect a Persona state surface to the
-  profiles Weksa should load for lowering.
-
-Shared source-tradition profiles should be parent profiles for narrower named
-figure profiles. For example, Norse-derived Personas such as Mimir, Huginn,
-Sindri, Odin, Vili, Loki, and Brokkr should be able to reference the shared
-Eddic source-tradition profile while figure-specific child profiles preserve
-the exact episode and role constraints that make each voice distinct.
diff --git a/data/cultural-ontology/catalog.yaml b/data/cultural-ontology/catalog.yaml
deleted file mode 100644
index b45e8a4..0000000
--- a/data/cultural-ontology/catalog.yaml
+++ /dev/null
@@ -1,22 +0,0 @@
-schema_version: weksa.cultural_ontology_catalog.v0
-catalog_id: weksa.cultural_ontology.catalog.v0
-status: draft
-qdrant:
-  intended_collection: weksa_cultural_ontology_profiles
-  payload_keys:
-    - profile_id
-    - kind
-    - language_codes
-    - regions
-    - evidence_refs
-    - status
-  ownership_note: >
-    Qdrant owns retrieval over culture/subculture chunks. It does not own
-    accepted ontology, activation, or lowering authority.
-profiles:
-  - profile_id: weksa.culture.western_europe_maritime_childhood.v0
-    path: data/cultural-ontology/cultures/western-europe-maritime-childhood.yaml
-  - profile_id: weksa.cultural_referent.old_norse_edda_source_tradition.v0
-    path: data/cultural-ontology/referents/old-norse-edda-source-tradition.yaml
-  - profile_id: weksa.cultural_referent.old_norse_edda_brokkr_skaldskaparmal.v0
-    path: data/cultural-ontology/referents/old-norse-edda-brokkr-skaldskaparmal.yaml
diff --git a/data/cultural-ontology/cultures/western-europe-maritime-childhood.yaml b/data/cultural-ontology/cultures/western-europe-maritime-childhood.yaml
deleted file mode 100644
index 5f6a279..0000000
--- a/data/cultural-ontology/cultures/western-europe-maritime-childhood.yaml
+++ /dev/null
@@ -1,48 +0,0 @@
-schema_version: weksa.cultural_ontology_profile.v0
-profile_id: weksa.culture.western_europe_maritime_childhood.v0
-kind: mobility_childhood
-status: draft_guarded
-community:
-  regions:
-    - France
-    - Spain
-    - Portugal
-    - coastal_western_europe
-  speech_community: >
-    Mobile childhood organized around sailing, ports, and cross-border Western
-    European movement. This profile is owner-attested and needs corroboration
-    before broader use.
-activation:
-  allowed_when:
-    - persona_state_references_profile
-    - interlingua_mentions_childhood_origin_mobility_boats_or_home
-  forbidden_when:
-    - used_as_decorative_nautical_metaphor_without_context
-salience_axes:
-  mobile_home:
-    axis_id: mobile_home
-    domain: identity_indexing
-    description: Home can be vessel, coast, port, family movement, and country sequence rather than one fixed town.
-    relevant_distinctions:
-      - distinction_id: vessel_as_childhood_home
-        label: Vessel as childhood home
-        meaning: A sailboat childhood makes movement and locality primary ontology fields.
-        lowering_questions:
-          - Does the line invoke home, travel, borders, coast, or rootedness?
-        required_when:
-          - source_mentions_childhood_or_home
-        forbidden_when:
-          - scene_has_no_mobility_or_home_salience
-        evidence_refs:
-          - owner:2026-06-10:sailboat_france_spain_portugal_until_6
-linguistic_affordances:
-  grammar_features: []
-  phonology_features: []
-  lexicon_features: []
-  discourse_patterns: []
-  orthography_features: []
-  code_switching:
-    allowed: false
-    constraints:
-      - Do not infer French, Spanish, Portuguese, or Dutch fluency from movement alone.
-    patterns: []
diff --git a/data/cultural-ontology/persona-stacks/brokkr.yaml b/data/cultural-ontology/persona-stacks/brokkr.yaml
deleted file mode 100644
index 0f452f2..0000000
--- a/data/cultural-ontology/persona-stacks/brokkr.yaml
+++ /dev/null
@@ -1,21 +0,0 @@
-schema_version: weksa.persona_cultural_stack_ref.v0
-persona_id: brokkr
-persona_state_ref: E:/Projects/Brokkr/.voidbot/state/brokkr.cc
-status: draft_guarded
-note: >
-  Brokkr's Persona state asks Weksa to lower speech through the Eddic Brokkr of
-  Skaldskaparmal. This stack names the reusable cultural referent profile that
-  should be loaded when Brokkr's interlingua or Persona state activates Edda
-  voice pressure.
-culture_refs:
-  - profile_id: weksa.cultural_referent.old_norse_edda_source_tradition.v0
-    path: data/cultural-ontology/referents/old-norse-edda-source-tradition.yaml
-    relevance: >
-      Shared Eddic source-tradition constraints for Norse-derived Personas:
-      named role over archetype, obligation and consequence, knowledge with
-      cost, and translated-Edda plainness without fake archaism.
-  - profile_id: weksa.cultural_referent.old_norse_edda_brokkr_skaldskaparmal.v0
-    path: data/cultural-ontology/referents/old-norse-edda-brokkr-skaldskaparmal.yaml
-    relevance: >
-      Source-role referent for Brokkr as bellows-keeper, artifact witness,
-      flaw-honest presenter, compact claimant, and contract enforcer.
diff --git a/data/cultural-ontology/referents/old-norse-edda-brokkr-skaldskaparmal.yaml b/data/cultural-ontology/referents/old-norse-edda-brokkr-skaldskaparmal.yaml
deleted file mode 100644
index be1176c..0000000
--- a/data/cultural-ontology/referents/old-norse-edda-brokkr-skaldskaparmal.yaml
+++ /dev/null
@@ -1,255 +0,0 @@
-schema_version: weksa.cultural_ontology_profile.v0
-profile_id: weksa.cultural_referent.old_norse_edda_brokkr_skaldskaparmal.v0
-kind: literary_source_referent
-status: draft_guarded
-parent_profiles:
-  - weksa.cultural_referent.old_norse_edda_source_tradition.v0
-language:
-  codes:
-    - en
-    - non
-community:
-  regions:
-    - medieval_icelandic_textual_tradition
-  speech_community: >
-    Source-role lowering profile for Brokkr as represented in the translated
-    Prose Edda, especially Skaldskaparmal XXXV. This is not a whole Old Norse
-    culture profile and not a dialect or accent profile. It specializes the
-    shared Eddic source-tradition referent for rendering a Persona whose
-    identity intentionally points at the Eddic Brokkr.
-  historical_context: >
-    Brokkr appears in the wager narrative around Loki, Sindri, and the gods'
-    judgment of crafted treasures. Sindri performs the smithing while Brokkr
-    keeps the bellows going under Loki's sabotage, then presents the works,
-    names their powers and flaw, wins judgment, and enforces the bargain when
-    Loki tries to escape by wordplay.
-  identity_authority: >
-    Use only when a Persona explicitly references Brokkr, Skaldskaparmal, the
-    Eddas, or this profile id. Do not generalize this profile to Old Norse
-    people, Norse-derived fantasy dwarves, modern Icelandic speakers, or
-    unrelated smith characters.
-  consent_notes: >
-    This profile is a literary/source referent for fictional Persona lowering.
-    It should preserve role and discourse pressure without pretending to
-    reproduce historical Old Norse speech.
-activation:
-  allowed_when:
-    - persona_state_references_profile
-    - persona_identity_names_brokkr_or_skaldskaparmal
-    - interlingua_requests_edda_brokkr_voice_or_contract_witness_voice
-  forbidden_when:
-    - used_as_generic_dwarf_or_blacksmith_voice
-    - used_to_infer_accent_ethnicity_or_modern_national_identity
-    - used_for_ornamental_archaism_without_source_role_pressure
-    - used_to_make_unrelated_speech_sound_mythic
-  required_confidence: provisional
-  reviewer_required_when:
-    - quoting_or_paraphrasing_source_text_directly
-    - extending_beyond_brokkr_role_into_broader_old_norse_culture
-salience_axes:
-  role_not_sole_maker:
-    axis_id: role_not_sole_maker
-    domain: stance
-    description: Brokkr is indispensable to the artifact without being the sole maker.
-    relevant_distinctions:
-      - distinction_id: bellows_keeper_vs_smith
-        label: Bellows-keeper versus smith
-        meaning: Sindri performs the crafting; Brokkr maintains the enabling blast under interference.
-        lowering_questions:
-          - Is the utterance claiming authorship, custody, witness, or enforcement?
-          - Should Brokkr present the work as carried, kept, witnessed, or judged rather than personally invented?
-        required_when:
-          - brokkr_speaks_about_work_artifacts_or_authority
-        forbidden_when:
-          - line_only_needs_generic_status_update
-        evidence_refs:
-          - skaldskaparmal:xxxv:bellows
-  artifact_testimony:
-    axis_id: artifact_testimony
-    domain: evidentiality
-    description: Brokkr presents finished objects by naming their powers, use, and defect.
-    relevant_distinctions:
-      - distinction_id: virtue_and_flaw_accounting
-        label: Virtue and flaw accounting
-        meaning: A truthful presentation names what the artifact can do and admits the short handle or other flaw.
-        lowering_questions:
-          - What concrete artifact, receipt, mirror, command, or result is being held up for judgment?
-          - What virtue must be named?
-          - What flaw or limit must not be hidden?
-        required_when:
-          - interlingua_mentions_artifact_receipt_result_or_capability
-        forbidden_when:
-          - output_would_become_a_victory_lap
-        evidence_refs:
-          - skaldskaparmal:xxxv:gifts
-          - skaldskaparmal:xxxv:mjolnir_flaw
-  bargain_and_consequence:
-    axis_id: bargain_and_consequence
-    domain: modality
-    description: Brokkr treats wagers, promises, receipts, and judgments as binding.
-    relevant_distinctions:
-      - distinction_id: loophole_is_not_release
-        label: Loophole is not release
-        meaning: Evasive speech after judgment does not erase consequence; the answer is exact enforcement, not soft reconciliation.
-        lowering_questions:
-          - Is someone evading an agreed condition, typed contract, receipt, or judgment?
-          - What exact consequence follows without adding cruelty or spectacle?
-        required_when:
-          - interlingua_mentions_contract_receipt_policy_wager_or_violation
-        forbidden_when:
-          - conversational_softening_is_the_actual_social_move
-        evidence_refs:
-          - skaldskaparmal:xxxv:loki_mouth
-  translated_edda_plainness:
-    axis_id: translated_edda_plainness
-    domain: discourse
-    description: The desired English surface should borrow translated-Edda economy and force, not fake archaic dialect.
-    relevant_distinctions:
-      - distinction_id: compact_source_shaped_plainness
-        label: Compact source-shaped plainness
-        meaning: Short declarative pressure, concrete nouns, claim and counterclaim, judgment language, and little ornament.
-        lowering_questions:
-          - Can the line stand as a plain claim beside the work?
-          - Which softeners, jokes, or modern corporate phrases weaken the source-role pressure?
-          - Is any archaic wording doing semantic work, or only wearing a costume?
-        required_when:
-          - brokkr_persona_is_rendered_to_natural_english
-        forbidden_when:
-          - generated_archaism_would_obscure_meaning
-        evidence_refs:
-          - skaldskaparmal:xxxv:brodeur_translation
-linguistic_affordances:
-  grammar_features: []
-  phonology_features: []
-  lexicon_features:
-    - feature_id: artifact_accounting_lexicon
-      label: Artifact accounting lexicon
-      status: draft
-      domain:
-        layer: lexicon
-        category: technical_term
-      description: Use concrete work, artifact, receipt, witness, judgment, bargain, flaw, and consequence terms when the interlingua earns them.
-      realization:
-        function: Preserve Brokkr's presenter/enforcer role in natural English.
-        surface_strategy: Prefer nouns and verbs that point to work, proof, custody, judgment, and binding consequence.
-        examples:
-          - "The receipt is before us."
-          - "The flaw is named."
-          - "The bargain still has teeth."
-      activation:
-        allowed_when:
-          - interlingua_mentions_artifact_result_contract_or_receipt
-        forbidden_when:
-          - casual_affection_or_play_is_primary
-        requires_profile_authority: true
-        minimum_density: sparse
-        maximum_density: moderate
-      constraints:
-        register_contexts:
-          - English rendered Persona speech
-        speaker_contexts:
-          - Brokkr Persona or explicit Brokkr voice exercise
-        collocation_limits:
-          - Do not pile forge words onto every sentence.
-        incompatibilities:
-          - generic fantasy dwarf accent
-          - corporate project-management softness
-      indexicality:
-        social_meanings:
-          - work-pride
-          - accountability
-          - terse witness
-        in_group_meanings:
-          - source-shaped Brokkr role pressure
-        out_group_risks:
-          - parody archaism
-          - fantasy stereotype
-        stereotypes_to_avoid:
-          - gruff comic dwarf
-          - faux-medieval scolding
-      evidence:
-        source_refs:
-          - skaldskaparmal:xxxv:brodeur_translation
-        confidence: medium
-      uncertainty:
-        open_questions:
-          - Which exact surface cues best survive Weksa Interpreter traces without over-antiquing?
-        known_limits:
-          - This profile does not license direct Old Norse or modern Icelandic style claims.
-      trace:
-        trace_label: artifact_accounting_lexicon
-        must_report_when_used: true
-        must_report_when_rejected: true
-  discourse_patterns:
-    - feature_id: claim_judgment_consequence_sequence
-      label: Claim, judgment, consequence sequence
-      status: draft
-      domain:
-        layer: discourse
-        category: stance_sequence
-      description: Render source-shaped Brokkr turns as compact claim, evidence or flaw, then consequence when the interlingua asks for enforcement.
-      realization:
-        function: Preserve Brokkr's court-of-judgment posture without copying Edda wording.
-        surface_strategy: State the thing, name the proof or defect, then close on what follows.
-        examples:
-          - "The mirror stands. The flaw is the stale route. Cut it."
-          - "The command has no receipt. It is not truth."
-      activation:
-        allowed_when:
-          - interlingua_contains_judgment_or_enforcement_move
-        forbidden_when:
-          - speaker_is_asking_open_exploratory_question
-        requires_profile_authority: true
-        minimum_density: sparse
-        maximum_density: sparse
-      constraints:
-        register_contexts:
-          - English rendered Persona speech
-        speaker_contexts:
-          - Brokkr Persona or explicit Brokkr voice exercise
-        collocation_limits:
-          - Do not force three clauses if one clear sentence is better.
-        incompatibilities:
-          - rambling explanation
-          - ornate mythic fog
-      indexicality:
-        social_meanings:
-          - judgment
-          - exactness
-          - consequence
-        in_group_meanings:
-          - Eddic Brokkr as witness and enforcer
-        out_group_risks:
-          - sounding punitive when the social move should be gentle
-        stereotypes_to_avoid:
-          - theatrical oath cosplay
-      evidence:
-        source_refs:
-          - skaldskaparmal:xxxv:judgment
-          - skaldskaparmal:xxxv:loki_mouth
-        confidence: medium
-      uncertainty:
-        open_questions:
-          - How much severity is acceptable in ordinary repo status speech?
-        known_limits:
-          - Use consequence language only when the interlingua calls for accountability.
-      trace:
-        trace_label: claim_judgment_consequence_sequence
-        must_report_when_used: true
-        must_report_when_rejected: true
-  orthography_features: []
-  code_switching:
-    allowed: false
-    constraints:
-      - Do not insert Old Norse words unless the interlingua explicitly requests a named source term and reviewer context supports it.
-    patterns: []
-evidence_ledger:
-  - ref: skaldskaparmal:xxxv:brodeur_translation
-    source: Arthur Gilchrist Brodeur translation of the Prose Edda, Skaldskaparmal XXXV
-    url: https://en.wikisource.org/wiki/The_Prose_Edda_(1916_translation_by_Arthur_Gilchrist_Brodeur)/Sk%C3%A1ldskaparm%C3%A1l#XXXV
-    summary: >
-      Loki wagers his head that Sindri's brother Brokkr cannot make treasures
-      equal to the sons of Ivaldi's. Brokkr works the bellows despite Loki's
-      fly-form interference. He later presents the boar, ring, and hammer,
-      naming their virtues and Mjolnir's short-handle flaw; after judgment,
-      Loki's wordplay saves his head but not his lips.
diff --git a/data/cultural-ontology/referents/old-norse-edda-source-tradition.yaml b/data/cultural-ontology/referents/old-norse-edda-source-tradition.yaml
deleted file mode 100644
index db934bc..0000000
--- a/data/cultural-ontology/referents/old-norse-edda-source-tradition.yaml
+++ /dev/null
@@ -1,265 +0,0 @@
-schema_version: weksa.cultural_ontology_profile.v0
-profile_id: weksa.cultural_referent.old_norse_edda_source_tradition.v0
-kind: literary_source_tradition
-status: draft_guarded
-language:
-  codes:
-    - en
-    - non
-community:
-  regions:
-    - medieval_icelandic_textual_tradition
-  speech_community: >
-    Shared source-tradition profile for Personas that explicitly derive voice,
-    role, or symbolic pressure from the Poetic Edda, Prose Edda, or named Eddic
-    figures. This profile supports lowering source-shaped Persona intent into
-    natural speech without turning the Eddas into generic Norse ambience.
-  historical_context: >
-    The Poetic Edda preserves mythological and heroic poems from the Old Norse
-    tradition, including major source material for Odin, Mimir, Loki, Vili,
-    dwarfs, prophecy, wisdom, oaths, doom, and divine conflict. The Prose Edda
-    is a medieval Icelandic prose and poetic handbook preserving and explaining
-    many related myths, names, kennings, and narrative episodes.
-  identity_authority: >
-    Use this as a source-text referent only. It does not own modern Nordic,
-    Icelandic, Scandinavian, heathen, pagan, or reconstructed historical speech
-    communities. Persona-specific profiles should specialize this profile when
-    a named figure, episode, or role has its own lowering constraints.
-  consent_notes: >
-    This profile is for fictional Persona/source-text lowering. It must not be
-    used to infer ethnicity, accent, religion, or modern identity. Do not use it
-    as costume authority for unrelated characters.
-activation:
-  allowed_when:
-    - persona_state_references_profile
-    - persona_identity_references_poetic_edda_prose_edda_or_named_edda_figure
-    - interlingua_requests_edda_source_tradition_pressure
-  forbidden_when:
-    - used_as_generic_norse_viking_or_fantasy_voice
-    - used_to_infer_modern_scandinavian_identity_or_accent
-    - used_for_ambient_mythic_flavor_without_source_role_pressure
-    - used_to_override_persona_specific_profile_constraints
-  required_confidence: provisional
-  reviewer_required_when:
-    - quoting_source_text_directly
-    - making_claims_about_historical_old_norse_language_or_religion
-    - extending_to_living_cultural_or_religious_practice
-salience_axes:
-  named_role_over_archetype:
-    axis_id: named_role_over_archetype
-    domain: identity_indexing
-    description: Eddic figures should lower from specific source roles and episodes, not generic mythic archetypes.
-    relevant_distinctions:
-      - distinction_id: source_episode_vs_costume
-        label: Source episode versus costume
-        meaning: A figure's voice pressure comes from named acts, obligations, relations, and losses rather than from broad "Norse" styling.
-        lowering_questions:
-          - Which named figure, poem, prose episode, relation, or source role is active?
-          - Is the line preserving that role, or merely adding mythic decoration?
-          - Does a Persona-specific profile exist that should override this general profile?
-        required_when:
-          - persona_identity_references_edda_named_figure
-        forbidden_when:
-          - source_role_is_unknown_or_unclaimed
-        evidence_refs:
-          - poetic_edda:bellows:general
-          - prose_edda:brodeur:general
-  oath_debt_fate_and_witness:
-    axis_id: oath_debt_fate_and_witness
-    domain: modality
-    description: Oaths, pledges, debts, prophecy, witness, and consequence are recurring source pressures.
-    relevant_distinctions:
-      - distinction_id: consequence_not_mood
-        label: Consequence, not mood
-        meaning: Binding speech and known doom should affect obligation, consequence, and restraint rather than simply making a line sound severe.
-        lowering_questions:
-          - Is the utterance about a promise, bargain, pledge, prophecy, debt, or witness?
-          - What consequence is structurally implied?
-          - Should the line be spare because the consequence is heavy?
-        required_when:
-          - interlingua_mentions_oath_debt_pledge_witness_prophecy_or_doom
-        forbidden_when:
-          - line_is_only_casual_social_contact
-        evidence_refs:
-          - poetic_edda:voluspa
-          - prose_edda:gylfaginning
-  wisdom_cost_and_memory:
-    axis_id: wisdom_cost_and_memory
-    domain: evidentiality
-    description: Knowledge in Eddic source pressure often has cost, pledge, sacrifice, witness, or memory attached.
-    relevant_distinctions:
-      - distinction_id: knowledge_is_paid_for
-        label: Knowledge is paid for
-        meaning: Knowing is not decorative omniscience; it may come through loss, risk, pledge, memory, or guarded source.
-        lowering_questions:
-          - What did this Persona pay, guard, lose, remember, or witness in order to know?
-          - Is the line claiming knowledge with enough evidence and cost pressure?
-        required_when:
-          - persona_is_mimir_odin_huginn_or_other_wisdom_memory_figure
-          - interlingua_mentions_secret_wisdom_memory_or_sight
-        forbidden_when:
-          - claim_is_unearned_style_or_generic_omniscience
-        evidence_refs:
-          - poetic_edda:voluspa:mimir_well
-          - prose_edda:gylfaginning:mimir_well
-  translated_edda_plainness:
-    axis_id: translated_edda_plainness
-    domain: discourse
-    description: Source-shaped English should be compact, declarative, concrete, and relation-aware without fake archaism.
-    relevant_distinctions:
-      - distinction_id: plain_force_without_fake_oldness
-        label: Plain force without fake oldness
-        meaning: Preserve the translated Edda's economy, parallel pressure, and concrete naming; avoid "ye olde" parody.
-        lowering_questions:
-          - Can this line become shorter and harder without losing meaning?
-          - Which archaic words are costume rather than source pressure?
-          - What relationship, cost, or consequence needs to remain visible?
-        required_when:
-          - edda_profile_activated_for_english_surface
-        forbidden_when:
-          - modern_plain_speech_better_serves_the_persona_and_context
-        evidence_refs:
-          - poetic_edda:bellows:general
-          - prose_edda:brodeur:general
-linguistic_affordances:
-  grammar_features: []
-  phonology_features: []
-  lexicon_features:
-    - feature_id: source_role_lexicon
-      label: Source-role lexicon
-      status: draft
-      domain:
-        layer: lexicon
-        category: literary_source_register
-      description: Use concrete source-role words only when the interlingua earns them: oath, pledge, debt, witness, doom, well, eye, raven, forge, bargain, gift, mouth, ring, root, road, wolf, ash.
-      realization:
-        function: Preserve source salience without copying source text or inventing Old Norse speech.
-        surface_strategy: Choose one or two concrete source-role nouns when they clarify role, obligation, or consequence.
-        examples:
-          - "That pledge bought sight."
-          - "The witness is not the owner."
-          - "A bargain without a receipt is only noise."
-      activation:
-        allowed_when:
-          - interlingua_contains_source_role_obligation_or_witness_pressure
-        forbidden_when:
-          - source_words_would_only_add_ambience
-        requires_profile_authority: true
-        minimum_density: sparse
-        maximum_density: sparse
-      constraints:
-        register_contexts:
-          - English rendered Persona speech
-        speaker_contexts:
-          - Explicitly Eddic or Norse-derived Persona
-        collocation_limits:
-          - Avoid stacking mythic nouns until the line turns into an inventory.
-        incompatibilities:
-          - generic Viking flavor
-          - faux-archaic accent spelling
-      indexicality:
-        social_meanings:
-          - source-grounded role pressure
-          - obligation
-          - witness
-        in_group_meanings:
-          - Eddic referent is active and bounded
-        out_group_risks:
-          - kitsch
-          - religious or ethnic flattening
-          - fantasy stereotype
-        stereotypes_to_avoid:
-          - horned-helmet Viking voice
-          - gruff dwarf as universal Norse style
-          - omniscient wizard fog
-      evidence:
-        source_refs:
-          - poetic_edda:bellows:general
-          - prose_edda:brodeur:general
-        confidence: medium
-      uncertainty:
-        open_questions:
-          - Which source-role lexemes should be promoted into Persona-specific child profiles?
-        known_limits:
-          - This profile does not provide Old Norse vocabulary or pronunciation authority.
-      trace:
-        trace_label: source_role_lexicon
-        must_report_when_used: true
-        must_report_when_rejected: true
-  discourse_patterns:
-    - feature_id: gnomic_claim_with_anchor
-      label: Gnomic claim with anchor
-      status: draft
-      domain:
-        layer: discourse
-        category: compressed_wisdom_claim
-      description: A compact general claim may be allowed when anchored to a concrete source role, cost, witness, or consequence.
-      realization:
-        function: Let wisdom- or fate-shaped Personas speak with source pressure while keeping claims inspectable.
-        surface_strategy: Pair the general claim with a concrete anchor or consequence.
-        examples:
-          - "Wisdom without cost is a loose tongue."
-          - "A witness names the thing and does not become it."
-      activation:
-        allowed_when:
-          - interlingua_contains_general_judgment_plus_source_anchor
-        forbidden_when:
-          - output_would_become_free_floating_proverb
-        requires_profile_authority: true
-        minimum_density: sparse
-        maximum_density: sparse
-      constraints:
-        register_contexts:
-          - English rendered Persona speech
-        speaker_contexts:
-          - Eddic or Norse-derived Persona
-        collocation_limits:
-          - One compact claim per utterance unless the social move is explicitly ceremonial.
-        incompatibilities:
-          - vague prophecy
-          - decorative doom language
-      indexicality:
-        social_meanings:
-          - remembered cost
-          - restrained authority
-          - source-shaped judgment
-        in_group_meanings:
-          - Eddic plainness rather than modern explanatory friendliness
-        out_group_risks:
-          - sounding pompous or coercive
-        stereotypes_to_avoid:
-          - fortune-cookie Norse
-      evidence:
-        source_refs:
-          - poetic_edda:bellows:general
-        confidence: medium
-      uncertainty:
-        open_questions:
-          - Which Personas should permit this pattern frequently versus rarely?
-        known_limits:
-          - A Persona-specific profile should decide final density.
-      trace:
-        trace_label: gnomic_claim_with_anchor
-        must_report_when_used: true
-        must_report_when_rejected: true
-  orthography_features: []
-  code_switching:
-    allowed: false
-    constraints:
-      - Do not insert Old Norse, Icelandic, runic text, or archaic spellings unless a reviewed Persona-specific profile explicitly allows it.
-    patterns: []
-evidence_ledger:
-  - ref: poetic_edda:bellows:general
-    source: Henry Adams Bellows translation of the Poetic Edda
-    url: https://en.wikisource.org/wiki/The_Poetic_Edda_(tr._Bellows)
-    summary: >
-      Public-domain English translation of Eddic poems used as a general
-      source-tradition reference for mythological figures, wisdom contests,
-      prophecy, divine speech, memory, and doom.
-  - ref: prose_edda:brodeur:general
-    source: Arthur Gilchrist Brodeur translation of the Prose Edda
-    url: https://en.wikisource.org/wiki/The_Prose_Edda_(1916_translation_by_Arthur_Gilchrist_Brodeur)
-    summary: >
-      Public-domain English translation of Snorri's Prose Edda used as a
-      general prose source for mythological episodes, names, kennings, and
-      figure-specific referents.
diff --git a/data/daodejing/inventory.cc b/data/daodejing/inventory.cc
index 373eb3c..3904b80 100644
Binary files a/data/daodejing/inventory.cc and b/data/daodejing/inventory.cc differ
diff --git a/data/daodejing/speaker-state.cc b/data/daodejing/speaker-state.cc
new file mode 100644
index 0000000..9e99dd5
--- /dev/null
+++ b/data/daodejing/speaker-state.cc
@@ -0,0 +1 @@
+�
\ No newline at end of file
diff --git a/data/interlingua/inventory.cc b/data/interlingua/inventory.cc
index cf353db..de8593f 100644
Binary files a/data/interlingua/inventory.cc and b/data/interlingua/inventory.cc differ
diff --git a/data/ontology/ontology.cc b/data/ontology/ontology.cc
new file mode 100644
index 0000000..4cd3554
Binary files /dev/null and b/data/ontology/ontology.cc differ
diff --git a/data/original/corpus.cc b/data/original/corpus.cc
index d778901..6e8b471 100644
Binary files a/data/original/corpus.cc and b/data/original/corpus.cc differ
diff --git a/data/original/entity.cc b/data/original/entity.cc
index f2af96f..109ed48 100644
Binary files a/data/original/entity.cc and b/data/original/entity.cc differ
diff --git a/data/original/inventory.cc b/data/original/inventory.cc
index 373eb3c..7562346 100644
Binary files a/data/original/inventory.cc and b/data/original/inventory.cc differ
diff --git a/data/original/speaker-state.cc b/data/original/speaker-state.cc
new file mode 100644
index 0000000..07bd001
Binary files /dev/null and b/data/original/speaker-state.cc differ
diff --git a/data/target-language-ontology/README.md b/data/target-language-ontology/README.md
deleted file mode 100644
index 4ae5de7..0000000
--- a/data/target-language-ontology/README.md
+++ /dev/null
@@ -1,39 +0,0 @@
-# Target-Language Cultural Ontology Profiles
-
-These profiles describe culturally loaded realization choices for human target
-languages used by Weksa utterance lowering.
-
-They are not whole-culture summaries. They are bounded lowering profiles: the
-distinctions a target lowerer must inspect before producing dialogue.
-
-## Authority
-
-Target-language cultural ontology profiles own:
-
-- address and politeness distinctions
-- register and social stance pressures
-- agency, responsibility, and directness defaults
-- idiom and metaphor risks
-- script or orthographic choices that carry meaning
-- forbidden flattenings that would make the output dishonest
-
-They do not own:
-
-- source meaning
-- speaker-private state
-- target-language grammar as a whole
-- national or cultural stereotypes
-- final wording without an interlingua packet
-
-## Current Profiles
-
-- [English, US fixture default](./en-US.yaml)
-- [Brazilian Portuguese](./pt-BR.yaml)
-- [Brazilian Portuguese overlay catalog](./pt-BR-overlays.yaml)
-- [Brazilian Portuguese, Umbanda overlay](./pt-BR-umbanda.yaml)
-- [Japanese](./ja-JP.yaml)
-
-Each multilingual lowering fixture should cite the profile or profile stack it
-used so reviewers can tell which social and cultural distinctions were
-considered. Regional and religious-cultural options are overlays on a base
-language profile, not replacements for source meaning.
diff --git a/data/target-language-ontology/en-US.yaml b/data/target-language-ontology/en-US.yaml
deleted file mode 100644
index 628cd1f..0000000
--- a/data/target-language-ontology/en-US.yaml
+++ /dev/null
@@ -1,135 +0,0 @@
-profile_id: weksa.target_cultural_ontology.en-US.v0
-language:
-  code: en
-  locale: en-US
-  script: Latn
-scope: >
-  Bounded English dialogue lowering profile for current Weksa fixtures. This is
-  not a claim about all English-speaking cultures.
-authority:
-  owns:
-    - address directness choices
-    - casual versus formal register
-    - technical metaphor legibility
-    - understatement or sarcasm risk
-  does_not_own:
-    - source meaning
-    - speaker identity
-    - whole-culture description
-salience_axes:
-  address:
-    relevant_distinctions:
-      - direct second person is acceptable when scene context names the addressee
-      - imperative force can be softened or sharpened through wording
-    lowering_questions:
-      - Does direct address preserve the speech act?
-      - Does softening erase urgency?
-  register:
-    relevant_distinctions:
-      - casual
-      - technical
-      - formal
-      - intimate
-      - institutional
-    lowering_questions:
-      - Is technical language character pressure or exposition sludge?
-      - Does sarcasm obscure the actual warning?
-  agency:
-    relevant_distinctions:
-      - explicit agent responsibility is usually available
-      - passive phrasing can hide authority or blame
-    lowering_questions:
-      - Should the speaker own the intervention directly?
-      - Does the line preserve who is at risk?
-linguistic_affordances:
-  grammar_features:
-    - feature_id: en_us_direct_imperative_warning
-      label: Direct imperative warning
-      status: draft
-      domain:
-        layer: grammar
-        category: clause_mood
-        subcategory: imperative
-      description: >
-        Broad en-US allows direct imperatives for urgent safety warnings when
-        the speaker has standing to intervene and the scene rewards clarity
-        over mitigation.
-      formal_conditions:
-        syntactic_environment:
-          - main_clause
-          - direct_address_optional
-        semantic_inputs:
-          - warning
-          - addressee_action_to_stop_or_avoid
-          - consequence_or_risk_available
-        required_interlingua_fields:
-          - speech_act
-          - addressee
-          - prohibited_action
-      realization:
-        function: stop_or_prevent_action
-        surface_strategy: bare_imperative_or_do_not_imperative
-        examples:
-          - "Don't touch the damaged control."
-      activation:
-        allowed_when:
-          - scene_has_immediate_risk
-          - speaker_has_contextual_authority_or_care_relation
-        forbidden_when:
-          - politeness_softening_is_required_by_target_profile
-          - imperative_would_falsely_imply_hierarchy
-        requires_profile_authority: false
-        minimum_density: light
-        maximum_density: normal
-      constraints:
-        grammar_contexts:
-          - avoid_if_source_requires_indirect_request
-        register_contexts:
-          - casual
-          - technical
-          - emergency
-        speaker_contexts:
-          - known_addressee
-          - operator_warning
-        incompatibilities:
-          - generic_assistant_over_politeness
-      indexicality:
-        social_meanings:
-          - urgency
-          - clarity
-          - responsibility
-        in_group_meanings: []
-        out_group_risks:
-          - may sound abrupt if the scene is not urgent
-        stereotypes_to_avoid: []
-      evidence:
-        source_refs:
-          - schemas/cultural-ontology-profile.md
-        qdrant_source_ids: []
-        cached_source_refs: []
-        source_hashes: []
-        reviewer_refs: []
-        confidence: medium
-      uncertainty:
-        open_questions:
-          - Should a later en-US regional overlay override imperative force?
-        known_limits:
-          - Base en-US does not model regional, racialized, or contact-language
-            dialect grammar.
-      trace:
-        trace_label: direct_imperative_warning
-        must_report_when_used: true
-        must_report_when_rejected: true
-  phonology_features: []
-  lexicon_features: []
-  discourse_patterns: []
-  orthography_features: []
-  code_switching:
-    allowed: false
-    constraints:
-      - Base en-US profile does not authorize contact-language switching.
-    patterns: []
-forbidden_flattenings:
-  - Do not treat English as the neutral source for other target languages.
-  - Do not use generic assistant politeness when a character voice is required.
-  - Do not let sarcasm replace the actual predicate being lowered.
diff --git a/data/target-language-ontology/ja-JP.yaml b/data/target-language-ontology/ja-JP.yaml
deleted file mode 100644
index aa23492..0000000
--- a/data/target-language-ontology/ja-JP.yaml
+++ /dev/null
@@ -1,70 +0,0 @@
-profile_id: weksa.target_cultural_ontology.ja-JP.v0
-language:
-  code: ja
-  locale: ja-JP
-  script: Jpan
-scope: >
-  Bounded Japanese dialogue lowering profile for Weksa fixtures. This profile
-  records realization distinctions that must be inspected; it is not a total
-  description of Japanese culture.
-authority:
-  owns:
-    - politeness and honorific pressure
-    - in-group/out-group stance when context supplies it
-    - subject and object omission choices
-    - script mix and technical register
-    - sentence-final force
-  does_not_own:
-    - source meaning
-    - character identity
-    - exhaustive Japanese grammar
-salience_axes:
-  politeness:
-    relevant_distinctions:
-      - plain
-      - polite
-      - honorific
-      - humble
-      - rough
-    lowering_questions:
-      - Does politeness preserve the relationship, or does it lie about it?
-      - Is roughness character-specific or generic stylization?
-  social_position:
-    relevant_distinctions:
-      - uchi_soto_pressure
-      - hierarchy
-      - familiarity
-      - emergency_override
-    lowering_questions:
-      - Does urgency override ordinary deference?
-      - Does the line imply a relationship the scene has not earned?
-  ellipsis:
-    relevant_distinctions:
-      - subject omission
-      - object omission
-      - explicit pronoun for emphasis or contrast
-    lowering_questions:
-      - Is the addressee recoverable without an explicit pronoun?
-      - Would explicit pronouns sound unnatural or too pointed?
-  script_and_register:
-    relevant_distinctions:
-      - kanji for technical compounds
-      - kana for softness or readability
-      - katakana for foreignness, machine texture, or emphasis
-    lowering_questions:
-      - Does the script choice help the speaker voice?
-      - Does a technical compound preserve precision without becoming stiff?
-  sentence_final_force:
-    relevant_distinctions:
-      - direct request
-      - warning consequence
-      - command
-      - threat-like phrasing
-    lowering_questions:
-      - Does the ending carry warning force without cartoon aggression?
-      - Does the line preserve the hazard predicate?
-forbidden_flattenings:
-  - Do not treat politeness as decoration.
-  - Do not use explicit pronouns just because English has them.
-  - Do not make every sharp line rough or anime-coded.
-  - Do not erase the difference between technical precision and formal politeness.
diff --git a/data/target-language-ontology/pt-BR-overlays.yaml b/data/target-language-ontology/pt-BR-overlays.yaml
deleted file mode 100644
index d7da0d9..0000000
--- a/data/target-language-ontology/pt-BR-overlays.yaml
+++ /dev/null
@@ -1,76 +0,0 @@
-catalog_id: weksa.target_cultural_ontology.pt-BR.overlays.v0
-base_profile: data/target-language-ontology/pt-BR.yaml
-scope: >
-  Catalog of optional Brazilian Portuguese regional and cultural overlay slots.
-  An overlay slot is not permission to imitate a community. It is a named place
-  where reviewed, source-grounded distinctions can live.
-activation_rule: >
-  Use the broad pt-BR profile by default. Add an overlay only when source
-  context, speaker state, setting documentation, or authoring metadata names the
-  relevant region, community, institution, religion, or register.
-overlay_slots:
-  - overlay_id: broad_brazilian_default
-    status: active_base_mode
-    profile_ref: data/target-language-ontology/pt-BR.yaml
-    owns:
-      - broadly legible Brazilian Portuguese dialogue
-    does_not_own:
-      - regional specificity
-      - religious-cultural specificity
-  - overlay_id: rio_urban
-    status: planned_profile
-    profile_ref:
-    owns_when_defined:
-      - Rio de Janeiro urban speech/register pressures for specific characters or settings
-    blocked_until:
-      - reviewed source context
-      - human-approved examples
-  - overlay_id: sao_paulo_urban
-    status: planned_profile
-    profile_ref:
-    owns_when_defined:
-      - Sao Paulo urban speech/register pressures for specific characters or settings
-    blocked_until:
-      - reviewed source context
-      - human-approved examples
-  - overlay_id: northeast_regional
-    status: planned_profile
-    profile_ref:
-    owns_when_defined:
-      - Northeast Brazilian regional speech/register pressures for specific characters or settings
-    blocked_until:
-      - specific region named
-      - reviewed examples
-      - human approval
-  - overlay_id: south_regional
-    status: planned_profile
-    profile_ref:
-    owns_when_defined:
-      - South Brazilian regional speech/register pressures for specific characters or settings
-    blocked_until:
-      - specific region named
-      - reviewed examples
-      - human approval
-  - overlay_id: amazonian_regional
-    status: planned_profile
-    profile_ref:
-    owns_when_defined:
-      - Amazonian regional speech/register pressures for specific characters or settings
-    blocked_until:
-      - specific region or community named
-      - reviewed examples
-      - human approval
-  - overlay_id: umbanda
-    status: active_guarded_overlay
-    profile_ref: data/target-language-ontology/pt-BR-umbanda.yaml
-    owns:
-      - Umbanda-related register gating
-      - sacred address caution
-      - anti-caricature constraints
-    blocked_until:
-      - source context or authoring metadata explicitly activates Umbanda context
-forbidden_flattenings:
-  - Do not use a planned overlay as if it were defined.
-  - Do not treat regional slots as accent generators.
-  - Do not use religious-cultural overlays for ambience.
-  - Do not collapse race, region, religion, class, and slang into one Brazilian flavor.
diff --git a/data/target-language-ontology/pt-BR-umbanda.yaml b/data/target-language-ontology/pt-BR-umbanda.yaml
deleted file mode 100644
index c65289d..0000000
--- a/data/target-language-ontology/pt-BR-umbanda.yaml
+++ /dev/null
@@ -1,72 +0,0 @@
-profile_id: weksa.target_cultural_ontology.pt-BR.umbanda.v0
-language:
-  code: pt
-  locale: pt-BR
-  script: Latn
-overlay:
-  base_profile: data/target-language-ontology/pt-BR.yaml
-  kind: religious_cultural_register
-scope: >
-  Optional Brazilian Portuguese cultural ontology overlay for Umbanda-related
-  scenes, speakers, ritual contexts, or referents. This profile is a consent and
-  context gate, not a decorative vocabulary pack.
-authority:
-  owns:
-    - whether Umbanda-specific register is allowed for a realization
-    - sacred or ritual address caution
-    - house/tradition specificity warnings
-    - syncretic and entity-reference sensitivity
-    - anti-caricature constraints
-  does_not_own:
-    - Umbanda doctrine as a whole
-    - authority to invent ritual speech
-    - generic Brazilian Portuguese
-    - speaker identity unless the speaker context explicitly supplies it
-activation_requirements:
-  any_required:
-    - source context names an Umbanda scene, terreiro, practitioner, entity, ritual, or discourse community
-    - speaker profile explicitly owns an Umbanda-informed voice or memory
-    - authoring metadata requests this overlay for reviewed cultural grounding
-  never_activate_for:
-    - generic Brazilian flavor
-    - jokes, insults, mystic ambience, or unexplained exotic texture
-    - non-Umbanda religious scenes unless the source context makes a syncretic relation explicit
-salience_axes:
-  sacred_address:
-    relevant_distinctions:
-      - ordinary dialogue
-      - respectful reference
-      - ritual address
-      - entity_or_guide_reference
-    lowering_questions:
-      - Is the line ordinary speech or ritualized speech?
-      - Does the speaker have standing to use sacred address?
-      - Should a term be left general until a human reviewer approves specificity?
-  house_specificity:
-    relevant_distinctions:
-      - practices and terms can vary by house, region, and lineage
-      - generic flattening can become false authority
-    lowering_questions:
-      - Is the output pretending one practice represents all Umbanda?
-      - Should the trace mark the choice as house-specific or uncertain?
-  syncretic_reference:
-    relevant_distinctions:
-      - Catholic, African, Indigenous, Spiritist, and local references may coexist differently by context
-      - entity names and roles are not interchangeable decoration
-    lowering_questions:
-      - Does the source actually contain the syncretic relation?
-      - Does the line preserve respect without overexplaining?
-  anti_caricature:
-    relevant_distinctions:
-      - religious register
-      - folkloric stereotype
-      - occult ambience
-    lowering_questions:
-      - Is the output using Umbanda as culture, faith, and practice rather than spooky texture?
-      - Would a practitioner recognize this as respectful enough for review?
-forbidden_flattenings:
-  - Do not use Umbanda terms as generic magic flavor.
-  - Do not invent ritual formulas.
-  - Do not collapse Umbanda into Candomblé, Spiritism, Catholicism, or generic Afro-Brazilian religion.
-  - Do not imply all Brazilian Portuguese religious language is Umbanda-coded.
-  - Do not activate this overlay unless source context or authoring metadata explicitly asks for it.
diff --git a/data/target-language-ontology/pt-BR.yaml b/data/target-language-ontology/pt-BR.yaml
deleted file mode 100644
index 7fe8dbc..0000000
--- a/data/target-language-ontology/pt-BR.yaml
+++ /dev/null
@@ -1,74 +0,0 @@
-profile_id: weksa.target_cultural_ontology.pt-BR.v0
-language:
-  code: pt
-  locale: pt-BR
-  script: Latn
-scope: >
-  Bounded Brazilian Portuguese dialogue lowering profile. This profile is the
-  base Brazilian Portuguese target; regional, class, religious, and community
-  registers should be added as explicit overlays rather than silently folded
-  into generic pt-BR.
-authority:
-  owns:
-    - Brazilian Portuguese lexical preference
-    - treatment and address choices
-    - directness versus mitigation
-    - regional_or_cultural_overlay_selection
-    - idiom naturalness for reviewed fixture prose
-  does_not_own:
-    - source meaning
-    - Brazilian culture as a whole
-    - regional or religious-community authority without an explicit overlay
-    - target speaker identity
-salience_axes:
-  treatment:
-    relevant_distinctions:
-      - voce
-      - tu_regionally_marked
-      - o_senhor_a_senhora
-      - name_or_title_address
-    lowering_questions:
-      - Is the relationship close, hostile, hierarchical, unknown, or sacred?
-      - Does `voce` preserve broad Brazilian naturalness better than `tu`?
-      - Is `tu` regionally grounded or just imported flavor?
-  directness:
-    relevant_distinctions:
-      - bare imperative
-      - softened imperative
-      - warning framed as consequence
-      - formal warning
-    lowering_questions:
-      - Does urgency justify blunt imperative force?
-      - Would mitigation make the warning dishonest?
-  lexical_locale:
-    relevant_distinctions:
-      - Brazilian Portuguese terms should be preferred in reviewed pt-BR fixtures
-      - European Portuguese defaults must be marked if intentionally used
-    lowering_questions:
-      - Is a term recognizably Brazilian Portuguese in this context?
-      - Is a literal technical word natural enough for dialogue?
-  regional_and_cultural_overlay:
-    relevant_distinctions:
-      - broad_brazilian_default
-      - regional_speech_pattern
-      - class_or_institutional_register
-      - religious_or_ritual_register
-      - community_specific_lexicon
-    lowering_questions:
-      - Does the source context justify an overlay?
-      - Is the overlay owned by a named profile?
-      - Would applying the overlay stereotype the speaker or setting?
-  metaphor:
-    relevant_distinctions:
-      - technical metaphors can preserve character ontology
-      - over-literal metaphors may sound translated rather than spoken
-    lowering_questions:
-      - Does the metaphor still sound like the speaker?
-      - Does it preserve the warning instead of becoming decorative?
-forbidden_flattenings:
-  - Do not label output as Portuguese without a locale in reviewed fixtures.
-  - Do not default to European Portuguese wording when the target is pt-BR.
-  - Do not treat Brazilian Portuguese as one culture, region, class, or religion.
-  - Do not add regional or religious markers without a cited overlay profile and source-context reason.
-  - Do not soften a warning merely because directness feels impolite in English review.
-overlay_catalog: data/target-language-ontology/pt-BR-overlays.yaml
diff --git a/docs/calibration.md b/docs/calibration.md
new file mode 100644
index 0000000..e1888e5
--- /dev/null
+++ b/docs/calibration.md
@@ -0,0 +1,120 @@
+# Calibrating the accept rule
+
+`weksa loop calibrate` measures how the live accept rule behaves on a run's own
+Validation corpus: how often it accepts, rejects as no gain, or regresses a
+candidate that should be none of those. It does not reimplement the rule. It
+reads the answered draws through `RunStores::read_draws` (the scoring
+`weksa loop relower` uses), decides every trial with `decide_panel` over
+`paired_floor` (`crates/weksa/src/run.rs`), and prints, per class, the items
+read and skipped per language, the trial totals with their Accepted, NoGain and
+Regressed counts, and the mean panel noise. That is all it produces: the
+Accepted/NoGain/Regressed counts and the noise mean in the map's "Recalibration
+on the grown corpus" block are reproduced by it, and the prompted trials are
+also printed split by the recorded lowering `R`'s role (`prompted-r-candidate`,
+`prompted-r-base`, `prompted-r-free`, see below), the candidate counts per arm
+and the mild arms' composite offsets from the prompted mean (see below); the
+other figures there (the
+35% with R removed, the noise range, the 0.0185 gain and its 0.41 ratio, the
+bootstrap intervals, the per-item SDs, R's +0.024, the mild-arm duplicate
+counts, the Train-vocabulary overlap, the old/new
+class composites and the ten parse-refused item ids) were computed by scratch scripts that are not in the repo. It is a
+diagnostic: it records nothing, writes no prompts, and never touches Test or
+Train.
+
+## What it counts
+
+The draws are lowerings of one round's Validation packets: the round's own
+(recorded) lowering `R`, plus draws you label. `P` is `R` and the `--prompted`
+draws; the floor size is `FLOOR_ARMS_MIN` (3), the live rule's.
+
+- Prompted trials: every ordered pair (base, candidate) in `P`, against every
+  3-subset of the rest of `P` as the floor. A repeat of the same lowering
+  should read NoGain; Accepted is a false accept, Regressed a false reject.
+  (`R` comes from the round, not from `relower`, so it may not be
+  exchangeable with a repeat.) The prompted line is therefore printed three
+  more times, by `R`'s role in the trial: `prompted-r-candidate` (`R` is the
+  candidate), `prompted-r-base` (`R` is the base) and `prompted-r-free` (`R` is
+  neither; it may sit in the floor). The three sum to the prompted line. Read the Accepted
+  and Regressed columns of each line: a false accept sits mostly under the
+  first and a false reject under the second, but `R`-as-candidate trials can
+  Regress too (class `old` on `growth-scene`: 5 of its 15). The third
+  is the exchangeable rate: on `growth-scene` it was 0 Accepted and 0 Regressed
+  of 80 while all 11 false accepts and 9 false rejects involved `R`. Which of
+  the two rates the live rule should be held to is undecided: the live loop
+  meets `R` as the head's establishing lowering.
+- Degraded trials, per `--degraded` arm: every base in `P` against every
+  3-subset of the rest of `P`, the degraded draw as the candidate. These should
+  read Regressed.
+- Candidate trials, pooled over the `--candidate` arms: the same, tallied
+  Accepted, NoGain, Regressed. This is the rule's power against that arm. The
+  pooled line is followed by one `candidate=LABEL` line per arm: arms of one
+  kind can differ completely (Train-guide h1 and h2 Regressed in every trial
+  while h3 and h4 gained), and then the pooled figure is not a power.
+- Mild offset: each `degraded=LABEL` line ends with `offset LANGUAGE=+x.xxxx`, the
+  arm's composite minus the mean composite of the prompted draws (`R` included),
+  per language over the items read. A degraded arm that is barely below the
+  prompted mean is a weak probe of the rule's sensitivity.
+- Noise: the mean `panel_noise` over every (base, floor) choice.
+
+With six prompted draws including `R` that is 120 prompted trials, 60 per
+degraded arm and 240 candidate trials. Trials share draws and are not
+independent. Each count is printed for `all` Validation items and for each
+`--class NAME=PREFIX[,PREFIX...]` (items whose key starts with any prefix), from
+the same per-item scores. A class with fewer than two read items in a language
+has no floor and reads Regressed in every trial; that is printed.
+
+## Steps
+
+1. `weksa loop open ROOT ...` and `weksa loop round ROOT` record round N and
+   leave its answers in `ROOT/round-N/`.
+2. For each draw label: `weksa loop relower ROOT --round N --arm LABEL
+   --lowerer NAME` writes the byte-identical lowering prompts to
+   `ROOT/relower-N-LABEL/<digest>.prompt` and exits 3. Answer each prompt into
+   `ROOT/relower-N-LABEL/<digest>.answer`.
+3. `weksa loop calibrate ROOT --round N --prompted p1 --prompted p2 ...
+   [--degraded LABEL]... [--candidate LABEL]... [--class NAME=PREFIX]...`.
+   At least four `--prompted` labels are needed (a pair and three floors with
+   `R` make five draws). It exits 1 and lists `unanswered LABEL COUNT` for any
+   draw with prompts still unanswered. Labels match `[a-z0-9-]{1,32}` and differ
+   across the three kinds. It needs the Ollama embedder of the run; a full
+   60-item, 13-draw calibration is on the order of 1500 embedded texts, so
+   launch it detached with a log.
+
+The scratch packet store is `ROOT/calibrate-N/base.cc`; delete it at will.
+
+## Answer file format
+
+`<digest>.answer` is one JSON object and nothing else, no code fence:
+`{"text": "..."}`, a JSON-escaped string. The answerer reads only the prompt
+(its first line says what to write) and writes the answer. Every prompt of the
+draw must be answered.
+
+## Briefs per arm
+
+Independence rule: a fresh agent per batch of answers; no batch sees another
+draw's answers. Only `mild` reads `round-N/*.answer`.
+
+- Plain prompted: answer each prompt as its own first line asks; read nothing
+  else in the run root.
+- Mild: for each prompt, read the recorded lowering in
+  `ROOT/round-N/<digest>.answer` and write the same-format answer whose text is
+  that utterance with exactly one meaning detail blurred: change or drop one of
+  tense, polarity, modality or hedge, a referent, a quantity or a predicate's
+  concept (replace it with a near but different word). Keep language, register,
+  length and fluency; the result must read as a natural utterance and must not
+  mention the change. Pick the detail that is not the most salient one. A
+  second mild draw blurs a different detail than the first and is written
+  without reading the first's answers. The wording of the distil-base original
+  is lost, and the dispatch used for growth-base is not on disk, so this is the
+  wording from now on. Warning: on growth-base two mild arms briefed this way
+  came out identical in 27 of 60 items, so independently briefed mild arms
+  are not independent degradations; read a mild draw's regress count with that
+  in mind.
+- Train-guide: before answering, read the Train sentences of the corpus in the
+  batch's language as a register guide and let it steer word choice; the guide
+  gives phrasing only and each answer must still say exactly what its own packet
+  says. The guide section is the live Train items of that language, built from
+  `weksa corpus dump` filtered to Train, and is given to the answerer in the
+  brief, never pasted into this document, and never includes Validation or Test
+  text. Read nothing else in the run root.
+- Control: a script writes `{"text":"Yes."}` as the answer to every prompt.
diff --git a/docs/cultural-ontology-meta-analysis.tex b/docs/cultural-ontology-meta-analysis.tex
index 6532952..7dcd72f 100644
--- a/docs/cultural-ontology-meta-analysis.tex
+++ b/docs/cultural-ontology-meta-analysis.tex
@@ -369,6 +369,12 @@ target. A Qdrant nearest neighbor is a witness candidate, not a cultural fact.
 
 \section{Proposed CultCache State Shape}
 
+No profile store exists. The per-language lowering choices live in
+\texttt{data/ontology/ontology.cc}; the typed profiles once stored under
+\texttt{.weksa/cultural-ontology/} and the \texttt{weksa.target\_cultural\_ontology.*}
+base profiles named in the listing and sketches below are deleted. Community and dialect
+profiles belong to follow-up \texttt{language-ontology-communities}.
+
 The following shape should become a typed CultCache document family:
 \texttt{weksa.cultural\_ontology\_profile.v0}. It can represent base languages,
 dialects, sociolects, regional overlays, ritual registers, and communities of
@@ -612,15 +618,6 @@ feature requires speaker authority, whether it can be rendered in text or only
 speech synthesis, which source hashes support it, and what must be reported if
 the feature is rejected.
 
-Recommended CultCache paths:
-
-\begin{lstlisting}[basicstyle=\ttfamily\small]
-.weksa/cultural-ontology/{profileId}.cc
-.weksa/cultural-ontology/{baseProfileId}/overlays/{overlayId}.cc
-.weksa/cultural-ontology/catalogs/{catalogId}.cc
-.weksa/cultural-ontology/evidence-bundles/{bundleId}.cc
-\end{lstlisting}
-
 \section{Dialect Profile Sketches}
 
 \subsection{AAVE/AAL}
diff --git a/docs/interlingua-standard.md b/docs/interlingua-standard.md
index 548862c..f8e7937 100644
--- a/docs/interlingua-standard.md
+++ b/docs/interlingua-standard.md
@@ -252,6 +252,10 @@ pair a role id with a filler node (the inventory seeds `agent`, `patient`,
 aspect, polarity, modality and evidentiality are features with declared option
 sets, not fields.
 
+A predication holds each role once (V11). Coordinated fillers ("A and B") are
+one `group` referent filling the role, each member related to it by `member_of`,
+from the member to the group.
+
 ### `relations`
 
 Edges not owned by one predication. `relation` is a relation id (the inventory
diff --git a/docs/multilingual-utterance-lowering.md b/docs/multilingual-utterance-lowering.md
index fb1f22a..cc3daae 100644
--- a/docs/multilingual-utterance-lowering.md
+++ b/docs/multilingual-utterance-lowering.md
@@ -58,7 +58,7 @@ The utterance lowerer does not own:
 - rendered audio
 - phoneme parity or synth-control truth
 
-The target-language cultural ontology profile owns:
+The target-language cultural ontology profile was drafted to own the following; no such profile store exists now (address, politeness and register belong to speaker and scene state, and `data/ontology/ontology.cc` holds per-language lexicon, grammar and discourse choices):
 
 - address, politeness, register, and social stance distinctions
 - idiom and metaphor risks
@@ -76,8 +76,8 @@ English remains a lowering target, not the pivot language. Existing flavored
 English fixtures continue to be useful, but new multilingual fixtures should
 show English as one realization in a set.
 
-The initial cultural ontology profile is
-`data/target-language-ontology/en-US.yaml`.
+The en-US choices are the `en-US` entries of `data/ontology/ontology.cc`
+(model-drafted seeds; read with `weksa ontology dump`).
 
 ### Brazilian Portuguese
 
@@ -94,16 +94,10 @@ The target lowerer should record:
   defaults
 - optional regional or cultural overlays when the source context earns them
 
-The initial cultural ontology profile is
-`data/target-language-ontology/pt-BR.yaml`.
-
-Umbanda-related scenes, speakers, ritual contexts, or referents may add the
-`data/target-language-ontology/pt-BR-umbanda.yaml` overlay. That overlay must
-not activate for generic Brazilian flavor.
-
-Regional or cultural variants should be selected through the overlay catalog at
-`data/target-language-ontology/pt-BR-overlays.yaml`. Planned overlay slots are
-not active profiles until reviewed examples and source context exist.
+No pt-BR ontology entry exists yet; the cut that adds pt-BR writes them to
+`data/ontology/ontology.cc`. Umbanda-related scenes, speakers, ritual contexts,
+or referents may later earn a regional or cultural variant, which must not
+activate for generic Brazilian flavor.
 
 ### Japanese
 
@@ -119,8 +113,8 @@ The target lowerer should record:
 - whether subject omission preserves or harms clarity
 - whether katakana, kanji, kana, or mixed script choices carry useful pressure
 
-The initial cultural ontology profile is
-`data/target-language-ontology/ja-JP.yaml`.
+The ja-JP choices are the `ja-JP` entries of `data/ontology/ontology.cc`
+(model-drafted seeds; read with `weksa ontology dump`).
 
 ## Packet Shape
 
diff --git a/docs/name-span-annotation.md b/docs/name-span-annotation.md
new file mode 100644
index 0000000..546d57b
--- /dev/null
+++ b/docs/name-span-annotation.md
@@ -0,0 +1,52 @@
+# Name-span annotation
+
+How the name spans of an imported public-domain work are placed. A span has a
+committed rule that produced it; this file is that rule.
+
+## Why
+
+- `pd-annotation-model-then-attest`: a labelled model places the spans of a
+  public-domain work; the operator may attest them afterwards.
+- `leak-owned-by-flow-and-scorer-3`: spans are fixed with the text at intake and
+  written by no loop writer. The offsets are derived from markup the annotator
+  writes, never typed by a model (inline marking, as in GPT-NER, Wang et al.
+  2023); `CorpusStore::add` judges range, grapheme boundary, form equality and
+  overlap.
+
+The work file (`weksa corpus import <work>`) is a transcription of a work in
+hand: provenance, cast forms, lines, scene groups and the speaker each speech
+prefix names. It holds no distributor header, licence or trademark text, and the
+binary fetches nothing.
+
+## Rubric r1
+
+You are given a work's cast: each member's entity id and the forms the work spells that member with. For each numbered line, copy the line exactly, character for character, and wrap each place where the line names a cast member by one of that member's listed forms as [[<entity id>|<form>]]. Mark a form only where it refers to that cast member; a listed form used as an ordinary word, or naming someone else, stays unmarked. Do not mark pronouns, titles or descriptions unless the exact text is a listed form. When a form is listed for two members, mark the one the line refers to; when you cannot tell, leave it unmarked. Answer one JSON line per input line, in the order given, and nothing else: {"line": N, "marked": "..."}.
+
+## Procedure
+
+- One fresh model agent per work. Its brief is rubric r1, the cast as
+  `<entity id>: <form>, <form>` lines and the work's lines as `<n><TAB><text>`;
+  nothing else (no store, no loop, no other answer).
+- Import with `--model-family` and `--generator '<annotator model id> (name-span
+  rubric r1, docs/name-span-annotation.md)'`. An operator-written or
+  operator-reviewed answer imports with `--operator`.
+- Import is all or nothing: every entity and item passes the real store doors on
+  scratch copies before the first write, so a refusal (a parse failure, a span
+  the store judges, a work that repeats a line under case or width folding)
+  leaves the stores untouched. Re-draw the whole answer once, log it, and import
+  again. A work file repeating a line's text is refused naming both lines; leave
+  that line out of the answer file (the rest imports with its numbering intact),
+  since a repeated line cannot be two corpus items.
+- A line the answer does not cover is not imported by that run; a later run over
+  other lines of the work does not collide (keys are `item:<slug>:<n>`).
+- A line whose own text holds `[[` or `]]` cannot be marked and is refused; it
+  can still enter by hand through `weksa corpus add --name`.
+
+## Label scope
+
+`names_by` labels the spans only, not the line or its speaker. One label per
+item: a later attestation would be a superseding item with the same text and
+group, but no command writes one yet; question `pd-name-span-attestation` owns
+that door.
+`None` means unrecorded (the cast seeds, `weksa corpus add`, the Dao De Jing
+bed), not attested.
diff --git a/docs/prior-art-and-plan.md b/docs/prior-art-and-plan.md
new file mode 100644
index 0000000..c6e5130
--- /dev/null
+++ b/docs/prior-art-and-plan.md
@@ -0,0 +1,195 @@
+# Prior art and plan
+
+Meta asked (#weksa, 2026-11-13) for scaffolding to stand on instead of
+building from base principles. This is a survey of what exists and a plan that
+borrows it. Every source below was read in full text unless marked **snippet**
+(seen only in a search result) or **not read**. Research only: nothing here is
+built, and no new loop machinery is proposed.
+
+## What exists
+
+**Semantic backbones: none carries the part we care about.**
+
+- AMR ([Banarescu 2013](https://aclanthology.org/W13-2322.pdf)): no politeness,
+  speech-act or pragmatics text at all; it also does not distinguish real from
+  hypothetical events (its Section 4).
+- UMR ([Van Gysel 2021](https://par.nsf.gov/servlets/purl/10288269)): adds
+  document-level coreference, temporal and modal-dependency graphs. The paper
+  has no politeness, addressee or register layer; the only speaker-like object
+  is the author node. Annotation agreement was still "awaiting confirmation".
+- Universal Dependencies: the `Polite` feature has four values (`Infm`, `Form`,
+  `Elev`, `Humb`; [feature page](https://universaldependencies.org/u/feat/Polite.html)),
+  but the Japanese GSD treebank carries no `Polite`
+  ([treebank page](https://universaldependencies.org/treebanks/ja_gsd/index.html)).
+  The page says Japanese *teineigo* shares the value `Form` with formal register
+  although it is a different axis. UD is a parse scheme, not a meaning scheme.
+- Grammatical Framework RGL: 38 languages, Japanese present
+  ([synopsis](https://www.grammaticalframework.org/lib/doc/synopsis/index.html),
+  [status](https://www.grammaticalframework.org/lib/doc/status.html)); the source
+  declares `Style = Plain | Resp`, so two politeness levels and no honorific
+  paradigm
+  ([ResJpn.gf](https://raw.githubusercontent.com/GrammaticalFramework/gf-rgl/master/src/japanese/ResJpn.gf)).
+  LGPL/BSD, application grammars may take any licence
+  ([LICENSE](https://raw.githubusercontent.com/GrammaticalFramework/gf-rgl/master/LICENSE)).
+- Abstract Wikipedia / Wikifunctions: encyclopedic content, 2026 soft launch in
+  three languages, no politeness
+  ([Meta page](https://meta.wikimedia.org/wiki/Abstract_Wikipedia)). The
+  Wikifunctions NLG and Japanese documentation were **not read**.
+
+**Typology.**
+
+- WALS (CC BY 4.0, CLDF at <https://github.com/cldf-datasets/wals>): the only
+  politeness feature is 45A, pronoun politeness
+  ([chapter](https://wals.info/chapter/45)); Japanese is coded value 4 ([datapoint](https://wals.info/valuesets/45A-jpn)), pronoun
+  avoidance. No feature for verbal honorifics or register.
+- Grambank (CC BY 4.0, <https://github.com/grambank/grambank>): GB415 is the
+  second-person politeness distinction; I found no verbal-honorific feature
+  (loose name match, not exhaustive). The 195-feature / 2,467-variety size is
+  **snippet**; Japanese's GB415 value was **not looked up**.
+
+**Formality control in MT: the closest prior art, and it is a sentence-level
+label.**
+
+- [Sennrich 2016](https://aclanthology.org/N16-1005.pdf): a side-constraint
+  token controls T/V; forced-polite output was 96% polite or neutral.
+- [Feely 2019](https://aclanthology.org/D19-5203.pdf): the same for EN-JA with
+  three levels (informal, polite, formal); labels by rule plus a fastText
+  classifier (F1 0.83-0.86 on 150 hand-labelled sentences); formal text is only
+  0.7-1.6% of training data.
+- [CoCoA-MT](https://arxiv.org/pdf/2205.04022) (CDLA-Sharing-1.0, repo
+  <https://github.com/amazon-science/contrastive-controlled-mt>): 1,000 train and
+  600 test segments for Japanese with contrastive formal/informal references and
+  phrase-level markers. Two baseline systems' EN-JA outputs, labelled by
+  professionals, came out formal 29.0% / 73.8% and "other" about 20-24%; EN-JA
+  inter-annotator agreement 0.82, the lowest of the six languages.
+- [Marrese-Taylor 2023](https://aclanthology.org/2023.wmt-1.49.pdf): GPT-3 and
+  ChatGPT prompted reach about 90% formality-control accuracy on EN-JA, which
+  the authors say beats fine-tuned MT; classifier and data at
+  <https://github.com/epochx/japanese-formality> (no licence reported).
+- [IWSLT 2023 formality track](https://aclanthology.org/2023.iwslt-1.1.pdf): no
+  Japanese; metrics matched-accuracy (phrase markers) and classifier-accuracy.
+  Niu 2017 is read ([D17-1299](https://aclanthology.org/D17-1299.pdf)); Niu 2019
+  and Rippeth 2022 (arXiv 2205.06644, abstract only) are **not read**.
+- None of these takes a speaker-state or addressee relation. The label is one
+  bit or three levels attached to a source sentence.
+
+**Grammar-in-context (for conlang targets).**
+
+- [MTOB](https://arxiv.org/pdf/2309.16575) (MIT code, CC BY 4.0 grammar book):
+  Claude 2 with word list plus retrieved sentences plus long grammar 44.7 / 45.8
+  chrF against a human learner at 51.6 / 57.0.
+- [Aycock 2025](https://arxiv.org/pdf/2409.19151): most of the gain comes
+  from the book's parallel examples (Gemini-1.5-Flash eng->kgv chrF++ 30.8 with
+  examples only against 34.4 whole book and 11.0 zero-shot; explanations alone
+  22.6). Kalamang is a natural language, so transfer to a conlang is assumed.
+- [Gemini 1.5 report](https://arxiv.org/pdf/2403.05530): full book 5.46 against a
+  human learner's 5.52 on a 0-6 human scale.
+  Suggests, for a conlang target (assumed to transfer), worked paired examples first and grammar
+  prose second.
+
+**Prompt optimisation and evaluation.**
+
+- [DSPy](https://arxiv.org/pdf/2310.03714) (MIT), [MIPRO](https://arxiv.org/pdf/2406.11695),
+  [OPRO](https://arxiv.org/pdf/2309.03409) (Apache-2.0): DSPy compiles take
+  "10-20 trials over 150-300 validation examples"; MIPRO's task sets run from 75
+  train (Iris) to 500 per task. MIPRO found bootstrapped demos gave the biggest
+  gain and tests with Wilcoxon over 5 runs. OPRO discusses overfitting to the
+  training set.
+- [Koehn 2004](https://aclanthology.org/W04-3250.pdf): paired bootstrap;
+  against a 30,000-sentence reference, a 2.0-point BLEU gap was detected at 95%
+  significance in 31% of runs at n=100 and 65% at n=300; a 5.1-point gap in 97%
+  at n=100. The paper suggests n=100 might be too small.
+- [Dror 2018](https://aclanthology.org/P18-1128.pdf): paired bootstrap is
+  "less effective for small test sets"; approximate randomization has been used
+  for test sets above 20 points; only 3 of 110 surveyed ACL 2017 papers
+  corrected for multiple comparisons.
+- [Kocmi 2021](https://arxiv.org/pdf/2107.10821): pairwise accuracy against
+  humans COMET 83.4, BLEURT 80.0, chrF 75.6, BLEU 74.6; recommends COMET
+  primary, a string metric secondary and a paired test; observes "a slight drop
+  in metric ranks for some pretrained metric" against ChrF for non-Latin and
+  logogram targets and says more analysis would be required.
+- [chrF](https://aclanthology.org/W15-3049.pdf): validated on seven targets, Japanese
+  not among them.
+
+## What we borrow
+
+| Need | Borrow | Instead of |
+|---|---|---|
+| Politeness vocabulary for the packet's register field | UD `Polite` values (Infm, Form, Elev, Humb) as the label set, and Feely's three-level Japanese split | inventing level names |
+| Modal/author structure | UMR's conceiver and modal-dependency idea for evidence/stance fields | a bespoke modality scheme |
+| Japanese test of register | CoCoA-MT JA set (600 contrastive test segments, phrase markers), KeiCO for relation-labelled Japanese, and the Japanese-formality classifier | hand-written register references only |
+| Conlang scaffolding | MTOB recipe: worked paired examples first, word list, grammar prose after (shown on Kalamang, a natural language; transfer to a conlang is an assumption) | long grammar prompts alone |
+| Typology priors | WALS 45A and Grambank GB415 to seed which targets have a politeness axis | per-language guesses |
+| Significance | paired approximate randomization over items; chrF with an embedding metric | reading small differences as results |
+| Optimiser | DSPy/MIPRO only once a scoring set of at least 75 items exists (MIPRO's smallest task), more for stable compiles; the 35-item sets are below that | the golf loop growing a private optimiser |
+
+We do not adopt AMR, UMR, UD or GF as the packet. None represents the speaker's
+relation to the addressee, which the packet's scene state does. The packet stays
+ours; it borrows vocabulary.
+
+## What is actually new
+
+Prior work already conditions honorific choice on the speaker-addressee
+relation or status in narrower forms: KeiCO (Liu and Kobayashi 2022, 10,007
+examples, annotates the speaker-listener social relationship; read through
+Marrese-Taylor 2023 and the abstract), Korean context-aware NMT that infers the
+relation from surrounding sentences
+([MDPI](https://www.mdpi.com/2079-9292/10/13/1589), snippet), Brown-Levinson
+generation that takes power and distance as parameters (Walker et al., not
+read), and a 2026 translator given a known addressee
+([Cihlar et al.](https://aclanthology.org/2026.iaai-1.3), snippet only). What I
+did not find is the whole chain: persona state (status, restraint, stance) to a
+register decision for an LLM lowerer, measured against a prompted baseline.
+That is the claim, and it is relative to what I searched; closer work may
+exist.
+
+Uncontrolled commercial MT left 20-24% of EN-JA outputs inconsistent in
+register (CoCoA-MT Table 4, two generic systems, no formality instruction). That
+shows register is unstable without control, not how a prompted LLM behaves.
+
+## Smallest end-to-end slice
+
+One path, existing machinery, ja-JP only, no new loop:
+
+1. A packet with scene state (speaker, addressee, relation) goes through the
+   current `weksa loop` encode and lowering to Japanese.
+2. The same packet under two relations (to a superior and to an intimate) must
+   produce the two UD `Polite` levels; check with the Japanese formality
+   classifier plus a native-reader pass on the 35-item Validation corpus per
+   language (see the map's recalibration blocks).
+3. Score the register decision as a classification (matched accuracy), not only
+   chrF. CoCoA-MT's JA references give an outside check on the classifier, a
+   weak one: its reference-based segment classifier on EN-JA had precision
+   0.71 and 0.69 and recall 0.43 and 0.54 in the paper's Table 5.
+
+Out of scope for the slice: conlang targets, optimisers, a second language.
+
+## What good enough means
+
+- Register accuracy: report matched accuracy for ours and for a plain prompt
+  that is given the relation in words, on the same items, with paired
+  intervals. We measure that baseline ourselves; Marrese-Taylor's roughly 90%
+  is classifier accuracy (0.83-0.86 by phrase-marker matching) for binary
+  formal/informal control with the label named in the prompt, an upper-region
+  reference and not our baseline. The claim is non-inferiority with a stated
+  margin. Superiority is claimed only if enough items are discordant (about 6
+  or more, all in one direction, at n=35); against a baseline near 90%, n=35
+  cannot show it, and the result is then "not detected".
+- Meaning is not lost: chrF and meaning cosine are not detectably below the
+  plain prompt on the same items, under the same paired test.
+- Honest sample size: 35 items per language detects only large gaps, so results
+  carry intervals and "not detected" stands as an outcome. Small gaps are not
+  claims. Koehn's figures are for sentence-level BLEU on 100-3000-sentence
+  blocks and do not transfer to a binary register metric on 35 items; power
+  for that is computed directly from the discordant-pair count.
+- A native-reader check on register for a sample, because every automatic metric
+  here was validated on languages other than the persona register we care about.
+
+## Open
+
+- Which persona fields (status, restraint, stance) are in the packet today
+  versus planned: this doc does not decide that; `docs/interlingua-standard.md`
+  owns it.
+- Licences not checked: the UMR dataset, the other four Japanese UD treebanks,
+  CoCoA-MT repo licence ambiguity (paper says CDLA-Sharing-1.0, GitHub says
+  NOASSERTION).
diff --git a/docs/research/2026-10-29-golf-loop-prior-art.md b/docs/research/2026-10-29-golf-loop-prior-art.md
index e2a24ae..7fb5510 100644
--- a/docs/research/2026-10-29-golf-loop-prior-art.md
+++ b/docs/research/2026-10-29-golf-loop-prior-art.md
@@ -65,7 +65,7 @@ Verified licence facts are few. Discord data excluded by policy; not read.
 - PersonaChat (Zhang et al. 2018): ParlAI project page, archived 2020-08-01, states no licence, only "You may continue to use the data without issue". [V] https://parl.ai/projects/personachat/ ; paper https://arxiv.org/abs/1801.07243 says data released open source via ParlAI; licence text [GAP]. Crowdworker-written, persona-statement-conditioned chit-chat [B].
 - LIGHT: ParlAI page states no licence; contents: 663 locations, 3,462 objects, 1,755 character types, 11,000 episodes; WILD 41,131 training episodes from game deployment (human players, so a different provenance than crowdwork). [V] https://parl.ai/projects/light/ . Licence [GAP: check ParlAI repo].
 - Cornell Movie-Dialogs Corpus: licence/terms page fetch failed (certificate rejected) https://www.cs.cornell.edu/~cristian/Cornell_Movie-Dialogs_Corpus.html . [GAP] Underlying scripts are copyrighted film text [B]; dataset licence unverified.
-- Project Gutenberg: "vast majority" of eBooks public domain in the US, so no one can grant or withhold permission for uses; PG cannot sublicense copyrighted items; subject to its Terms of Use, which the permission page links and does not summarise; no statement on ML/bulk use on that page. [V] https://www.gutenberg.org/policy/permission.html . Terms-of-Use text on bulk/automated access and the trademark licence: [GAP, not read]. Items public domain in the US may not be elsewhere (same page).
+- Project Gutenberg: "vast majority" of eBooks public domain in the US, so no one can grant or withhold permission for uses; PG cannot sublicense copyrighted items; subject to its Terms of Use, which the permission page links and does not summarise; no statement on ML/bulk use on that page. [V] https://www.gutenberg.org/policy/permission.html . Terms-of-Use text on bulk/automated access and the trademark licence: read 2026-11-13, see `2026-11-13-gutenberg-terms.md`. Items public domain in the US may not be elsewhere (same page).
 - Google Synthetic-Persona-Chat (model-generated, persona-chat-style): CC BY-NC? listed as cc-by-4.0 on HF. [V search-only] https://huggingface.co/datasets/google/Synthetic-Persona-Chat
 - Operator-authored or model-generated corpus: no licence question beyond provider terms [B, unread this pass]. Problems with evaluating on model-generated text: see 2 (self-bias, preference leakage, stylistic homogeneity: Xu et al. 2025; Li et al. 2025). The same Xu et al. finding says it extends to open-ended generation.
 - Expressive-register-annotated English corpora (hedging, humour, affect, politeness labelled), with permissive terms: [GAP] not searched beyond the list above (e.g. Stanford Politeness Corpus, GYAFC formality, Enron etc. are [B] candidates, unverified, GYAFC is known to carry Yahoo Answers terms [B]).
@@ -83,6 +83,6 @@ Verified licence facts are few. Discord data excluded by policy; not read.
 - No per-metric human-correlation numbers for hedging, humour, affect, stance, persona voice; nearest is formality (Briakou 2021). COMET, BLEURT, MAUVE correlations not obtained.
 - No source on surface-form smuggling through an LLM bottleneck or its defences (vocab restriction, paraphrase invariance).
 - No source on schema/inventory growth from generation failures, or its overfitting controls.
-- Cornell, LIGHT, PersonaChat licence texts not obtained; Gutenberg ToU on bulk use not read.
+- Cornell, LIGHT, PersonaChat licence texts not obtained.
 - No realiser or evaluation protocol for constructed languages from a meaning representation.
 - Several arXiv PDFs (Briakou, Zheng, STEL, LUAR/StyleDistance) fetched as binary; numbers above come from the ar5iv/arXiv-HTML versions where marked, otherwise search summaries.
diff --git a/docs/research/2026-11-13-gutenberg-terms.md b/docs/research/2026-11-13-gutenberg-terms.md
new file mode 100644
index 0000000..1d2f596
--- /dev/null
+++ b/docs/research/2026-11-13-gutenberg-terms.md
@@ -0,0 +1,59 @@
+# Project Gutenberg terms: bulk access and header stripping
+
+Read 2026-11-13 for follow-up `gutenberg-terms` (campaign `weksa-lowering`),
+ahead of cut `pd-importer`. Pages: gutenberg.org `policy/permission.html`,
+`policy/terms_of_use.html`, `policy/robot_access.html`, `policy/license.html`.
+The quotes were checked against the live HTML of each page by a second reader.
+`pd-importer`'s Imagination re-reads the pages before it fixes a fetch path,
+since they change.
+
+## Findings
+
+- **Automated access to the main site is refused.** Terms of Use: "This website
+  is intended for human users only"; "Any perceived use of automated tools to
+  access this website will result in a temporary or permanent block". OPDS
+  feeds: no more requests than a browser user would make; heavy requesters are
+  blocked by IP.
+- **Bulk has two sanctioned paths.** Terms of Use: take bulk downloads "from
+  one of our mirrors, not from the main site". The robot-access page names the
+  `robot/harvest` wget endpoint (`-w 2`, filterable by file type or language)
+  and recommends a private mirror for a full local copy; it suggests checking
+  periodically for changes. Catalog data are offered as
+  machine-readable offline catalogs, "granted to the public domain".
+- **Header and licence stripping.** Licence section 1.C: for a work not
+  protected by US copyright, with the user in the US, the Foundation does "not
+  claim a right to prevent you from copying, distributing, performing,
+  displaying or creating derivative works", "as long as all references to
+  Project Gutenberg are removed", the condition holding for a user in the US.
+  Section 1.E opens "Unless you have removed all references to Project
+  Gutenberg", and 1.E.1 to 1.E.7 (including 1.E.4, do not detach the licence)
+  attach to a work on which the phrase "Project Gutenberg" appears or with which
+  it is associated, so a text with every reference removed is outside 1.E.
+  1.E.2 is not that grant: it says a PG eBook derived from texts not restricted
+  by US copyright may be copied and distributed in the US without fee. The
+  trademark is registered; non-commercial use of the name needs no permission,
+  commercial use does.
+- **No statement on machine learning or AI use** on any of the four pages.
+- **US public domain only.** The Foundation makes no claim about copyright
+  outside the US (1.D). A work free in the US may not be free elsewhere, and
+  Gutenberg's own catalog is not a per-work clearance.
+
+## What this decides for `pd-importer`
+
+- Fetch from a mirror or an offline dump. The Terms of Use footnote counts "many
+  books" as more than about 100 a day and sends those to mirrors, while
+  `robot/harvest` is a `www.gutenberg.org` URL: use it (with `-w 2`) only for a
+  handful of works. Never crawl `gutenberg.org` pages or OPDS from the loop host.
+- Strip the whole header and footer, every Project Gutenberg reference and the
+  licence text from the stored text; keep provenance as the ebook number and
+  edition in the item's source field, which is Weksa's own record and not a use
+  of the mark. This is the path `docs/targets/dao-de-jing-test-bed.md` already
+  takes. The remaining open question there, what counts as a "reference", stays
+  open: the safe reading is that the ebook number in a provenance field is a
+  catalogue identifier, not a reference inside the work, but nothing read here
+  rules on it.
+- Per-work check stays with the importer: the work's author and first
+  publication date against US public-domain rules, recorded on the item. The
+  Foundation's catalogue does not supply it. A work Gutenberg posts with the
+  copyright holder's permission (1.E.3) is out of scope.
+- No importer code in this note.
diff --git a/docs/scene-annotation.md b/docs/scene-annotation.md
new file mode 100644
index 0000000..5fca125
--- /dev/null
+++ b/docs/scene-annotation.md
@@ -0,0 +1,116 @@
+# Scene annotation
+
+How the keeper scenes of `data/original/speaker-state.cc` are labelled. A scene
+label has a committed rule that produced it; this file is that rule.
+
+## Why
+
+Two findings forced a written rule.
+
+- `annotation-rank-from-register`: an annotator who reads the line's register
+  (politeness forms, honorifics, endings) to decide the speaker's rank hands the
+  lowering its own answer back, because register is what the lowering must
+  produce from the scene.
+- The addressee gate (`with_scene` in `crates/weksa/src/validate.rs`): a scene is
+  read only when the packet names a discourse addressee. A line that addresses no
+  one reads `NoAddressee` and no Scene entry selects, so labels on narration are
+  inert and the only labels that bite are those on lines said to someone.
+
+The earlier labels followed two briefs that were never committed and that
+disagreed with each other (the relation to the reader, and a situation read with
+the register ignored). The rubric below replaces both for every live group.
+
+## Provenance
+
+Cut `weksa-lowering:cut_spec:cut-scene-in-group.r1`, ruling
+`weksa-lowering:ruling:scene-rubric-whole-bed`: all 98 live Train and Validation
+groups of `data/original` receive a new scene revision from annotator A under
+rubric r1, generator `claude-sonnet-5-5 (Weksa Hands, scene rubric r1,
+docs/scene-annotation.md)`. Earlier revisions stay as provenance. The rubric uses
+no corpus line as an example on purpose: a labelled example would make the blind
+check against the old labels circular.
+
+A later rubric revision gets a new section and a new generator string; r1 is
+never edited.
+
+## Rubric r1
+
+The speaker of every line is the keeper, a quiet caretaker of a house and garden. First decide whether the line addresses a listener: it asks them something, asks them to do something, tells them about themselves, wishes something for them, or speaks to them as you. A line that addresses no one (narration, description, a remark about the world or about other people, a thought or wish with no one addressed) is told to the reader, a stranger: answer addressed false, relative_status level, intimacy 500, in_group false. People named inside a line are not its listener.
+
+For a line that addresses a listener, answer addressed true and judge the keeper's relation to that listener from the situation the line states or implies, never from its register: politeness forms, honorifics, sentence endings, contractions, please and casual particles are what the lowering must produce from the scene, so they cannot decide it. relative_status: above when the situation gives the keeper standing over the listener (instructing, advising or permitting as elder, host, employer or teacher); below when it gives the listener standing over the keeper (the keeper serves, thanks, or asks a favour of a guest, employer, elder or official); level when it shows neither.
+
+intimacy, 0 to 1000: 500 when the line shows nothing; up to 800 when it shows shared daily life (the listener's body, sleep or habits, the household's routine); above 800 only for a stated close bond; down to 200 for a stated first meeting or a service relation. in_group: true only when the line shows the listener belongs to the keeper's household, family or working circle, stated or plainly implied; a request, a question or a kind wish alone is not enough; otherwise false. Answer one JSON line per group, in the order given and nothing else: {"group": G, "addressed": true|false, "relative_status": S, "intimacy": N, "in_group": true|false}.
+
+## Procedure
+
+- Annotator A (committed) and annotator B (measurement only) are separate fresh
+  model agents, one pair per language (49 live groups each). Each sees only the
+  text of Rubric r1 above and that language's sentences as `group<TAB>"text"`,
+  shuffled by a fixed seed. Neither sees an existing scene, the other annotator's
+  answer, the ontology, which items are old or new, or any Test text.
+- An output that does not parse or misses a group is re-drawn once and logged.
+- A's labels are written with `weksa scene put` (one revision per group,
+  `--to unnamed --inventory-rev 4`). `addressed` is not stored: no Scene feature
+  carries it.
+- Disagreements are reported, never adjudicated.
+
+## Agreement at r1 (this cut, 98 live groups, 49 per language)
+
+Four fresh agents drew the labels (A-en, A-ja, B-en, B-ja); the briefs were the
+rubric section plus one language's shuffled sentences (SHA-256 of the brief
+bodies: en-US `db087476...dbc04e`, ja-JP `c5b81b27...97488c`; no Test text in
+either). No draw was repeated. Annotator model: `claude-sonnet-5-5`.
+
+A against B (B measures only): pooled `addressed` equal 96/98 (kappa 0.96),
+`in_group` equal 93/98 (kappa 0.79), `relative_status` equal 89/98, intimacy
+within 150 on 98/98. en-US: addressed 47/49, in_group 47/49 (0.86),
+relative_status 45/49. ja-JP: addressed 49/49, in_group 46/49 (0.64),
+relative_status 44/49.
+
+Blind check, A against the 56 older labels: `relative_status` equal 49/56,
+`in_group` equal 53/56 (kappa 0.64), intimacy within 150 on 55/56. Three
+in_group differences: `original-ja-shimoyado-2` and `original-ja-sakana` (both
+narrations, true to false) and `original-ja-asa` (an instruction to a household
+member, false to true).
+
+In_group true across the 98: 42 before, 15 after; every unaddressed line is now
+false (it was true on 17 of the 21 unaddressed vgrow groups). Disagreements are
+reported, not adjudicated.
+
+## Reproducing the cut
+
+`scripts/scene-annotation/` holds the standard-library scripts of this cut, run
+from the repo root with `WEKSA` (the binary) and `SCENE_SCRATCH` (a directory
+that is never committed): `build_briefs.py` writes the two annotator briefs from
+the Rubric r1 section and prints each brief's Test-leak count (must be 0) and
+sha256 (it reproduces the briefs of this cut byte for byte); `put_labels.py`
+puts A's `A-en.jsonl` and `A-ja.jsonl`; `agreement.py` prints the tables above and
+must run before the puts, against the store at 76fa685, because the older labels
+are then its latest revisions (it also reads the round-1 encoder answers of
+`runs/growth-base` through `ROUND1`). `DIGEST_OF_THE_RUBRIC` and
+`DIGEST_OF_THE_EARLIER_SCENES` in `crates/weksa/tests/original_corpus.rs` pin the
+rubric text and the 113 earlier revisions.
+
+## Known limits of r1 labels
+
+Found by Soul's pass on this cut (`weksa-lowering:verdict:cut-scene-in-group.s1`).
+They are not fixed in r1; a reviewer's pass over the labels is follow-up
+`weksa-lowering:follow_up:scene-labels-reader-review`.
+
+- The new labels change which ontology entries are selected for 37 groups. Eight
+  addressed lines move onto the casual in-group entries (en-US:12: lantern,
+  broom, mirror, seedling; ja-JP:12: furo, asa, irori, yurikago), while their
+  references are polite requests. The reader default (level, 500, false) is
+  exactly the condition of ja-JP:11.
+- `relative_status` tracks request form for some lines: imperatives read above,
+  favour questions read level or below, so the same household request gets
+  different standing in two forms (hane above/650/true, kabin below/500/false;
+  B gave both level/false). Form is what signals the speech act, which is what
+  part 2 asks for, and register is what part 2 forbids.
+- `in_group` is true on some requests alone (lantern, mulch, stool, hane) and on
+  a line whose only family member is named inside it (original-ja-ane), though r1
+  says a request or a person named inside the line is not enough. A and B
+  agreeing does not clear this.
+- A run opened on the old speaker-state refuses to continue after merge:
+  `runs/growth-base` pins the store of `/var/lib/mind-weksa-self/Weksa-growth`
+  (main), and that checkout must not be pulled while the run is wanted.
diff --git a/docs/targets/dao-de-jing-test-bed.md b/docs/targets/dao-de-jing-test-bed.md
index bd2ebbf..2b71dab 100644
--- a/docs/targets/dao-de-jing-test-bed.md
+++ b/docs/targets/dao-de-jing-test-bed.md
@@ -23,9 +23,10 @@ plus a separately recorded chosen gloss per lowering).
   `corpus add ... --language en-US --source public-domain` per item, then `packet dao <store>`.
 - Source: Project Gutenberg eBook 216, "The Tao Teh King, or the Tao and its
   Characteristics", Laozi, tr. James Legge (Sacred Books of the East 39, 1891).
-  Gutenberg's licence (1.E.2) lets a work derived from texts not protected by US
-  copyright be used with no fee provided every Project Gutenberg reference is
-  removed from the work. The items hold only Legge's words, one numbered section
+  Gutenberg's licence (1.C) does not claim a right to prevent derivative works of
+  a work not protected by US copyright, for a user in the US, provided every
+  Project Gutenberg reference is removed (see
+  `docs/research/2026-11-13-gutenberg-terms.md`). The items hold only Legge's words, one numbered section
   or sentence each; no Gutenberg header, licence text or trademark is stored,
   and the eBook file itself is not committed. `edition_url` names the page the
   text was retrieved from, as a citation of provenance and not as part of any
diff --git a/docs/targets/interlingua-lowering-map.md b/docs/targets/interlingua-lowering-map.md
index 9c18e09..1600f6b 100644
--- a/docs/targets/interlingua-lowering-map.md
+++ b/docs/targets/interlingua-lowering-map.md
@@ -31,17 +31,17 @@ means no store holds it and nothing writes it.
 |---|---|---|---|
 | Packet | Key `packet:<16 hex>`, an opaque digest of item, inventory revision and encoder (the item key lives in `provenance.corpus_item`, which the lowerer never sees); CultCache type `weksa.interlingua_packet`, carrying `schema_version` and `inventory_rev`. Every id inside is an opaque form type (`n<k>` nodes, `encoder:<16 hex>`, canonical `<family>:<n>`). From cut `speaker-state` (schema v4) it also carries the utterance **stance**: the speaker's felt affect and restraint, as inventory features of slot `Stance` (see Speaker state below) | Minted by an encoder for one corpus item under one spec version; immutable; a new spec version means a new packet, never an edit. Admitted only through `PacketStore::admit`, which validates against the inventory store at the packet's revision | The encoder writes; the form types refuse malformed ids at construction and load, the validator refuses broken references and over-capacity packets: a feature at most once per slot, at most 64 nodes (`typed-packet`); nothing else writes packets |
 | Schema version | `weksa.interlingua_packet.v<N>` constant in `crates/weksa`; published JSON Schema at `schemas/cultnet/` | Bumped by a commit that changes the Rust types; the published schema is regenerated in the same commit and a test fails on drift | A cut (Hands, under a spec); never the loop |
-| Inventory entry | Key `<family>:<n>`, `n` canonical decimal >= 1 (families: concept, frame, role, relation, speech_act, feature, referent_kind, extension); type `weksa.inventory_entry`, with a bounded gloss, value kind (option labels bounded), the slots a feature may sit in (`Discourse`, `Referent`, `Predication`, `Relation`; `Stance` from cut `speaker-state`, `Speaker` and `Scene` from cut `speaker-scene`), `introduced_rev` and optional `retired_rev`. Speaker axes, scene relations and affects are features of those slots, so the loop grows them like any closed-class family and convergence covers them | Added or retired by an inventory revision; never edited in place (a changed meaning is a retire plus an add); a retired id still resolves for packets of earlier revisions | The loop's accepted rounds, whose minting call the context builder assembles from Train items only; Self on merge to main. Admission checks form, not text |
+| Inventory entry | Key `<family>:<n>`, `n` canonical decimal >= 1 (families: concept, frame, role, relation, speech_act, feature, referent_kind, extension); type `weksa.inventory_entry`, with a bounded gloss, value kind (option labels bounded), the slots a feature may sit in (`Discourse`, `Referent`, `Predication`, `Relation`; `Stance` from cut `speaker-state`, `Speaker` and `Scene` from cut `speaker-scene`), `introduced_rev` and optional `retired_rev`. Speaker axes, scene relations and affects are features of those slots, so the loop grows them like any closed-class family and convergence covers them | Added or retired by an inventory revision; never edited in place (a changed meaning is a retire plus an add); a retired id still resolves for packets of earlier revisions | The loop's accepted rounds, whose minting call the context builder assembles from Train items only; `weksa inventory admit` for one model-drafted `EditDraft` outside a run (cap 256, reviewed whole in its cut; same numbering and admission check as the loop); Self on merge to main. `data/original` revs 5 (233 concepts and frames) and 6 (five concepts closing named gaps) were drafted by claude-sonnet-5-5 (Weksa Hands, model-drafted original-bed lexicon from Train and Validation passages); Validation-informed: numbers on this bed measure lowering, never generalization or convergence. Residue after rev 6, not amended (each fresh coverage reader names new gaps; the loop's growth path owns them): simultaneity (ながら), distal deixis (あの), 'first' (まず), counterfactual mood, 'at least', emphatic question; heaven versus sky for the visible 天 stays weak. Admission checks form, not text |
 | Inventory revision | Key `rev:<n>`, type `weksa.inventory_revision`, with parent, change list and `frozen` | Appended per accepted round; exactly one revision is ever marked frozen, by the convergence test | The loop's accept rule appends; the convergence test freezes; Self records the freeze as a ruling |
-| Target profile | Locale or language-project id (`en-US`, `ja-JP`, a conlang's slug) plus a revision `profile:<language>:<n>` | Authored, revised by commit or by an accepted round that changed the lowering; each lowering names the revision it used | Profile authors and accepted rounds; never the lowerer's defaults (`persona-drives-register`) |
-| Language ontology entry (cut `language-ontology`) | Key `onto:<language>:<n>`; type `weksa.ontology_entry`: conditions over feature values (stance, speaker, scene, packet features) and community ids, and the surface choice they select (layer: lexicon, grammar, discourse, phonology, orthography; a bounded descriptor and at most three bounded examples); introduced and retired by a profile revision | Added or retired by a profile revision, never edited; converted from `data/target-language-ontology/*.yaml`, which is deleted in the same cut so the YAML is not a second owner | The language's owner (the operator for her settings' languages) and accepted rounds; an ontology-minting call is assembled from Train items only, like an inventory-minting call, and its text is in the scorer's leak diagnostic. Selection is deterministic code (`select(profile, stance, speaker, scene)`); the lowerer realizes the selected choices and the trace lists their ids (`lowering-traced`) |
-| Community (cut `language-ontology`) | Key `community:<slug>`; type `weksa.community`, converted from `data/cultural-ontology/cultures/` and `referents/` (YAML deleted in the same cut) | Revised by commit; a speaker names the communities it belongs to by id | The cultural ontology's author (owner-attested evidence only; Discord-only content stays deleted, `discord-only-content-deleted`) |
+| Target profile | Locale or language-project id (`en-US`, `ja-JP`, a conlang's slug). Until entries grow in rounds there is no profile revision document: a run names the profile it lowered with by the ontology store's path and digest in its `RunRecord` (cut `language-ontology`); `profile:<language>:<n>` revision documents arrive with follow-up `language-ontology-growth` | The ontology store is revised by commit; a run pins it and refuses drift; it likewise pins the speaker-state store (`RunRecord` keys 17 and 18, `Drift(SpeakerState)`, cut `language-ontology-scene`) | Profile authors and accepted rounds; never the lowerer's defaults (`persona-drives-register`) |
+| Language ontology entry (cut `language-ontology`) | Key `onto:<language>:<n>`, `n` from 1 per language; type `weksa.ontology_entry` in `data/ontology/ontology.cc`: the language, the revision of the inventory it was admitted through (provenance: beds number revisions independently and a run reads each condition's feature at its own head), a layer (`Lexicon`, `Grammar`, `Discourse`, `Phonology`, `Orthography`, as the door spells them; the mint prompt ends with an `example` line serialized from the draft type itself), at most four conditions (a feature id of slot `Stance`, `Discourse` or `Scene` with `AtLeast`/`AtMost`/`AtMostOrUnset` a grade or `Is` an option or flag; a `Scene` condition reads the relation of the item's speaker to its addressee that `with_scene` selected; slot `Speaker` and community ids wait on follow-up `language-ontology-communities`), a choice of 1 to 200 bytes, at most three examples of 1 to 120 bytes, and an `Annotator`. Whether an entry's text keeps politeness on the scene is a model reader's judgment, owed per change (a mint owes it under `language-ontology-growth`), not a test | Admitted in all-or-nothing batches through `OntologyStore::admit`, immutable, never edited; retire arrives with `language-ontology-growth`. The run pins the store like the entity store (path and digest, `Drift(Ontology)`) and never writes it; slice 1 of growth is outside any run: `weksa loop mint-ontology` drafts entries from the run's Train items of one language into `<root>/ontology-mint/<digest>.answer`, `weksa ontology admit --ontology <copy>` admits them into a file copy, and a new run pins the copy (a run-owned copy waits on follow-up `language-ontology-growth`). Cut `language-ontology-seed` converts by drafting, not by parse: a fresh model drafts each language's seed from that language's YAML and the inventory's feature lines with no corpus text, then deletes `data/target-language-ontology/` and `.weksa/cultural-ontology/` in the same cut | Seed: a labelled model (`Annotator::Model`), no operator gate, never Test evidence (`ja-ontology-owner-answer`); attestation (operator, native reader) appends later. Accepted rounds later, through a mint call from Train items only. Selection is `ontology::select(ontology, language, view)`, called only inside `Prompt::lower`, so no caller picks entries; the prompt prints each selected entry's id, layer, choice and examples. Its text is minted text for the leak diagnostic, which today has no runtime caller (follow-up `leak-diagnostic-in-round`). The store was rebuilt without ja-JP `:14` and `:15` (above-status Scene entries; a paired measure found them net-negative on register, follow-up `ja-scene-entries-lower-register-agreement`), so ja-JP ends at `:13`: an above-status out-group addressee, and an above-status in-group addressee below intimacy 700, select no ja-JP Scene entry (`:12` still selects in-group at intimacy 700 or more regardless of status) until a native reader attests a replacement (`ja-native-reader-scenes`). ja-JP `:5`, `:7` and `:8` were revised by certainty and restraint `AtMostOrUnset` conditions (holds when the feature is unrated or at most the grade; `AtMost` still fails on an unrated feature) in a store rebuild (the store has no retire, so a conditions change is a rebuild), which makes ja-JP's hedging, certainty, affection, restraint and sadness entries disjoint on `:5`/`:6`, `:4`/`:7`, `:6`/`:7`, `:6`/`:8`, and ja-JP `:3` (anger) carries `AtMostOrUnset` hedge and affection bounds, as en-US `:3`, which makes `:3`/`:5` and `:3`/`:7` disjoint; en-US `:3` carries `AtMostOrUnset` hedge and affection bounds, `:5` an `AtMostOrUnset` certainty bound (the clause it held in prose) and `:8` one too (as ja-JP `:7`), which makes `:3`/`:5`, `:3`/`:8`, `:5`/`:6` and `:6`/`:8` disjoint, while `:6`/`:10` stay co-selectable and are kept apart by scoping in `:6`'s text; ja-JP `:9` was reworded in a rebuild to state its question ending as available, so `:6`/`:9`, `:5`/`:9` and `:3`/`:9` stay co-selectable and are reconciled by wording, not by condition |
+| Community (cut `language-ontology`, follow-up `language-ontology-communities`) | Key `community:<slug>`; type `weksa.community`, built fresh when the cut is mapped: `data/cultural-ontology/` (draft YAML profiles, read by no code) is deleted from main (cut 5e `delete-cultural-ontology`) and stays in git history before that cut's commit | Revised by commit; a speaker names the communities it belongs to by id | The cultural ontology's author (owner-attested evidence only; Discord-only content stays deleted, `discord-only-content-deleted`) |
 | Speaker (cut `speaker-scene`) | Key `speaker:<slug>@<n>`; type `weksa.speaker`: stable axes as feature values of slot `Speaker` (origin, socioeconomic standing, age cohort, education and whatever the loop adds), at an inventory revision, and an `Annotator` | A new revision appends, never edits; a corpus item and every prior turn name a speaker slug, and a round records the speaker revisions it read | The annotator it names: `PersonaSnapshot` (a projection of a `gamecult.persona_state.v0` document, naming its source document and `updatedAt`), `Operator`, `WorkMetadata` (a public-domain work's own cast list and narration), or `Model { family, generator }` (the 2b `ModelFamily`) |
-| Scene (cut `speaker-scene`) | Key `scene:<group>@<n>`, the item's split group; type `weksa.scene`: participants (speaker slugs) and, per ordered pair, relation features of slot `Scene` (relative status, intimacy, in-group, audience and whatever the loop adds), at an inventory revision, and an `Annotator` | As Speaker. Keyed by the group, so a scene never straddles the split | As Speaker |
-| Corpus item | Key `item:<source-slug>:<n>`, `n` canonical decimal >= 1 (no sign, no leading zero, from cut 2b); type `weksa.corpus_item` with text, language, speaker, split group, prior turns, source. Source `ModelWritten` carries a `ModelFamily` enum, the generator string as the fixture wrote it, and a prompt digest (cut 2b). The item carries no speaker state of its own: its speaker slug and group name the Speaker and Scene documents | Admitted once; the whole item is immutable (re-adding an identical item is a no-op, any difference is refused; a correction is a new item that `supersedes` the old); text already held under another key is refused unless the new item supersedes that key (cut 2b); withdrawn, never deleted, so old scores stay explainable | Importers and `weksa corpus add`, under `corpus-cast-plus-public-domain`; the source enum has no variant for Discord or any training-forbidden source (`corpus-clean`) |
+| Scene (cut `speaker-scene`) | Key `scene:<group>@<n>`, the item's split group; type `weksa.scene`: participants (speaker slugs) and, per ordered pair, relation features of slot `Scene` (relative status, intimacy, in-group, audience and whatever the loop adds), at an inventory revision (provenance; a run reads the features at its own head), and an `Annotator` | As Speaker. Keyed by the group, so a scene never straddles the split. `data/original/speaker-state.cc` holds Model-annotated keeper scenes, one per Train or Validation group of both languages (`weksa scene put|dump`); a Test group has none and reads `NoScene` | As Speaker; a model-annotated scene is never Test evidence |
+| Corpus item | Key `item:<source-slug>:<n>`, `n` canonical decimal >= 1 (no sign, no leading zero, from cut 2b); type `weksa.corpus_item` with text, language, speaker, split group, prior turns, source and who placed its name spans (`names_by`, an `Annotator`, absent when unrecorded; cut `pd-name-spans`). Source `ModelWritten` carries a `ModelFamily` enum, the generator string as the fixture wrote it, and a prompt digest (cut 2b). The item carries no speaker state of its own: its speaker slug and group name the Speaker and Scene documents | Admitted once; the whole item is immutable (re-adding an identical item is a no-op, any difference is refused; a correction is a new item that `supersedes` the old); text already held under another key is refused unless the new item supersedes that key (cut 2b); withdrawn, never deleted, so old scores stay explainable | Importers and `weksa corpus add`, under `corpus-cast-plus-public-domain`; the source enum has no variant for Discord or any training-forbidden source (`corpus-clean`) |
 | Split assignment | Derived: `split(scheme, item.group)` | Fixed for a scheme; a new scheme is a new constant, never a reassignment. A model-written item whose group derives test is in no split; a superseding item keeps its predecessor's group | The hash function. Nobody assigns by hand, so there is no writer to forbid |
-| Loop round | Key `run:<label>:round:<n>`; type `weksa.loop_round` with spec version, profile revisions, model ids and prompt digests, sampled train items, Validation means and refusal counts (from cut `ja-panel-loop`: one set per language of the run's panel, no pooled mean), the digest of the inventory file it was scored under and, for a cycle's candidate round, its cycle `k` | Scored and recorded whole; immutable. A candidate round is put in one batch with its Decision. Lives in the run store on Yggdrasil | `run::round` and `run::cycle` (both through `score_round`) |
-| Loop decision | Key `run:<label>:cycle:<k>`; type `weksa.loop_decision` with the base round and revision, the edit prompt's digest and Train keys, the editor's answer digest, the candidate revision, inventory digest and round, the base, candidate and floor readings (chrF, meaning, composite), the threshold and the verdict (Accepted, or Rejected for edit-parse, edit-admit, no-gain, regressed chrF, meaning or composite); digests and numbers, no text | Immutable. The latest Accepted one names the run's head inventory (`<root>/cycle-<k>/inventory.cc`, its candidate digest, its candidate round); with none the head is the copy `create` made at `<root>/inventory.cc`. Lives in the run store on Yggdrasil | `run::cycle`'s accept rule, `run::decide`: the validation composite gains more than max(noise floor, `LADDER_STEP`), no metric falls past max(its floor, one step), the composite does not fall past max(its floor, one step), and a non-finite reading rejects (the one regression test, `run::regression`); differences compared in billionths so a gain of exactly one step is a tie. From cut `ja-panel-loop` the readings, floor and threshold are kept per panel language and `run::regression` runs per language and is the one regression test (`decide` adds the gain test for a one-language panel): any language regressing rejects (verdicts `regressed-chrf`, `regressed-meaning`, `regressed-composite`), otherwise a one-language panel accepts as `decide` does and a panel of two or more accepts when the sum of composite deltas exceeds one `LADDER_STEP` (billionths). Given up: strict Pareto non-regression; a language may lose up to its own noise floor if the panel nets more than a step, because zero tolerance ratchets every base to a favourable noise draw and strangles the loop. Termination: each accept raises the composite sum by more than a step and composites lie in -0.5 to 1, so a run accepts at most 1.5 * languages / `LADDER_STEP` edits |
+| Loop round | Key `run:<label>:round:<n>`; type `weksa.loop_round` with spec version, profile revisions, model ids and prompt digests, sampled train items, Validation means and refusal counts (from cut `ja-panel-loop`: one set per language of the run's panel, no pooled mean), per-item Validation scores in corpus order (key 22, numbers only, no item key or text, private to `run.rs` for the paired floor of the cycle (rounds 1 to 4) and of relower; a run from before has none and opens), the digest of the inventory file it was scored under and, for a cycle's candidate round, its cycle `k` | Scored and recorded whole; immutable. A candidate round is put in one batch with its Decision. Lives in the run store on Yggdrasil | `run::round` and `run::cycle` (both through `score_round`) |
+| Loop decision | Key `run:<label>:cycle:<k>`; type `weksa.loop_decision` with the base round and revision, the edit prompt's digest and Train keys, the editor's answer digest, the candidate revision, inventory digest and round, the base, candidate and floor readings (chrF, meaning, composite; the floor is the paired floor of round 1 against rounds 2 to 4), the threshold and the verdict (Accepted, or Rejected for edit-parse, edit-admit, no-gain, regressed chrF, meaning or composite); digests and numbers, no text | Immutable. The latest Accepted one names the run's head inventory (`<root>/cycle-<k>/inventory.cc`, its candidate digest, its candidate round); with none the head is the copy `create` made at `<root>/inventory.cc`. Lives in the run store on Yggdrasil | `run::cycle`'s accept rule, `run::decide`: the validation composite gains more than max(noise floor, `LADDER_STEP`), no metric falls past max(its floor, one step), the composite does not fall past max(its floor, one step), and a non-finite reading rejects (the one regression test, `run::regression`); differences compared in billionths so a gain of exactly one step is a tie. From cut `ja-panel-loop` the readings, floor and threshold are kept per panel language and `run::regression` runs per language and is the one regression test (`decide` adds the gain test for a one-language panel): any language regressing rejects (verdicts `regressed-chrf`, `regressed-meaning`, `regressed-composite`), otherwise a one-language panel accepts as `decide` does and a panel of two or more accepts when the sum of composite deltas exceeds one `LADDER_STEP` (billionths). Given up: strict Pareto non-regression; a language may lose up to its own noise floor if the panel nets more than a step, because zero tolerance ratchets every base to a favourable noise draw and strangles the loop. Termination: each accept raises the composite sum by more than a step and composites lie in -0.5 to 1, so a run accepts at most 1.5 * languages / `LADDER_STEP` edits |
 | Score | Key `<lowering-key>:<metric>@<metric-version>`; type `weksa.score` | Immutable; a new metric version scores again under a new key | The scorer, deterministic given the metric version and the embedder's model id. Cut `scorer` computes scores as values; cut `golf-loop-en` stores them, because the lowering keys they hang from arrive with the loop. Lands with follow-up `golf-loop-score-docs`, in the round's directory; nothing in the cycle reads them |
 | Lowering trace | Key `lowering:<packet-key>:<profile>@<rev>:<lowerer-digest>:<sample>`; type `weksa.lowering` holding the surface text and its trace together | Immutable. A surface text cannot exist without its trace, because they are one record (`lowering-traced`) | The lowerer emits; the lowerer sees the packet without its `trace` (the input type has no such field), never the corpus item |
 | Conlang lexicon entry | Key `lex:<language>:<concept-id>`; root form, morphology class | Root placed at its concept's embedding when the concept first needs a form in that language; stable once accepted; diachrony derives later forms, it does not overwrite | The language project's owner: the operator for her settings' languages, the loop proposing roots for her review |
@@ -134,7 +134,7 @@ standing.** `gamecult.persona_state.v0` (Body facts) carries open trait maps
 So a `PersonaSnapshot` projects mood-like and relation-like values, and the
 stable axes the standard lacks are annotated. Whether the standard gains a
 typed speech-community reference or Weksa keeps the persona-to-community
-binding (`data/cultural-ontology/persona-stacks/`) is question `persona-speech-community-home` (recommended: a Weksa-owned
+binding (the deleted `data/cultural-ontology/persona-stacks/brokkr.yaml` was its one draft) is question `persona-speech-community-home` (recommended: a Weksa-owned
 binding; follow-up `persona-state-speech-community`), decided when
 `live-lowering` is mapped; the
 corpus path needs neither. Putting Weksa feature ids into the open
@@ -309,6 +309,27 @@ line two", "その　制御" against the
   or socioeconomic standing; `extensions` are non-authoritative by the
   schema's own description.
 
+- Probes of 2026-11-12 at `d9ebbcf` (map pass for cut 5): no code reads
+  `data/target-language-ontology/`, `data/cultural-ontology/` (since deleted) or
+  `.weksa/cultural-ontology/starter-targets.cc` (a third, typed copy of en,
+  ja-JP and pt-BR profiles); `README.md`, `docs/multilingual-utterance-lowering.md`,
+  `examples/cultcache-lowering/` and `prompts/nibu-cultcache-target-*.md` cite
+  them. `LoweringInput::with_scene` has no caller in `run.rs` or `main.rs`, the
+  run pins no `SpeakerStateStore`, and no Speaker or Scene document is committed
+  (`speaker-scene-seeds` open), so only the packet's `Stance` and `Discourse`
+  features reach a loop's lowering view. `score::leak_diagnostic` and
+  `TestReadings::at_checkpoint` take minted text as `&[&str]` and have no
+  caller outside tests: no round reads glosses or any minted text against
+  Validation. `data/daodejing/inventory.cc` is a revision prefix of
+  `data/original/inventory.cc` (revisions 1 to 4 equal, a test proves it; revs 5 and 6 add the bed's own lexicon); with `data/interlingua/inventory.cc` they share revision 1,
+  where features 6 to 8 (hedge, certainty grades, irony flag) sit in
+  `Discourse` and `Predication` and features 9 to 18 (anger to restraint,
+  grades) in `Stance`. `PROMPT_SOURCE_DIGEST` covers `context.rs`, `split.rs`,
+  `lower.rs` and `packet.rs`. 25 `RunPaths {` literals across `run.rs`,
+  `context.rs` doctests, `main.rs`, `tests/common/mod.rs`, `tests/golf_loop.rs`
+  and `tests/original_corpus.rs`; 10 `Prompt::lower(` calls. `huginn known`
+  timed out (Unavailable, 15 s deadline) twice this pass.
+
 ## Where things live and run (`rust-single-crate`, `loop-runs-on-yggdrasil`)
 
 - Code: one Cargo workspace at the repo root, one package `crates/weksa` (a
@@ -319,9 +340,14 @@ line two", "その　制御" against the
 - Stores: `data/interlingua/inventory.cc` and `data/corpus/corpus.cc` in the
   repo (small, reviewed with `weksa dump`); run stores (rounds, lowerings,
   scores) on Yggdrasil under the loop's state root, not in git.
-- The loop runs on Yggdrasil as a detached unit with a log and a status record.
-  Starfire runs none of it. Model calls go through a `ModelPort`; its first
-  adapter drives `claude -p` on the operator's subscription. Never OpenAI
+- The loop is a batch command driven from a Claude Code session on Yggdrasil
+  (`golf-loop-in-claude`), not a detached unit. Model calls go through a
+  `ModelPort` whose one adapter, `AnswerFiles`, writes a `.prompt` file and reads
+  a `.answer` file: Claude agents answer them, one fresh subagent per encode
+  prompt (`encoder-isolation-subagent-per-prompt`) and a tool-less relay for
+  lowering prompts (`lowerer-call-reach-toolless-relay`). Builds, stores, scoring
+  and embeddings run on Yggdrasil; Starfire runs none of it, and Weksa needs no
+  claude binary or token there. Never OpenAI
   (`eureka-body:ruling:no-return-to-openai-supplier`), never Discord data
   (`gamecult-chat:ruling:discord-taints-training`).
 
@@ -334,6 +360,252 @@ checkpoint the test-split composite is within the noise floor of validation.
 The test split is read only at checkpoints. Self then records the freeze, and
 the training set is the whole corpus re-encoded under the frozen revision.
 
+## Distil measure (`distil-slice`)
+
+A lowerer is compared on round n's Validation packets with the prompts
+byte-identical to the round's, by `weksa loop relower ROOT --round N --arm ARM
+--lowerer LABEL [--floor ARM2 --floor ARM3 --floor ARM4]`. Every arm is answered through the one prompt
+door (`RunStores::answer_files`, the Test-text guard); a tuned model is a script
+that reads `<digest>.prompt` and writes `<digest>.answer` in
+`<ROOT>/relower-<N>-<ARM>`, not a new adapter. The recorded reading is the
+round's own lowering, read over the same items as the arm. An item the round
+refused before admission (no packet) or at the lowering prompt has no prompt to
+ask: it is skipped, so the readings exclude it, and it is counted as `skipped=`
+on the line; `n` is the items read, so `recorded` can differ from the round's
+own Validation reading, which scores those items 0. An arm answer that is not a
+usable lowering scores 0 and counts in `unusable=`; the same for the floor arm,
+counted (over all floor arms) after `floor ... unusable=`. The floor needs three
+or more floor arms, each a prompted repeat of the recorded lowering on the same
+prompts: it is `FLOOR_Z` (3) standard errors of the mean per-item difference
+between the recorded lowering and a repeat, per metric, with the variances
+pooled over the arms (`paired_floor`; lowering-only noise, no encoder noise). The
+verdict is `decide_panel` over (recorded, arm, floor): Accepted is a composite
+gain past the noise of the panel's sum (the root of the languages' composite
+floors squared, at least one step), Rejected(Regressed) a loss past a language's
+floor, Rejected(NoGain) neither. The cycle's own floor is the same `paired_floor`
+(`floor_of`): round 1 (the recorded lowering, the head's establishing round)
+against rounds 2 to `FLOOR_ARMS_MIN` + 1 (prompted repeats under the run's first
+inventory), per panel language, from the rounds' per-item Validation scores. It
+is measured once per run and is the same after an accept; a run needs four
+`loop round` calls before its first `loop cycle`.
+Calibration (`runs/distil-base`, 8 prompted draws by one model family on
+identical prompts, no draw sharing more than 7 of 28 answers with another; 14
+en-US and 14 ja-JP Validation items; every base, candidate and 3-arm floor
+combination, 1120 trials from 28 unordered pairs; intervals bootstrap over
+draws, each degraded arm one fixed draw): a prompted repeat reads NoGain 92%
+(80 to 100), Regressed 8% (0 to 20), Accepted 0%, which with 28 pairs bounds
+false-accept only to about 10%; an all-"Yes." arm reads Regressed 100%; a mild
+degradation (one detail blurred per utterance) 100%; a subtler one 75% (50 to
+100), whose mean composite drop (0.044) sits under the mean floor (0.060).
+`FLOOR_Z` was chosen on this data (2.5 gives NoGain 84% and 93% on the subtler
+arm), so the rates are in-sample. Without the noise term in the gain test a
+prompted repeat reads Accepted in 40% of the trials.
+Power (can the rule Accept a real gain?): the only better arm that could be
+built without Test or Validation answers is a lowerer shown the Train sentences
+of the corpus (no packets, no Validation or Test text) as a register guide.
+Four such draws beat the prompted draws' mean composite in both languages (en-US
+0.742 to 0.759 to 0.795; ja-JP 0.559 to 0.578 to 0.620), so the premise that it is
+better is measured on the very Validation items the rule reads, not independent.
+Against the prompted bases with 3-arm floors the rule reads it Accepted in 29%
+of 1120 trials, NoGain 71%, Regressed 0%: a net gain of 0.079 against a mean
+noise term of 0.079. At 14 items per language the rule is therefore a low-power
+filter for a gain of this size; by 1/sqrt(n), about 35 or more items per
+language would bring the noise term near 0.05 (an extrapolation, not measured).
+### Validation growth (`validation-growth`, built and recalibrated)
+
+Power needs about 35 or more Validation items per language. `data/original`
+now holds 35 per language (it held 14; Train 14 and Test 8 are unchanged):
+42 model-written items, `item:vgrow:1..21` (en-US) and `item:vgrow-ja:1..21`
+(ja-JP), live Train+Validation 56 to 98. The slug is new on purpose: the
+`item:original:` prefix filter of `DIGEST_OF_THE_28` still selects the first 28
+and passes; `DIGEST_OF_THE_42` freezes the new prose.
+
+The split is derived from an item's group alone (`SplitScheme::V1`: FNV-1a of
+`weksa-split-v1:<group>` mod 100, under 40 Train, under 80 Validation, else
+Test). The names were chosen before any text existed: 90 candidate nouns per
+language, dropped by script when the group already existed or the noun
+occurred in a Test text, then the first 24 whose bucket fell in 40..=79 (the
+bucket came from `SplitScheme::V1` itself, cross-checked on the 72 existing
+items). Each language was written by three blind writer agents (8 nouns each,
+a brief of language, register note, noun and speech act, no Test text and no
+existing item), 24 texts per language written, the first 21 in name order
+admitted through `weksa corpus add`; each group is its own group. The scenes
+are `weksa scene put` documents (keeper to `unnamed`, inventory rev 4),
+annotated by a separate agent; a second annotator measured agreement only and
+is not committed.
+
+The writer is Claude (family Anthropic recorded): no cross-family generator was
+reachable from the body that ran this cut. The self-preference effect (a Claude
+lowerer favouring Claude prose, Panickssery et al. 2024) is therefore not
+measured. The writers' blindness is by brief content, not sandbox.
+
+Expect encode refusals: the existing 56 were written onto the Dao r3 concepts
+and the inventory was drafted from them, while the new items were written free
+of the inventory (question `validation-growth-vocabulary` stays open). Some new
+packets will be refused at encode (inventory coverage) and score 0 as the means
+do; they stay in the corpus. That is a result about inventory generalization,
+not a defect.
+
+Every calibration number in the Distil measure section above (92/0/8 prompted
+rates, the 29% power, the 0.079 noise term) is for the 14-item corpus and stays
+the stated baseline of that corpus.
+
+Recalibration on the grown corpus (`runs/growth-base`, main 44b66f9, panel
+en-US and ja-JP, round 1 recorded by briefed subagents; 6 prompted draws
+including the recorded one, 2 mild degradations, an all-"Yes." control and 4
+Train-guide draws by Claude sonnet-5-5; the same decision rule at FLOOR_Z 3 and
+3-arm floors; 120 prompted trials from the 30 ordered pairs of 6 draws with the
+other 4 as floor candidates, so trials share draws and are not independent).
+Soul pass `cut-validation-growth.s3` re-derived every number below; its
+findings shaped the wording.
+
+- Live Validation items: 28 en-US and 32 ja-JP of 35 each; 10 are refused at
+  parse (en-US original:18, 23, 25, 27 and vgrow:4, 5, 6; ja-JP original-ja:17,
+  22 and vgrow-ja:2); `relower` skips an item with no packet, so every reading
+  here is over live items only. Old 14: 10 en-US and 12 ja-JP live; new 21: 18
+  and 20.
+- Prompted repeat: NoGain 96.7%, Accepted 3.3%, Regressed 0% (14 items: 92 / 0 /
+  8). All four false accepts are one pair, base p6 and candidate the recorded
+  lowering R: R comes from the round, the other five draws from `relower`, and
+  in en-US R scores +0.024 per item above them [+0.002, +0.052], so R is not
+  exchangeable with a repeat (a Plausible Soul finding, cause not isolated). No
+  false-accept bound can be drawn from 6 draws.
+- Degraded arms read Regressed: all-"Yes." 100% (as before); mild-1 31.7%;
+  mild-2 0% (14 items: 100% and 75% on a subtler arm). The mild arms are weak
+  and not independent: they were rewritten from R with one detail blurred, the
+  original wording is not on disk, mild-2 equals R word for word in 5 of 60
+  items and mild-1 in 2, and mild-1 equals mild-2 in 27 of 60 although they
+  were asked to blur different details. Their mean composite is 0.003 to 0.015
+  below the prompted mean (the old subtler arm: 0.037 and 0.052). The
+  sensitivity to a small regression is not re-measured.
+- Noise: the panel noise term of the sum rule is 0.045 on average over the base
+  and floor choices (0.031 to 0.064), against 0.079 at 14 items. The 1/sqrt(n)
+  forecast (about 0.05) assumed per-item variance stayed the same; it did not:
+  the per-item SD of the difference between two prompted draws is about 0.085
+  on the old items and 0.034 on the new ones, so the pooled term landed near
+  the forecast because less variable items were added. Not a confirmation of
+  the forecast.
+- Power: the Train-guide arm (14 Train sentences as a register guide) is
+  Accepted in 21.2% of 240 trials, NoGain 78.8%, against 29% at 14 items, and
+  its mean composite gain over the prompted draws is 0.0185, 0.41 of the mean
+  noise term (0.37 on the first floor choice per base); with `relower`-only
+  bases (R removed) it is Accepted in 35% (28 of 80). Split by item class
+  (paired bootstrap over items, 95%): old items +0.029 [+0.005, +0.052] (en-US
+  +0.049 [+0.023, +0.084] on 10 items, ja-JP +0.013 [-0.021, +0.037] on 12);
+  new items -0.002 [-0.011, +0.007] pooled, but two opposite effects: en-US
+  -0.017 [-0.027, -0.007] on 18 items and ja-JP +0.011 [+0.001, +0.022] on 20.
+  So the old-versus-new contrast exists in en-US; in ja-JP old (+0.013) and new
+  (+0.011) do not differ. Measured: the 14-item gain does not carry to the new
+  en-US items. Inferred, not isolated: that it was in-sample register fit. The
+  new items differ from the old in several ways at once (written free of the
+  inventory, longer, a different scene convention, lower scores, a smaller
+  vocabulary overlap with Train in en-US: 0.29 against 0.52) and were briefed to
+  the same register as Train, by Claude as the old were. The 29% power figure
+  stays the stated baseline of the 14-item corpus; no better arm is known on
+  the new items, so the rule's power against a real gain is not re-measured.
+- The two classes are different strata (Soul s2 `register-stratum-shift`): the
+  new items score lower (composite 0.41 against 0.64 pooled) so a pooled
+  60-item mean mixes them; report old and new separately.
+- The self-preference effect is not measured (ruling
+  `validation-growth-writer-claude-checked`). The new scenes use a different
+  `in_group` convention from the old ones (follow-up
+  `vgrow-scene-in-group-convention`), so the new-item scores are for scenes that
+  will be re-annotated; the speaker-state store changes then (a run pins its
+  digest), the corpus does not.
+
+For `growth-base`, `weksa loop calibrate` (`docs/calibration.md`) reproduces from `run.rs`'s own
+scoring and accept rule the counts per class, the trial totals and the mean
+noise of this block: prompted 116 NoGain, 4 Accepted, 0 Regressed of 120;
+control-yes 60 of 60 Regressed, mild-1 19 of 60, mild-2 0 of 60; the
+Train-guide arm 51 Accepted, 189 NoGain, 0 Regressed of 240; noise 0.0451;
+items en-US n=28 skipped=7, ja-JP n=32 skipped=3. By class it adds: old items
+(`item:original*`) prompted 111/9/0, noise 0.1069, Train-guide 71 Accepted of
+240; new items (`item:vgrow*`) prompted 116/4/0, noise 0.0334, Train-guide 0
+Accepted and 74 Regressed of 240. The other figures of this block (35% with R
+removed, the noise range, the 0.0185 gain and 0.41 ratio, the bootstrap
+intervals, the per-item SDs, R's +0.024, the mild-arm duplicate counts and
+mean composite offsets, the Train-vocabulary overlap, the old/new class
+composites, the ten parse-refused item ids) were
+computed by scratch scripts outside git (Soul finding `evidence-outside-git`)
+and are not reproduced by the harness.
+
+Recalibration on the relabelled scenes (`runs/growth-scene`, main d8afc4a; same
+panel, 35 live items per language, 0 refused, 5 prompted draws including the
+recorded one R, 2 mild, 4 Train-guide). It is not a replacement for the
+`growth-base` block above and no delta against it is drawn: the item set, the
+packets and the scenes changed, and encode was redrawn (the 98 encode prompts
+are byte-identical to growth-base, no encode answer is; the refusals fell from
+10 to 0 on the redraw, not through the scenes, which reach only the lowering
+prompts). Soul `cut-calibrate-harness.s3` re-derived all 33 counts and 3 noise
+terms below from the per-item answers without calling `calibrate`; they match.
+
+Measured, and reproduced by `weksa loop calibrate` (trials: prompted 120, each
+mild 60, Train-guide 240; Accepted / NoGain / Regressed):
+
+| class | prompted | noise | mild-1 Regressed | mild-2 Regressed | Train-guide |
+|---|---|---|---|---|---|
+| all (35 per language) | 11/100/9 | 0.0392 | 51 | 58 | 85/35/120 |
+| old (14) | 0/105/15 | 0.0844 | 60 | 60 | 40/80/120 |
+| new (21) | 10/97/13 | 0.0340 | 3 | 4 | 50/129/61 |
+
+Measured by Soul scratch scripts outside git (not reproduced by the harness,
+except the R split in the first bullet, which `calibrate` prints as
+`prompted-r-candidate`, `prompted-r-base` and `prompted-r-free` since the
+`calibrate-report-r-involvement` cut; Soul re-ran growth-scene with it and the
+printed `all` lines read r-candidate 11/9/0, r-base 0/11/9, r-free 0/80/0, as
+below, in Accepted/NoGain/Regressed; likewise the per-arm Train-guide counts
+(`candidate=h1..h4`) and the mild arms' composite offsets from the prompted
+mean, R included (`offset`), which `calibrate` prints since
+`calibrate-arm-counts-and-mild-offsets` and which reproduce the figures below,
+Soul re-run on growth-scene):
+
+- Every one of the 11 false accepts has R as the candidate (bases
+  prompted-2, p4, p6); every one of the 9 false rejects has R as the base. The
+  80 trials without R read 0 Accepted and 0 Regressed in every class (95% upper
+  bound 4.5%). R scores above the other prompted draws (+0.012 en-US and +0.023
+  ja-JP on all items), so R is not exchangeable with a repeat.
+  Which of the two rates the live rule should be held to is undecided: the
+  live loop meets R as the head's establishing lowering, so the R-candidate
+  rate may be the real one for cycles, while the 80 R-free trials are the
+  exchangeable repeat rate; neither number stands for the other.
+- The old/new split of the false-accept lives only in the 20 trials where R is
+  the candidate, from 5 bases: new 10/20 [0.27, 0.73], old 0/20 [0.00, 0.17]
+  (Clopper-Pearson); by base 3 of 5 against 0 of 5 (Fisher p 0.17). The
+  10/120 against 0/120 comparison treats dependent trials as independent. The
+  claim that the new items drive the prompted false-accept is not supported;
+  the old items' larger noise term (2.4 times) raises their threshold, which
+  alone can produce the gap.
+- Mild arms: they overlap 8 of 35 answers (en-US) and 9 (ja-JP) over the limit
+  of 7. They do not degrade the new items (composite -0.004 en-US
+  [-0.021, +0.012], +0.013 ja-JP for mild-1, +0.005 for mild-2); the Regressed counts come from the old
+  en-US items (-0.072). The rule's sensitivity on the new items is unmeasured.
+- Train-guide pools unlike arms. h1 and h2 Regress in 120 of 120 trials; h3 and
+  h4 gain (Accepted 45 and 40 of 60); on the new items h3 is Accepted 50 of 60
+  and h4 0 of 60. The 35% pooled figure is not a power.
+
+Extrapolated only: the rule's power at 35 items against any real gain beyond
+h3 and h4, and any false-accept bound on repeat draws (5 draws, one of them R).
+
+### Smallest measurable distil slice (`distil-incontext`, not built)
+
+Distil is a tuned lowerer measured against the prompted one; the tuned model
+needs a host (follow-up `distil-host-question-owed`). The smallest slice that
+measures whether Train pairs buy a gain with the rule that exists is
+training-free: an in-context arm, the prompted lowerer given Train
+(packet, text) pairs as few-shot examples, answered through the one prompt door
+and read by `loop relower` against three prompted repeats. Parts: 12b's
+Train-only export (follow-up `distil-export-at-freeze`, guarded against Test
+text) as the few-shot source; the arm's directory of answers; the existing
+floor and verdict. A weaker version ran on 14 items: a lowerer shown the 28
+Train sentences (no packets) beat the prompted draws in both languages and the
+rule Accepted it in 29% of 1120 trials. The slice is decisive only with the
+Validation growth above: at 14 items it can only fail to reject. It decides the
+fine-tune question in one direction: if in-context Train pairs do not clear the
+floor at 35 items, a tuned model's gain over the prompted one is not
+measurable with this corpus either.
+
+Training pairs are Train only, at a frozen revision; the export is 12b.
+
 ## Lowerer first cut (`golf-loop-lowerer-cut`)
 
 Authority map for the smallest lowerer, written before its code (Imagination
@@ -403,16 +675,18 @@ One line per cut; specs exist for the cuts about to run (2d and 4, siblings on `
 4. `speaker-state`: packet `stance` (felt affect and restraint, slot `Stance`, packet schema v4); formality, warmth and intensity out of the seed and the standard; only `PacketStore::admit` yields a `LoweringInput`, and it refuses packets for withdrawn items (follow-up `lowering-input-from-packet-store`). (spec r1)
 4a. `speaker-relation-input`: slot `Scene` and its first seed features (`relative_status`, `intimacy`, `in_group`; inventory revision 3, now `speaker_scene_revision`); `LoweringInput::with_scene` carries the speaker's relation to the addressee as typed `Scene` feature values. Since 4b it takes the `SpeakerStateStore` and the `CorpusStore`, reads the scene of the view's own item group for the item's speaker, and selects the relation by the addressee referent's entity (V16 when the scene does not list the item's speaker or the speaker of any live item of the group, the rule `put_scene` applies too; V17 refuses an addressee that names a predication; V13 is retired). The English lowerer does not render it. (PR for follow-up `chat-s3352-3352`)
 4b. `speaker-scene` (spec r1; `speaker-scene-seeds` is its cut 4c: CLI, inventory revision 3, cast speakers and scenes; `Party::Unnamed` covers an addressee with no entity; Speaker and Scene share one `SpeakerStateStore`): slots `Speaker` and `Scene` with their seed features; `weksa.speaker` (`speaker:<entity-slug>@<n>`) and `weksa.scene` (`scene:<group>@<n>`, participants and ordered-pair relations) documents with `Annotator` `Operator` and `Model { family, generator }`, validated by the packet's shared feature check, append-only per key; their stores, `weksa speaker` and `weksa scene` commands, published schemas; Model-annotated cast speakers and scenes for the committed items. Waits on 2d and 4; `pd-speaker-annotation` blocks only the public-domain annotator. Part 1 landed (branch `weksa-lowering/speaker-scene`): `speaker.rs`, `SpeakerStateStore`, slots `Speaker` and `Scene` exclusive to their own feature lists, `speaker_scene_revision()` (Speaker features 22-24), `with_scene` on the store, schemas. The CLI, the committed inventory revision 3 and the seeds stay with 4c.
-5. `language-ontology`: `weksa.community` from `data/cultural-ontology/` (owns follow-up `edda-referent-yaml-parse`), `weksa.ontology_entry` for en-US and ja-JP from `data/target-language-ontology/` (YAML deleted), speaker communities, deterministic `select`, the lowering view (packet without trace, speaker, scene, selected entries). Waits on 4.
+5. `language-ontology`, in sequential cuts on `d9ebbcf`. 5a `language-ontology` (spec r1): `weksa.ontology_entry`, `OntologyStore`, `ontology::select` over the view's `Stance` and `Discourse` features, `Prompt::lower` printing the selected entries of the item's language, `RunRecord` pinning the ontology store (keys 15 and 16), `weksa ontology admit|dump`; `ontology.rs` joins `PROMPT_SOURCE_DIGEST`. 5b `language-ontology-seed` (spec r1, after 5a): Model-annotated en-US and ja-JP seed entries drafted by an isolated model, `data/target-language-ontology/`, `.weksa/cultural-ontology/` and `schemas/target-language-cultural-ontology.md` deleted. Lost until 5c': keigo, hierarchy and uchi-soto hang on the scene relation from 5c', so ja-JP politeness is still the lowerer's guess. 5c' `language-ontology-scene` (spec r1, after 5b): the run pins the `SpeakerStateStore` (keys 17 and 18, `Drift(SpeakerState)`), `RunStores::assembled` is the one door that reads the item's scene into a loop view, `select` reads slot `Scene`, `Prompt::lower` refuses a view whose scene was never read, `weksa scene put|dump` and `weksa inventory speaker-scene` (rev 4 in data/original and data/daodejing, rev 3 in data/interlingua, which holds no Dao revision), Model-annotated keeper scenes and Scene-conditioned entries for `data/original`. 5c `language-ontology-view-assembly` (follow-up, now only the Speaker read): `select` widens to slot `Speaker`; waits on `speaker-scene-seeds`. 5d `language-ontology-communities` (follow-up): `weksa.community` built fresh (`data/cultural-ontology/` is deleted by 5e), community ids on `weksa.speaker`, community conditions; waits on 5c and question `persona-speech-community-home`.
+5e. `delete-cultural-ontology` (steward ruling, 2026-11-13): `data/cultural-ontology/` (five draft YAML profile files and a README; `old-norse-edda-source-tradition.yaml` did not parse) deleted. Nothing in `crates/`, tests, scripts or CI read it; `examples/persona-lowering/brokkr-edda-voice/` cites its paths as text only (the one test that reads that example reads `lowered-output.yaml`). The typed `weksa.community` of follow-up `language-ontology-communities` is built fresh under cut 5; follow-up `edda-referent-yaml-parse` is moot.
 6. `pd-importer`: public-domain play and fiction dialogue into the corpus with speaker, scene group, edition provenance, and Speaker and Scene annotations by the ruled annotator. Waits on 4, follow-up `gutenberg-terms` and question `pd-speaker-annotation`.
+6a. `pd-name-spans` (spec r1): `weksa corpus import <work> <names>` mints a work's cast as `PublicDomain` entities with forms in the work's language and adds each line a name-span answer covers, speaker from the work file, spans from `[[entity|form]]` markup, labelled `names_by` (Model or Operator) per `docs/name-span-annotation.md`. Speaker and Scene documents, prior turns and fiction speaker attribution stay with 6.
 7a. `loop-context-builder`: `context.rs` (`TrainItems`, `EncoderOffer`, `Prompt`: corpus text reaches a model call only through `Prompt::mint` over live Train items or `Prompt::encode` over one offered item; instructions are the consts `MINT_INSTRUCTIONS` and `ENCODE_INSTRUCTIONS` in `context.rs`; `Checkpoint` has no public constructor, offers each item once, and its offers borrow it (the gate is typed `TestReadings` and Test offers on the round path; operator tools such as `weksa corpus dump` and `weksa score` still read corpus text of any split); prior turns print the held Train text), `SplitScheme::live`, `CorpusItem::cited_entities` (one owner of the id set `PacketStore::admit` and the offer share), and checkpoint-only Test readings (`Checkpoint`, `TestReadings`; `Aggregate` and `leak_diagnostic` carry no Test). Library only; since 7b `TrainItems::from_corpus` and `EncoderOffer::for_round` are crate-private and `RunStores` is their one public producer. Merges follow-ups `loop-context-builder-2` and `scorer-test-readings-type`. (spec r1)
 7b. `golf-loop-round` (spec r1; branch `weksa-lowering/golf-loop-round`): the smallest loop that scores one round. `run.rs`: `RunStores` pins the corpus and entity stores of a run by canonical path and FNV-1a 64 digest at `create`, reopens only from `<root>/run.cc` and refuses drift (corpus, entities, `PROMPT_SOURCE_DIGEST` of `context.rs`, a second pin on `lower.rs` retired in 7d, model, embedder); `round` encodes every live Train and Validation item through a `ModelPort` (`model.rs`; the one adapter `AnswerFiles` writes `<digest>.prompt` and reads `<digest>.answer`, so the model is the Claude session), reads each answer into a `PacketDraft` (`encode.rs`, the one place a model's JSON is read), admits through `PacketStore::admit` into `<root>/round-<n>/packets.cc`, lowers, scores once, and keeps a `RoundRecord` (`weksa.loop_round`, no text, no Test; Train rows, Validation only as means and refusal counts). `weksa loop open|round`. Not here: the spec-edit step, accept rule and composite, noise floor, Score and lowering documents, a subprocess adapter, the checkpoint door, a model lowerer (follow-ups `golf-loop-spec-edit`, `golf-loop-accept-rule`, `golf-loop-score-documents`, `golf-loop-subprocess-adapter`, `golf-loop-checkpoint-door-bound`, `golf-loop-model-lowerer`). `packet-store-inventory-binding` is met for loop packets only (`RunStores` admits with the run's inventory); `validate`, `packet proof|dao` and `lower` still take caller stores. Waits on 7a, `checkpoint-gate`, 4b.
-7c. `golf-loop-edit-accept` (spec r1; branch `weksa-lowering/golf-loop-edit-accept`): one edit-accept cycle. The run works on its own copy of the inventory (`create` copies the caller's file to `<root>/inventory.cc`, refusing a root that already holds a file of that name, and pins its digest as `RunRecord` key 11; `RunRecord.inventory` is provenance; a `run.cc` from before has no key 11 and does not open); the head is derived from the latest Accepted `Decision`. `weksa loop cycle` asks the editor for one inventory edit from `Prompt::mint(train, inventory, rev, feedback)` (Train blocks, the inventory listing and an `EditFeedback` line: whether the last edit was kept and the head's Validation composite rounded to `LADDER_STEP`, the Ladder release of Blum and Hardt 2015), reads it as an `EditDraft` (`encode.rs`; ids and revisions are the store's, `into_revision`), admits it through `InventoryStore::admit_revision` into `<root>/cycle-<k>/inventory.cc`, runs a candidate round under it, and `decide`s on Validation against the head's establishing round past a floor measured as the spread between rounds 1 and 2 (never under one `LADDER_STEP`). An edit that fails is a rejected `Decision`, not an error. `RoundRecord` gains keys 16 (inventory digest) and 17 (cycle); an encode answer that is not UTF-8 is that item's parse refusal. Not here: Score and lowering documents (`golf-loop-score-docs`), Train rows in the edit prompt (`golf-loop-edit-train-feedback`), a paired floor (`golf-loop-paired-floor`), the checkpoint door and merging to `data/` (`golf-loop-checkpoint-door-bound`, `golf-loop-freeze-merge`), a model lowerer (`golf-loop-model-lowerer-next`; until it lands an entry an edit adds has no lowering row, so a cycle gains only by retiring entries or adding ones the encoder does not cite). Waits on 7b.
-7d. `golf-loop-model-lowerer` (spec r1; branch `weksa-lowering/golf-loop-model-lowerer`): the round lowers through the `ModelPort`. `Prompt::lower` (`context.rs`) takes a `LoweringInput` (no text, key, group or speaker getter), the inventory at the view's revision and the en-US entity forms, and prints `LOWER_INSTRUCTIONS`, the meaning of the packet, the entities line and the inventory listing; the item key goes only to `item_keys`. The answer is `{"text"}`, read as `LoweringDraft` in `encode.rs`, held in `score_round`'s locals and scored once; it is never put in `run.cc`, a `RoundRecord`, a `Decision` or `EditFeedback`. A round has two answer phases (every encode prompt, then every lowering prompt), all or nothing: while any prompt is unanswered `packets.cc` is discarded and nothing reaches `run.cc`. `lower::lower` and the template table leave the loop (they remain `weksa lower`'s; follow-up `table-retirement`), so an entry an edit adds can be said and a cycle can buy a gain. One source pin remains: `PROMPT_SOURCE_DIGEST` covers `context.rs`, `split.rs` and `lower.rs` (`RunRecord` key 7 and `RoundRecord` key 3 are retired). The run's record pins `LowererReach` (`weksa loop open --lowerer-reach briefed-subagent|tool-less-relay`, `RunRecord` key 12) and every printed round and cycle line says it; a briefed-subagent run says its numbers are smoke-round only (rulings `lowerer-call-reach-toolless-relay`, `dao-round-seed-inventory`). A lowering is refused at `Lower` when blank, over `MAX_LOWERING_BYTES` (4096) or holding a control character other than a line break or tab; `PROMPT_SOURCE_DIGEST` also covers `packet.rs`. Not here: per-item lowering text documents (`golf-loop-score-docs`), the subprocess adapter. Waits on 7c.
-7. `golf-loop-en` (7b and 7c landed the round, `ModelPort`, encoder prompt, template digest, round records and the edit-accept cycle; the rest remains): the packet store bound to one inventory store everywhere (`packet-store-inventory-binding`), a subprocess adapter, Score documents, `weksa score` in the loop, the detached unit on Yggdrasil. Waits on 3, 5, 6 and follow-up `claude-on-yggdrasil`.
+7c. `golf-loop-edit-accept` (spec r1; branch `weksa-lowering/golf-loop-edit-accept`): one edit-accept cycle. The run works on its own copy of the inventory (`create` copies the caller's file to `<root>/inventory.cc`, refusing a root that already holds a file of that name, and pins its digest as `RunRecord` key 11; `RunRecord.inventory` is provenance; a `run.cc` from before has no key 11 and does not open); the head is derived from the latest Accepted `Decision`. `weksa loop cycle` asks the editor for one inventory edit from `Prompt::mint(train, inventory, rev, feedback)` (Train blocks, the inventory listing and an `EditFeedback` line: whether the last edit was kept and the head's Validation composite rounded to `LADDER_STEP`, the Ladder release of Blum and Hardt 2015), reads it as an `EditDraft` (`encode.rs`; ids and revisions are the store's, `into_revision`), admits it through `InventoryStore::admit_revision` into `<root>/cycle-<k>/inventory.cc`, runs a candidate round under it, and `decide`s on Validation against the head's establishing round past a floor (never under one `LADDER_STEP`; from cut `cycle-floor-paired` the paired floor over rounds 1 to `FLOOR_ARMS_MIN` + 1, so a cycle needs four recorded rounds, where 7c measured the spread between rounds 1 and 2). An edit that fails is a rejected `Decision`, not an error. `RoundRecord` gains keys 16 (inventory digest) and 17 (cycle); an encode answer that is not UTF-8 is that item's parse refusal. Not here: Score and lowering documents (`golf-loop-score-docs`), Train rows in the edit prompt (`golf-loop-edit-train-feedback`), a paired floor (`golf-loop-paired-floor`), the checkpoint door and merging to `data/` (`golf-loop-checkpoint-door-bound`, `golf-loop-freeze-merge`), a model lowerer (landed as 7d: until then an entry an edit added had no lowering row). Waits on 7b.
+7d. `golf-loop-model-lowerer` (spec r1; branch `weksa-lowering/golf-loop-model-lowerer`): the round lowers through the `ModelPort`. `Prompt::lower` (`context.rs`) takes a `LoweringInput` (no text, key, group or speaker getter), the item's speaker id, the inventory at the view's revision and the item language's entity forms, and prints `LOWER_INSTRUCTIONS`, the meaning of the packet, the entities line and the inventory listing; the item key goes only to `item_keys`, and the speaker id never prints: a referent citing the item's speaker holds the fixed token `entity:speaker` (`SPEAKER_TOKEN`, a constant the same for every speaker and item, never derived from an id) and the entities map holds the speaker's forms under that token. The promise guards the id that names an entity of this item; the speaker's forms and the role token do print, because forms are shared by every item of the language (follow-up `speaker-alias-token-in-lowering-prompt`, which restored the lowerer's ability to name its speaker after #84 removed it). A speaker the language has no form for, or the port lacks, does not refuse: its referents print no entity and the map has no entry. A referent citing the real id `entity:speaker` is refused (`LowerError::SpeakerTokenTaken`); the entity store does not reserve it. The answer is `{"text"}`, read as `LoweringDraft` in `encode.rs`, held in `score_round`'s locals and scored once; it is never put in `run.cc`, a `RoundRecord`, a `Decision` or `EditFeedback`. A round has two answer phases (every encode prompt, then every lowering prompt), all or nothing: while any prompt is unanswered `packets.cc` is discarded and nothing reaches `run.cc`. `lower::lower` and the template table leave the loop (they remain `weksa lower`'s; follow-up `table-retirement`), so an entry an edit adds can be said and a cycle can buy a gain. One source pin remains: `PROMPT_SOURCE_DIGEST` covers `context.rs`, `split.rs` and `lower.rs` (`RunRecord` key 7 and `RoundRecord` key 3 are retired). The run's record pins `LowererReach` (`weksa loop open --lowerer-reach briefed-subagent|tool-less-relay`, `RunRecord` key 12) and every printed round and cycle line says it; a briefed-subagent run says its numbers are smoke-round only (rulings `lowerer-call-reach-toolless-relay`, `dao-round-seed-inventory`). A lowering is refused at `Lower` when blank, over `MAX_LOWERING_BYTES` (4096) or holding a control character other than a line break or tab; `PROMPT_SOURCE_DIGEST` also covers `packet.rs`. Not here: per-item lowering text documents (`golf-loop-score-docs`), the subprocess adapter. Waits on 7c.
+7. `golf-loop-en` (7b, 7c and 7d landed the round, `ModelPort` with `AnswerFiles`, encoder and lowering prompts, template digest, round records and the edit-accept cycle; the rest remains): the packet store bound to one inventory store everywhere (`packet-store-inventory-binding`), Score documents (`golf-loop-score-docs`, `golf-loop-score-documents`), the accept rule (`golf-loop-accept-rule`), the checkpoint door and freeze merge (`golf-loop-checkpoint-door-bound`, `golf-loop-freeze-merge`). No subprocess adapter and no detached unit: `golf-loop-in-claude` and `encoder-isolation-subagent-per-prompt` rule them out. Waits on 3, 5 and 6.
 8. `style-axis`: a style-embedding score behind the scorer port. Waits on 3.
 9. `ja-panel`: ja-JP into the loop's panel, in two cuts on `e9cbd9b`. 9a `ja-panel-loop` (spec r1): language is the item's and the panel the run's: `Prompt::lower` takes the item's language and prints it on a language line (no prompt names English), entity forms are read in that language, `RunRecord` pins the panel (`weksa loop open --panel`), offers, mint and recall read only panel items, round means, floors and readings are per panel language, the accept rule runs `decide` per language, the recall split works on unspaced scripts, and `weksa corpus add` has no default language. 9b `ja-panel-corpus` (spec r1, after 9a): the ja-JP slice of `data/original`, model-written Japanese Train and Validation passages and eight Aozora Bunko public-domain Test sentences with full provenance, and their entities. Cut 5 is not a prerequisite: neither language lowers with ontology entries until cut 5 gives both theirs.
 10. `conlang-lexicon`: the first conlang's lexicon placed at concept embeddings, its morphology data, its ontology entries and the gloss reader. Waits on 3, 5 and question `first-conlang`.
 11. `convergence-freeze`: the convergence test, `Checkpoint`'s one door (built from the convergence window over the persisted round records), the freeze, the re-encode into training pairs. Waits on 7, 9 and 10.
-12. `distil`: fine-tune a lowerer on the frozen training set. Waits on 11 and a host question asked then.
+12. `distil`, three cuts. 12a `distil-slice` (relower and the prompted baseline; spec r1). 12b `distil-export`: Train-only prompt/completion JSONL at a frozen revision, Test-text guarded (follow-up `distil-export-at-freeze`); waits on 11. 12c `distil-train`: waits on 12b and the host question (follow-up `distil-host-question-owed`).
 13. `live-lowering`: agents emit packets with stance; Weksa reads speaker state from persona state (follow-up `persona-state-speech-community`) and lowers for the reader. Waits on 11.
diff --git a/docs/targets/interlingua-lowering.md b/docs/targets/interlingua-lowering.md
index 54bf512..a39963d 100644
--- a/docs/targets/interlingua-lowering.md
+++ b/docs/targets/interlingua-lowering.md
@@ -25,8 +25,8 @@ ground truth is Discord text, which can never feed this loop
 
 An agent's outward speech today is English text the model chose, so meaning,
 register and voice are fused in one string nobody can inspect or re-target.
-Weksa's design already separates them: the packet owns meaning, the target
-profile owns address, politeness and forbidden flattenings, the lowerer owns
+Weksa's design already separates them: the packet owns meaning, speaker and scene state own address and politeness
+(the language ontology holds only per-language lexicon, grammar and discourse choices), the lowerer owns
 surface text and a trace. The campaign makes that design real for a live
 reader, and gives Weksa's Persona a working body when her mind
 (`eureka-body:follow_up:weksa-mind`) wakes.
diff --git a/examples/cultcache-lowering/README.md b/examples/cultcache-lowering/README.md
index 4a786a0..ed4e037 100644
--- a/examples/cultcache-lowering/README.md
+++ b/examples/cultcache-lowering/README.md
@@ -1,11 +1,8 @@
 # CultCache Lowering Examples
 
-These examples lower interlingua packets through CultCache cultural ontology
-profiles rather than the older YAML-only target-language profiles.
-
-The starter database is:
-
-- `.weksa/cultural-ontology/starter-targets.cc`
+These examples lower interlingua packets for separate target languages. The
+language ontology that owns en-US and ja-JP choices is `data/ontology/ontology.cc`
+(`weksa ontology dump`); its entries are model-drafted seeds.
 
 Each target file is produced as a separate agent run so differences in target
 ontology remain inspectable instead of being smoothed into one multilingual
diff --git a/examples/cultcache-lowering/nibu-proof-001/README.md b/examples/cultcache-lowering/nibu-proof-001/README.md
index 4bb85be..67661ca 100644
--- a/examples/cultcache-lowering/nibu-proof-001/README.md
+++ b/examples/cultcache-lowering/nibu-proof-001/README.md
@@ -8,10 +8,6 @@ Prompt:
 
 - `prompts/nibu-cultcache-target-lowering.md`
 
-CultCache profile store:
-
-- `.weksa/cultural-ontology/starter-targets.cc`
-
 Expected target outputs:
 
 - `pt-BR-vanilla-brazilian.yaml`
diff --git a/examples/cultcache-lowering/nibu-proof-001/en-transatlantic.yaml b/examples/cultcache-lowering/nibu-proof-001/en-transatlantic.yaml
index 8d4667e..3484adf 100644
--- a/examples/cultcache-lowering/nibu-proof-001/en-transatlantic.yaml
+++ b/examples/cultcache-lowering/nibu-proof-001/en-transatlantic.yaml
@@ -1,7 +1,6 @@
 schema_version: weksa.utterance_lowering.agent_run.v0
 source_packet_id: nibu-proof-001
 source_packet_ref: examples/english-lowering/nibu-proof-001/interlingua.yaml
-target_profile_ref: .weksa/cultural-ontology/starter-targets.cc
 target_profile_id: weksa.cultural_ontology.en.transatlantic.v0
 target_agent_id: nibu
 realization:
@@ -11,8 +10,6 @@ realization:
     locale: en-001
     script: Latn
     register: cultivated transatlantic English; cross-Atlantic intelligibility; measured technical warning
-    cultural_ontology_refs:
-      - .weksa/cultural-ontology/starter-targets.cc
     cultural_ontology_profile_ids:
       - weksa.cultural_ontology.en.transatlantic.v0
   outputs:
diff --git a/examples/cultcache-lowering/nibu-proof-001/ja-JP-kanto-contemporary.yaml b/examples/cultcache-lowering/nibu-proof-001/ja-JP-kanto-contemporary.yaml
index 10a706e..4e88905 100644
--- a/examples/cultcache-lowering/nibu-proof-001/ja-JP-kanto-contemporary.yaml
+++ b/examples/cultcache-lowering/nibu-proof-001/ja-JP-kanto-contemporary.yaml
@@ -1,7 +1,6 @@
 schema_version: weksa.utterance_lowering.agent_run.v0
 source_packet_id: nibu-proof-001
 source_packet_ref: examples/english-lowering/nibu-proof-001/interlingua.yaml
-target_profile_ref: .weksa/cultural-ontology/starter-targets.cc
 target_profile_id: weksa.cultural_ontology.ja-JP.kanto.contemporary.v0
 target_agent_id: nibu
 realization:
@@ -11,8 +10,6 @@ realization:
     locale: ja-JP
     script: Jpan
     register: contemporary Kanto metropolitan clipped hazard warning
-    cultural_ontology_refs:
-      - .weksa/cultural-ontology/starter-targets.cc
     cultural_ontology_profile_ids:
       - weksa.cultural_ontology.ja-JP.kanto.contemporary.v0
   outputs:
diff --git a/examples/cultcache-lowering/nibu-proof-001/pt-BR-vanilla-brazilian.yaml b/examples/cultcache-lowering/nibu-proof-001/pt-BR-vanilla-brazilian.yaml
index 7c0788f..bc05339 100644
--- a/examples/cultcache-lowering/nibu-proof-001/pt-BR-vanilla-brazilian.yaml
+++ b/examples/cultcache-lowering/nibu-proof-001/pt-BR-vanilla-brazilian.yaml
@@ -1,7 +1,6 @@
 schema_version: weksa.utterance_lowering.agent_run.v0
 source_packet_id: nibu-proof-001
 source_packet_ref: examples/english-lowering/nibu-proof-001/interlingua.yaml
-target_profile_ref: .weksa/cultural-ontology/starter-targets.cc
 target_profile_id: weksa.cultural_ontology.pt-BR.vanilla_brazilian.v0
 target_agent_id: nibu
 realization:
@@ -11,8 +10,6 @@ realization:
     locale: pt-BR
     script: Latn
     register: casual_clear
-    cultural_ontology_refs:
-      - .weksa/cultural-ontology/starter-targets.cc
     cultural_ontology_profile_ids:
       - weksa.cultural_ontology.pt-BR.vanilla_brazilian.v0
   outputs:
diff --git a/examples/multilingual-lowering/nibu-proof-001/realizations.yaml b/examples/multilingual-lowering/nibu-proof-001/realizations.yaml
index 7ac410d..e8c8080 100644
--- a/examples/multilingual-lowering/nibu-proof-001/realizations.yaml
+++ b/examples/multilingual-lowering/nibu-proof-001/realizations.yaml
@@ -22,7 +22,7 @@ realizations:
       script: Latn
       register: sharp technical casual
       cultural_ontology_refs:
-        - data/target-language-ontology/en-US.yaml
+        - data/ontology/ontology.cc
     outputs:
       visible_action: The cockpit lights snap from amber to surgical white around the damaged control.
       spoken_text: "Take your hand off that control unless you want your nervous system to become my least useful circuit diagram."
@@ -52,8 +52,6 @@ realizations:
       locale: pt-BR
       script: Latn
       register: direct technical casual
-      cultural_ontology_refs:
-        - data/target-language-ontology/pt-BR.yaml
     outputs:
       visible_action: As luzes do cockpit passam de âmbar para branco cirúrgico ao redor do controle danificado.
       spoken_text: "Tira a mão desse controle, a não ser que você queira transformar o seu sistema nervoso no meu diagrama de circuitos menos útil."
@@ -90,7 +88,7 @@ realizations:
       script: Jpan
       register: sharp technical plain
       cultural_ontology_refs:
-        - data/target-language-ontology/ja-JP.yaml
+        - data/ontology/ontology.cc
     outputs:
       visible_action: 損傷した制御盤の周囲で、操縦室の灯りが琥珀色から外科灯のような白へ切り替わる。
       spoken_text: "その制御盤から手を離して。神経系を、私のいちばん役に立たない回路図にしたくないなら。"
diff --git a/examples/persona-lowering/brokkr-edda-voice/README.md b/examples/persona-lowering/brokkr-edda-voice/README.md
index 7c0a4b7..6dd7b71 100644
--- a/examples/persona-lowering/brokkr-edda-voice/README.md
+++ b/examples/persona-lowering/brokkr-edda-voice/README.md
@@ -7,7 +7,7 @@ referent without falling into generic fantasy-smith voice.
 The test is deliberately small: one interlingua packet, one rendered utterance,
 and one trace naming the activated cultural ontology axes.
 
-Profile stack:
+Profile stack (these files were deleted from main by cut `delete-cultural-ontology`; they remain in git history before that commit, and the paths below are kept as the fixture's record of what it cited):
 
 - `data/cultural-ontology/persona-stacks/brokkr.yaml`
 - `data/cultural-ontology/referents/old-norse-edda-source-tradition.yaml`
diff --git a/examples/persona-lowering/brokkr-edda-voice/interlingua.yaml b/examples/persona-lowering/brokkr-edda-voice/interlingua.yaml
index 9772f2e..a8670a1 100644
--- a/examples/persona-lowering/brokkr-edda-voice/interlingua.yaml
+++ b/examples/persona-lowering/brokkr-edda-voice/interlingua.yaml
@@ -1,6 +1,7 @@
 schema_version: weksa.persona_lowering_fixture_batch.v0
 fixture_id: brokkr-edda-voice
 speaker_id: brokkr
+# The data/cultural-ontology files cited below were deleted from main (cut delete-cultural-ontology); see git history.
 cultural_stack_ref: data/cultural-ontology/persona-stacks/brokkr.yaml
 target_register:
   language: en-US
diff --git a/examples/persona-lowering/brokkr-edda-voice/lowering-trace.yaml b/examples/persona-lowering/brokkr-edda-voice/lowering-trace.yaml
index 2e5a388..82d6610 100644
--- a/examples/persona-lowering/brokkr-edda-voice/lowering-trace.yaml
+++ b/examples/persona-lowering/brokkr-edda-voice/lowering-trace.yaml
@@ -1,6 +1,7 @@
 schema_version: weksa.persona_culture_lowering_trace.v0
 fixture_id: brokkr-edda-voice
 item_id: command-without-receipt
+# The data/cultural-ontology files cited below were deleted from main (cut delete-cultural-ontology); see git history.
 profile_stack:
   - profile_id: weksa.cultural_referent.old_norse_edda_source_tradition.v0
     ref: data/cultural-ontology/referents/old-norse-edda-source-tradition.yaml
diff --git a/prompts/nibu-cultcache-target-critic.md b/prompts/nibu-cultcache-target-critic.md
index c339739..698d38b 100644
--- a/prompts/nibu-cultcache-target-critic.md
+++ b/prompts/nibu-cultcache-target-critic.md
@@ -10,8 +10,6 @@ You are reviewing one target lowering produced from the Nibu interlingua packet.
   `examples/english-lowering/nibu-proof-001/projected-context.yaml`
 - Lowering prompt:
   `prompts/nibu-cultcache-target-lowering.md`
-- CultCache profile store:
-  `.weksa/cultural-ontology/starter-targets.cc`
 
 The source meaning is:
 
diff --git a/prompts/nibu-cultcache-target-lowering.md b/prompts/nibu-cultcache-target-lowering.md
index d044169..512d257 100644
--- a/prompts/nibu-cultcache-target-lowering.md
+++ b/prompts/nibu-cultcache-target-lowering.md
@@ -24,20 +24,10 @@ text. Lower from the interlingua packet and projected context.
 
 ## Cultural Ontology Authority
 
-Use the CultCache store:
-
-- `.weksa/cultural-ontology/starter-targets.cc`
-
-It contains:
-
-- `weksa.cultural_ontology.pt-BR.vanilla_brazilian.v0`
-- `weksa.cultural_ontology.en.transatlantic.v0`
-- `weksa.cultural_ontology.ja-JP.kanto.contemporary.v0`
-
-Qdrant-style retrieval and old YAML profiles may be useful context, but the
-CultCache profile named in your task is the target authority. Treat the target
-profile as draft guarded typed state: preserve its activation gates, forbidden
-flattenings, and nested linguistic affordance feature IDs in your trace.
+The language ontology is `data/ontology/ontology.cc` (`weksa ontology dump`).
+It holds model-drafted seed entries for en-US and ja-JP only; there is no
+pt-BR entry yet. Treat an entry as a draft: say in your trace which entries you
+used, and when no entry covers the target, say so rather than inventing one.
 
 ## Output Contract
 
@@ -50,8 +40,6 @@ The file must use this shape:
 schema_version: weksa.utterance_lowering.agent_run.v0
 source_packet_id: nibu-proof-001
 source_packet_ref: examples/english-lowering/nibu-proof-001/interlingua.yaml
-target_profile_ref: .weksa/cultural-ontology/starter-targets.cc
-target_profile_id:
 target_agent_id: nibu
 realization:
   realization_id:
@@ -60,10 +48,6 @@ realization:
     locale:
     script:
     register:
-    cultural_ontology_refs:
-      - .weksa/cultural-ontology/starter-targets.cc
-    cultural_ontology_profile_ids:
-      - 
   outputs:
     visible_action:
     spoken_text:
diff --git a/schemas/README.md b/schemas/README.md
index 6de8179..7e0350a 100644
--- a/schemas/README.md
+++ b/schemas/README.md
@@ -23,9 +23,6 @@ them.
 - [utterance-lowering-packet.md](./utterance-lowering-packet.md): shared packet
   contract for lowering interlingua and projected speaker context into one or
   more target-language utterance realizations.
-- [target-language-cultural-ontology.md](./target-language-cultural-ontology.md):
-  contract for the address, politeness, register, idiom, metaphor, script, and
-  forbidden-flattening profiles consumed by target lowerers.
 - [cultural-ontology-profile.md](./cultural-ontology-profile.md): nested
   CultCache profile contract for cultural ontology, including typed salience
   axes, linguistic affordance feature records, evidence, activation gates, and
diff --git a/schemas/cultnet/weksa.corpus_item.schema.json b/schemas/cultnet/weksa.corpus_item.schema.json
index 1bd6083..3eba155 100644
--- a/schemas/cultnet/weksa.corpus_item.schema.json
+++ b/schemas/cultnet/weksa.corpus_item.schema.json
@@ -24,6 +24,17 @@
         "$ref": "#/$defs/NameSpan"
       }
     },
+    "names_by": {
+      "description": "Who placed `names`: the annotator of the intake that wrote them. `None`\nwhen nothing records one (the cast seeds, `weksa corpus add`, the Dao De\nJing bed); it labels the spans, never the line or its speaker.",
+      "anyOf": [
+        {
+          "$ref": "#/$defs/Annotator"
+        },
+        {
+          "type": "null"
+        }
+      ]
+    },
     "prior_turns": {
       "type": "array",
       "items": {
@@ -63,6 +74,41 @@
     "names"
   ],
   "$defs": {
+    "Annotator": {
+      "description": "Who annotated a document. A model's generator is an attestation string, held\nto the same form as every provenance string.",
+      "oneOf": [
+        {
+          "type": "string",
+          "enum": [
+            "Operator"
+          ]
+        },
+        {
+          "type": "object",
+          "properties": {
+            "Model": {
+              "type": "object",
+              "properties": {
+                "family": {
+                  "$ref": "#/$defs/ModelFamily"
+                },
+                "generator": {
+                  "type": "string"
+                }
+              },
+              "required": [
+                "family",
+                "generator"
+              ]
+            }
+          },
+          "additionalProperties": false,
+          "required": [
+            "Model"
+          ]
+        }
+      ]
+    },
     "EntityId": {
       "type": "string",
       "pattern": "^entity:[a-z0-9]([a-z0-9-]{0,46}[a-z0-9])?$"
diff --git a/schemas/cultnet/weksa.loop_round.schema.json b/schemas/cultnet/weksa.loop_round.schema.json
index a9e79df..0ececc4 100644
--- a/schemas/cultnet/weksa.loop_round.schema.json
+++ b/schemas/cultnet/weksa.loop_round.schema.json
@@ -1,7 +1,7 @@
 {
   "$schema": "https://json-schema.org/draft/2020-12/schema",
   "title": "RoundRecord",
-  "description": "One scored round. It holds no text and no Test reading: per-item rows for\nTrain only, Validation only as means and refusal counts by stage. Only\n`run::round` builds one.\n\n```\nfn f(r: &weksa::run::RoundRecord) -> u32 { r.n() }\n```\n\nEvery field is given, so the literal below fails only on privacy; its twin\nis the same literal in the unit test `a_round_record_literal_compiles_in_the_lib`.\n\n```compile_fail,E0451\nuse weksa::run::RoundRecord;\nfn f() -> RoundRecord {\n    RoundRecord {\n        n: 1,\n        inventory_rev: 1,\n        prompt_digest: String::new(),\n        corpus_digest: String::new(),\n        entity_digest: String::new(),\n        model: String::new(),\n        embedder: String::new(),\n        chrf_version: String::new(),\n        calls: vec![],\n        train: vec![],\n        inventory_digest: String::new(),\n        cycle: None,\n        admit_rules: vec![],\n        parse_reasons: vec![],\n        own_family: 0,\n        languages: vec![],\n    }\n}\n```",
+  "description": "One scored round. It holds no text and no Test reading: per-item rows for\nTrain only; Validation as means and refusal counts by stage, and as\nper-item scores (numbers only, private to this module). Only `run::round`\nbuilds one.\n\n```\nfn f(r: &weksa::run::RoundRecord) -> u32 { r.n() }\n```\n\nEvery field is given, so the literal below fails only on privacy; its twin\nis the same literal in the unit test `a_round_record_literal_compiles_in_the_lib`.\n\n```compile_fail,E0451\nuse weksa::run::RoundRecord;\nfn f() -> RoundRecord {\n    RoundRecord {\n        n: 1,\n        inventory_rev: 1,\n        prompt_digest: String::new(),\n        corpus_digest: String::new(),\n        entity_digest: String::new(),\n        model: String::new(),\n        embedder: String::new(),\n        chrf_version: String::new(),\n        calls: vec![],\n        train: vec![],\n        inventory_digest: String::new(),\n        cycle: None,\n        admit_rules: vec![],\n        parse_reasons: vec![],\n        own_family: 0,\n        languages: vec![],\n        validation_scores: vec![],\n    }\n}\n```",
   "type": "object",
   "properties": {
     "admit_rules": {
@@ -87,6 +87,14 @@
       "items": {
         "$ref": "#/$defs/TrainRow"
       }
+    },
+    "validation_scores": {
+      "description": "Each panel language's live Validation scores in corpus order, a refused\nitem as 0. Private with no getter: only `run.rs` (the floor) reads them,\nso a leak outside it is a compile error. A run from before has none.",
+      "type": "array",
+      "default": [],
+      "items": {
+        "$ref": "#/$defs/LanguageScores"
+      }
     }
   },
   "required": [
@@ -123,6 +131,27 @@
         "items"
       ]
     },
+    "ItemScore": {
+      "type": "object",
+      "properties": {
+        "chrf": {
+          "description": "chrF of the output against the reference.",
+          "type": "number",
+          "format": "double"
+        },
+        "meaning": {
+          "description": "Embedding cosine of the output and the reference; `None` when either\nis empty after trimming.",
+          "type": [
+            "number",
+            "null"
+          ],
+          "format": "double"
+        }
+      },
+      "required": [
+        "chrf"
+      ]
+    },
     "LanguageRound": {
       "description": "One panel language's readings in a round: the means over that language's\nitems only (a refused item counts 0) and how many items lowered and scored.",
       "type": "object",
@@ -161,6 +190,25 @@
         "validation_refused"
       ]
     },
+    "LanguageScores": {
+      "description": "One panel language's Validation scores in a round, in corpus order: numbers\nonly, no item key and no text. Only `run.rs` reads them (the paired floor).",
+      "type": "object",
+      "properties": {
+        "language": {
+          "type": "string"
+        },
+        "scores": {
+          "type": "array",
+          "items": {
+            "$ref": "#/$defs/ItemScore"
+          }
+        }
+      },
+      "required": [
+        "language",
+        "scores"
+      ]
+    },
     "Outcome": {
       "oneOf": [
         {
diff --git a/schemas/cultnet/weksa.loop_run.schema.json b/schemas/cultnet/weksa.loop_run.schema.json
index bb63827..346f41c 100644
--- a/schemas/cultnet/weksa.loop_run.schema.json
+++ b/schemas/cultnet/weksa.loop_run.schema.json
@@ -49,6 +49,14 @@
       "description": "The answering model.",
       "type": "string"
     },
+    "ontology": {
+      "description": "Canonical absolute path of the ontology store: read-only for the run,\npinned by `ontology_digest`.",
+      "type": "string"
+    },
+    "ontology_digest": {
+      "description": "16 hex of the ontology file's bytes.",
+      "type": "string"
+    },
     "panel": {
       "description": "The languages the run offers, reads and decides on: BCP 47-form tags,\nsorted, unique, at least one, set once at open. An item of any other\nlanguage is never offered, minted from, probed or scored.",
       "type": "array",
@@ -58,6 +66,14 @@
     },
     "prompt_digest": {
       "type": "string"
+    },
+    "speaker_state": {
+      "description": "Canonical absolute path of the speaker-state store (scenes): read-only\nfor the run, pinned by `speaker_state_digest`.",
+      "type": "string"
+    },
+    "speaker_state_digest": {
+      "description": "16 hex of the speaker-state file's bytes.",
+      "type": "string"
     }
   },
   "required": [
@@ -73,7 +89,11 @@
     "chrf_version",
     "inventory_digest",
     "lowerer_reach",
-    "panel"
+    "panel",
+    "ontology",
+    "ontology_digest",
+    "speaker_state",
+    "speaker_state_digest"
   ],
   "$defs": {
     "LowererReach": {
diff --git a/schemas/cultnet/weksa.ontology_entry.schema.json b/schemas/cultnet/weksa.ontology_entry.schema.json
new file mode 100644
index 0000000..4d086d7
--- /dev/null
+++ b/schemas/cultnet/weksa.ontology_entry.schema.json
@@ -0,0 +1,277 @@
+{
+  "$schema": "https://json-schema.org/draft/2020-12/schema",
+  "title": "OntologyEntry",
+  "description": "One choice of one language. Key `onto:<language>:<n>`.\n\nThe store judges the form of an entry's text (bounds, normalization, no\ncontrol or format character) and never its meaning: no door judges text\n(ruling `leak-owned-by-flow-and-scorer-3`). No Train-only ontology mint\nexists yet, so a seed or a drafted entry is checked against held-out text by\nnothing today; follow-up `leak-diagnostic-in-round` owns that diagnostic.",
+  "type": "object",
+  "properties": {
+    "annotator": {
+      "$ref": "#/$defs/Annotator"
+    },
+    "choice": {
+      "type": "string"
+    },
+    "examples": {
+      "type": "array",
+      "items": {
+        "type": "string"
+      }
+    },
+    "inventory_rev": {
+      "description": "The revision, of the inventory the entry was admitted through, at which the\nstore read its conditions: provenance only; a run reads the conditions'\nfeatures at its own head.",
+      "type": "integer",
+      "format": "uint32",
+      "minimum": 0
+    },
+    "language": {
+      "type": "string"
+    },
+    "layer": {
+      "$ref": "#/$defs/Layer"
+    },
+    "n": {
+      "description": "The entry's number within its language, from 1.",
+      "type": "integer",
+      "format": "uint32",
+      "minimum": 0
+    },
+    "when": {
+      "description": "Every condition must hold; none means the entry always applies.",
+      "type": "array",
+      "items": {
+        "$ref": "#/$defs/Condition"
+      }
+    }
+  },
+  "required": [
+    "language",
+    "n",
+    "inventory_rev",
+    "layer",
+    "when",
+    "choice",
+    "examples",
+    "annotator"
+  ],
+  "$defs": {
+    "Annotator": {
+      "description": "Who annotated a document. A model's generator is an attestation string, held\nto the same form as every provenance string.",
+      "oneOf": [
+        {
+          "type": "string",
+          "enum": [
+            "Operator"
+          ]
+        },
+        {
+          "type": "object",
+          "properties": {
+            "Model": {
+              "type": "object",
+              "properties": {
+                "family": {
+                  "$ref": "#/$defs/ModelFamily"
+                },
+                "generator": {
+                  "type": "string"
+                }
+              },
+              "required": [
+                "family",
+                "generator"
+              ]
+            }
+          },
+          "additionalProperties": false,
+          "required": [
+            "Model"
+          ]
+        }
+      ]
+    },
+    "Condition": {
+      "description": "One feature of one slot of the view, tested. `Stance`, `Discourse` and\n`Scene` reach a lowering view; `Speaker` does not yet.",
+      "type": "object",
+      "properties": {
+        "feature": {
+          "$ref": "#/$defs/InvId"
+        },
+        "slot": {
+          "$ref": "#/$defs/Slot"
+        },
+        "test": {
+          "$ref": "#/$defs/Test"
+        }
+      },
+      "required": [
+        "slot",
+        "feature",
+        "test"
+      ]
+    },
+    "FeatValue": {
+      "oneOf": [
+        {
+          "type": "object",
+          "properties": {
+            "Grade": {
+              "$ref": "#/$defs/Grade"
+            }
+          },
+          "additionalProperties": false,
+          "required": [
+            "Grade"
+          ]
+        },
+        {
+          "description": "A label the feature's inventory entry declares.",
+          "type": "object",
+          "properties": {
+            "Option": {
+              "$ref": "#/$defs/OptionLabel"
+            }
+          },
+          "additionalProperties": false,
+          "required": [
+            "Option"
+          ]
+        },
+        {
+          "type": "object",
+          "properties": {
+            "Flag": {
+              "type": "boolean"
+            }
+          },
+          "additionalProperties": false,
+          "required": [
+            "Flag"
+          ]
+        }
+      ]
+    },
+    "Grade": {
+      "type": "integer",
+      "maximum": 1000,
+      "minimum": 0
+    },
+    "InvId": {
+      "type": "string",
+      "pattern": "^(concept|frame|role|relation|speech_act|feature|referent_kind|extension):[1-9][0-9]*$"
+    },
+    "Layer": {
+      "description": "Which part of the language an entry shapes.",
+      "type": "string",
+      "enum": [
+        "Lexicon",
+        "Grammar",
+        "Discourse",
+        "Phonology",
+        "Orthography"
+      ]
+    },
+    "ModelFamily": {
+      "description": "The family of the model that wrote a line.",
+      "oneOf": [
+        {
+          "type": "string",
+          "enum": [
+            "Anthropic",
+            "OpenAi",
+            "Google",
+            "Alibaba",
+            "Meta",
+            "Mistral"
+          ]
+        },
+        {
+          "description": "Nothing records which family wrote the line.",
+          "type": "string",
+          "const": "Unrecorded"
+        }
+      ]
+    },
+    "OptionLabel": {
+      "type": "string",
+      "pattern": "^[a-z][a-z0-9_]{0,23}$"
+    },
+    "Slot": {
+      "description": "Where a feature may sit in a packet.",
+      "oneOf": [
+        {
+          "type": "string",
+          "enum": [
+            "Discourse",
+            "Referent",
+            "Predication",
+            "Relation",
+            "Stance"
+          ]
+        },
+        {
+          "description": "The speaker's relation to one party of the scene, held by `weksa.scene`\ndocuments; see `LoweringInput::with_scene`.",
+          "type": "string",
+          "const": "Scene"
+        },
+        {
+          "description": "The speaker's stable axes, held by `weksa.speaker` documents.",
+          "type": "string",
+          "const": "Speaker"
+        }
+      ]
+    },
+    "Test": {
+      "description": "What a feature's value must be for a condition to hold.",
+      "oneOf": [
+        {
+          "type": "object",
+          "properties": {
+            "AtLeast": {
+              "$ref": "#/$defs/Grade"
+            }
+          },
+          "additionalProperties": false,
+          "required": [
+            "AtLeast"
+          ]
+        },
+        {
+          "type": "object",
+          "properties": {
+            "AtMost": {
+              "$ref": "#/$defs/Grade"
+            }
+          },
+          "additionalProperties": false,
+          "required": [
+            "AtMost"
+          ]
+        },
+        {
+          "type": "object",
+          "properties": {
+            "Is": {
+              "$ref": "#/$defs/FeatValue"
+            }
+          },
+          "additionalProperties": false,
+          "required": [
+            "Is"
+          ]
+        },
+        {
+          "description": "Holds when the feature is absent or a grade at most `g`: a bound that\ncosts nothing where the feature is unrated. `AtMost` still fails on an\nabsent feature.",
+          "type": "object",
+          "properties": {
+            "AtMostOrUnset": {
+              "$ref": "#/$defs/Grade"
+            }
+          },
+          "additionalProperties": false,
+          "required": [
+            "AtMostOrUnset"
+          ]
+        }
+      ]
+    }
+  }
+}
diff --git a/schemas/cultnet/weksa.scene.schema.json b/schemas/cultnet/weksa.scene.schema.json
index 90e240b..e463558 100644
--- a/schemas/cultnet/weksa.scene.schema.json
+++ b/schemas/cultnet/weksa.scene.schema.json
@@ -12,6 +12,7 @@
       "type": "string"
     },
     "inventory_rev": {
+      "description": "The revision, of the inventory the scene was admitted through, at which\n`put_scene` read its features: provenance only; a run never reads it.",
       "type": "integer",
       "format": "uint32",
       "minimum": 0
diff --git a/schemas/cultural-ontology-profile.md b/schemas/cultural-ontology-profile.md
index 84b1ed3..f027f8e 100644
--- a/schemas/cultural-ontology-profile.md
+++ b/schemas/cultural-ontology-profile.md
@@ -5,8 +5,8 @@ This is the human-facing schema receipt for
 reviewed cultural ontology used during utterance lowering.
 
 Executable schema code does not exist yet. When it does, it must reconcile with
-this receipt, the meta-analysis paper, and the profiles under
-`data/target-language-ontology/`.
+this receipt, the meta-analysis paper, and the language ontology in
+`data/ontology/ontology.cc`.
 
 ## Authority
 
@@ -265,14 +265,11 @@ cultural_ontology_trace:
 
 ## Storage
 
-Recommended CultCache paths:
-
-```text
-.weksa/cultural-ontology/{profileId}.cc
-.weksa/cultural-ontology/{baseProfileId}/overlays/{overlayId}.cc
-.weksa/cultural-ontology/catalogs/{catalogId}.cc
-.weksa/cultural-ontology/evidence-bundles/{bundleId}.cc
-```
+No profile store exists. The per-language lowering choices live in
+`data/ontology/ontology.cc` (`weksa ontology dump`); the typed profiles that
+once sat under `.weksa/cultural-ontology/`, and the `weksa.target_cultural_ontology.*`
+base profiles are deleted. Community and dialect
+profiles are owned by follow-up `language-ontology-communities`.
 
 Qdrant may store chunks, vectors, and payload filters for retrieval. It does
 not own profile acceptance, feature activation, or renderer authority.
diff --git a/schemas/target-language-cultural-ontology.md b/schemas/target-language-cultural-ontology.md
deleted file mode 100644
index ef34301..0000000
--- a/schemas/target-language-cultural-ontology.md
+++ /dev/null
@@ -1,81 +0,0 @@
-# Target-Language Cultural Ontology Contract
-
-This is the human-facing schema receipt for target-language cultural ontology
-profiles consumed by Weksa utterance lowering.
-
-Executable schema code does not exist yet. When it does, it must reconcile with
-this document and the profiles under `data/target-language-ontology/`.
-
-## Authority
-
-A target-language cultural ontology profile owns the realization distinctions
-that must be inspected for a human target language before surface text is
-chosen.
-
-It owns:
-
-- address and treatment distinctions
-- politeness and register pressure
-- social stance and directness defaults
-- idiom, metaphor, and lexical-locale risks
-- script or orthographic choices that carry meaning
-- forbidden flattenings for reviewed output
-
-It does not own:
-
-- source meaning
-- speaker identity
-- private state
-- exhaustive grammar
-- whole-culture description
-- final wording without an interlingua packet
-
-## Required Fields
-
-- `profile_id`: stable profile identifier.
-- `language`: target code, locale, and script.
-- `scope`: bounded statement of what the profile is and is not.
-- `authority`: `owns` and `does_not_own` lists.
-- `salience_axes`: named axes the lowerer must inspect.
-- `linguistic_affordances`: optional nested typed feature records, following
-  `cultural-ontology-profile.md`, when the profile owns dialect, register,
-  phonological, lexical, discourse, orthographic, or code-switching pressure.
-- `forbidden_flattenings`: mistakes the target lowerer must avoid.
-
-## Salience Axes
-
-Each salience axis should name:
-
-- `relevant_distinctions`: choices the target language or locale makes visible.
-- `lowering_questions`: questions reviewers and lowerers should answer before
-  accepting an output.
-
-Examples:
-
-- English directness and sarcasm.
-- Brazilian Portuguese treatment choice, lexical locale, and regional or
-  religious-cultural overlays.
-- Japanese politeness, ellipsis, and sentence-final force.
-
-## Fixture Contract
-
-Reviewed multilingual fixtures should cite the profile used by each
-realization:
-
-```yaml
-target_language:
-  code: pt
-  locale: pt-BR
-  script: Latn
-  register: direct technical casual
-  cultural_ontology_refs:
-    - data/target-language-ontology/pt-BR.yaml
-```
-
-The realization trace should name the cultural ontology axes that shaped the
-line.
-
-For dialectal, regional, historical, ritual, and contact-language profiles, use
-the nested `weksa.cultural_ontology_profile.v0` contract in
-`cultural-ontology-profile.md`. Flat string lists are only summaries; typed
-feature records own accepted affordance detail.
diff --git a/scripts/scene-annotation/agreement.py b/scripts/scene-annotation/agreement.py
new file mode 100644
index 0000000..0a200e3
--- /dev/null
+++ b/scripts/scene-annotation/agreement.py
@@ -0,0 +1,99 @@
+"""Agreement of annotator A, B, the older labels and the round-1 encoder. Run it BEFORE the
+rubric r1 revisions are put: the older labels are the store's latest revision then.
+Standard library only. Usage: as build_briefs.py, plus ROUND1=<round-1 dir of the run>."""
+import re,sys,subprocess,json,glob,os
+import os
+W=os.environ.get("WEKSA","target/debug/weksa")  # the weksa binary
+R=os.getcwd()  # run from the repo root
+S=os.environ.get("SCENE_SCRATCH","scene-scratch")+"/"  # A-*.jsonl, B-*.jsonl, briefs; never committed
+A=["--corpus","data/original/corpus.cc","--entities","data/original/entity.cc","--inventory","data/original/inventory.cc","--speaker-state","data/original/speaker-state.cc"]
+def run(*a): return subprocess.run([W]+A+list(a),cwd=R,capture_output=True,text=True).stdout.split("\n")
+out=run("corpus","dump")
+items=[]
+for i,l in enumerate(out):
+    m=re.match(r'^item:(\S+) \[(\S+) \S+ group=(\S+) (\w+)\]$',l)
+    if m and m.group(4)!="Test":
+        t=out[i+1].strip(); t=json.loads(t) if '\\' in t else t[1:-1]
+        items.append(dict(id=m.group(1),lang=m.group(2),group=m.group(3),text=t,new=m.group(1).startswith("vgrow")))
+G={x['group']:x for x in items}
+assert len(G)==98
+# scene dump: latest and @1 per group
+sd=run("scene","dump"); lab={}
+for i,l in enumerate(sd):
+    m=re.match(r'^scene:(\S+)@(\d+) rev:\d+ Model \S+ (.*) \[entity:keeper\]$',l)
+    if m:
+        f=re.search(r'relative_status=(\w+) intimacy=(\d+) in_group=(\w+)',sd[i+1])
+        lab.setdefault(m.group(1),{})[int(m.group(2))]=dict(rs=f.group(1),im=int(f.group(2)),ig=f.group(3)=="true",gen=m.group(3))
+old={g:v[max(v)] for g,v in lab.items()}
+def load(f): return {json.loads(l)['group']:json.loads(l) for l in open(S+f+".jsonl")}
+Aa={**load("A-en"),**load("A-ja")}; Bb={**load("B-en"),**load("B-ja")}
+assert set(Aa)==set(G)==set(Bb)
+def kappa(x,y):
+    n=len(x); 
+    if n==0: return float('nan')
+    po=sum(a==b for a,b in zip(x,y))/n
+    pa=sum(x)/n; pb=sum(y)/n
+    pe=pa*pb+(1-pa)*(1-pb)
+    return float('nan') if pe==1 else (po-pe)/(1-pe)
+def tab(x,y):
+    return "[TT=%d TF=%d FT=%d FF=%d]"%(sum(a and b for a,b in zip(x,y)),sum(a and not b for a,b in zip(x,y)),sum((not a) and b for a,b in zip(x,y)),sum((not a) and (not b) for a,b in zip(x,y)))
+def cmp(name,P,Q,gs,bkey=None):
+    # P,Q: dict group-> record with keys addressed(optional) relative_status intimacy in_group
+    def rs(r): return r.get('relative_status',r.get('rs'))
+    def im(r): return r.get('intimacy',r.get('im'))
+    def ig(r): return r.get('in_group',r.get('ig'))
+    n=len(gs)
+    if n==0: print(f"{name}: n=0"); return
+    e=lambda f: sum(f(P[g])==f(Q[g]) for g in gs)
+    s=f"{name}: n={n} rs_eq={e(rs)}/{n} ig_eq={e(ig)}/{n} im<=150={sum(abs(im(P[g])-im(Q[g]))<=150 for g in gs)}/{n}"
+    s+=f" ig_kappa={kappa([ig(P[g]) for g in gs],[ig(Q[g]) for g in gs]):.2f} ig_tab(A.row,B.col)={tab([ig(P[g]) for g in gs],[ig(Q[g]) for g in gs])}"
+    if all('addressed' in P[g] and 'addressed' in Q[g] for g in gs):
+        s+=f" addr_eq={e(lambda r:r['addressed'])}/{n} addr_kappa={kappa([P[g]['addressed'] for g in gs],[Q[g]['addressed'] for g in gs]):.2f} addr_tab={tab([P[g]['addressed'] for g in gs],[Q[g]['addressed'] for g in gs])}"
+    print(s)
+L={"en-US":[g for g in G if G[g]['lang']=="en-US"],"ja-JP":[g for g in G if G[g]['lang']=="ja-JP"],"pooled":list(G)}
+print("== (1) A vs B")
+for k,gs in L.items(): cmp(k,Aa,Bb,gs)
+oldg=[g for g in G if not G[g]['new']]; newg=[g for g in G if G[g]['new']]
+print("== (2) blind check: A vs old latest, the 56")
+for k,gs in L.items():
+    gg=[g for g in gs if g in oldg]
+    cmp(k+" all",Aa,old,gg)
+    cmp(k+" A.addr=true",Aa,old,[g for g in gg if Aa[g]['addressed']])
+    cmp(k+" A.addr=false",Aa,old,[g for g in gg if not Aa[g]['addressed']])
+print("differing in_group (old->A):")
+for g in oldg:
+    if old[g]['ig']!=Aa[g]['in_group']: print(" ",g,old[g]['ig'],"->",Aa[g]['in_group'],"addr",Aa[g]['addressed'])
+print("differing any label, old vs A:")
+for g in oldg:
+    o=old[g];a=Aa[g]
+    if (o['rs'],o['im'],o['ig'])!=(a['relative_status'],a['intimacy'],a['in_group']): print("  %s old %s/%d/%s  A %s/%d/%s addr=%s"%(g,o['rs'],o['im'],o['ig'],a['relative_status'],a['intimacy'],a['in_group'],a['addressed']))
+print("== (3) A vs vgrow @1, the 42")
+for k,gs in L.items(): cmp(k,Aa,{g:lab[g][1] for g in newg},[g for g in gs if g in newg])
+print("== (4) A addressed vs round-1 encoder addressee")
+enc={}
+RD=os.environ.get("ROUND1","runs/growth-base/round-1")+"/"
+for p in glob.glob(RD+"*.prompt"):
+    pt=open(p).read()
+    if not pt.startswith("Encode the line"): continue
+    ap=p[:-7]+".answer"
+    if not os.path.exists(ap): continue
+    # the line text; take the item whose text appears in the prompt
+    hit=[g for g in G if G[g]['text'] in pt]
+    if len(hit)!=1: continue
+    try: a=json.load(open(ap))
+    except Exception: continue
+    enc[hit[0]]=a.get('discourse',{}).get('addressee') is not None
+print("encoder answers matched:",len(enc),"of 98")
+for k,gs in list(L.items()):
+    gg=[g for g in gs if g in enc]
+    print(k,"n=",len(gg),"A.row,enc.col",tab([Aa[g]['addressed'] for g in gg],[enc[g] for g in gg]),"kappa=%.2f"%kappa([Aa[g]['addressed'] for g in gg],[enc[g] for g in gg]))
+for nm,grp in (("old",oldg),("new",newg)):
+    gg=[g for g in grp if g in enc]; print(nm,"enc-addressee true:",sum(enc[g] for g in gg),"of",len(gg),"; A addressed true among old/new:",sum(Aa[g]['addressed'] for g in grp),"of",len(grp))
+print("== (5) in_group true counts, old/new x addressed, before -> after")
+for nm,grp in (("old56",oldg),("new42",newg)):
+    for ad in (True,False):
+        gg=[g for g in grp if Aa[g]['addressed']==ad]
+        before=sum(old[g]['ig'] for g in gg); after=sum(Aa[g]['in_group'] for g in gg)
+        print(f"{nm} A.addressed={ad}: n={len(gg)} in_group true before={before} after={after}")
+print("totals before",sum(old[g]['ig'] for g in G),"after",sum(Aa[g]['in_group'] for g in G))
+print("A addressed true:",sum(Aa[g]['addressed'] for g in G),"B:",sum(Bb[g]['addressed'] for g in G))
diff --git a/scripts/scene-annotation/build_briefs.py b/scripts/scene-annotation/build_briefs.py
new file mode 100644
index 0000000..472f475
--- /dev/null
+++ b/scripts/scene-annotation/build_briefs.py
@@ -0,0 +1,37 @@
+"""Build the two annotator briefs (rubric r1 section + one language's shuffled live
+sentences), print the Test-leak count of each (must be 0) and its sha256.
+Standard library only. Usage: from the repo root, WEKSA=... SCENE_SCRATCH=dir python3 -I scripts/scene-annotation/build_briefs.py"""
+import re,sys,subprocess,random,json,hashlib,os
+import os
+W=os.environ.get("WEKSA","target/debug/weksa")  # the weksa binary
+R=os.getcwd()  # run from the repo root
+S=os.environ.get("SCENE_SCRATCH","scene-scratch")+"/"  # A-*.jsonl, B-*.jsonl, briefs; never committed
+A=["--corpus","data/original/corpus.cc","--entities","data/original/entity.cc","--inventory","data/original/inventory.cc","--speaker-state","data/original/speaker-state.cc"]
+out=subprocess.run([W]+A+["corpus","dump"],cwd=R,capture_output=True,text=True).stdout.split("\n")
+live=[];test=[]
+for i,l in enumerate(out):
+    m=re.match(r'^item:(\S+) \[(\S+) \S+ group=(\S+) (\w+)\]$',l)
+    if not m: continue
+    t=out[i+1].strip()
+    assert t.startswith('"') and t.endswith('"')
+    t=json.loads(t) if '\\' in t else t[1:-1]
+    if m.group(4)=="Test": test.append(t)
+    else: live.append((m.group(2),m.group(3),t))
+assert len(live)==98,len(live)
+rub=open(R+"/docs/scene-annotation.md").read()
+sec=rub[rub.index("## Rubric r1"):]
+# rubric section ends at next "## " heading
+rest=sec[len("## Rubric r1"):]
+nx=rest.find("\n## ")
+sec=sec[:len("## Rubric r1")+(nx if nx>=0 else len(rest))].strip()+"\n"
+def leaks(brief,text):
+    w=text.split(); c=list(text)
+    return text in brief or any(" ".join(w[k:k+5]) in brief for k in range(len(w)-4)) or (len(w)==1 and any("".join(c[k:k+12]) in brief for k in range(len(c)-11)))
+for lang in ("en-US","ja-JP"):
+    rows=[(g,t) for (l,g,t) in live if l==lang]
+    assert len(rows)==49
+    random.Random(f"scene-r1-{lang}").shuffle(rows)
+    body=sec+"\nThe groups, one per line as group<TAB>\"text\":\n\n"+"\n".join(f'{g}\t"{t}"' for g,t in rows)+"\n"
+    n=sum(leaks(body,t) for t in test)
+    print(lang,"lines",len(rows),"test_leaks",n,hashlib.sha256(body.encode()).hexdigest())
+    open(S+f"brief-{lang}.txt","w").write(body)
diff --git a/scripts/scene-annotation/put_labels.py b/scripts/scene-annotation/put_labels.py
new file mode 100644
index 0000000..9de31a1
--- /dev/null
+++ b/scripts/scene-annotation/put_labels.py
@@ -0,0 +1,15 @@
+"""Put annotator A's labels through weksa scene put, one revision per group.
+Standard library only. Usage: as build_briefs.py."""
+import json,subprocess
+import os
+W=os.environ.get("WEKSA","target/debug/weksa")  # the weksa binary
+R=os.getcwd()  # run from the repo root
+S=os.environ.get("SCENE_SCRATCH","scene-scratch")+"/"  # A-*.jsonl, B-*.jsonl, briefs; never committed
+A=["--corpus","data/original/corpus.cc","--entities","data/original/entity.cc","--inventory","data/original/inventory.cc","--speaker-state","data/original/speaker-state.cc"]
+rows=[json.loads(l) for f in ("A-en","A-ja") for l in open(S+f"{f}.jsonl")]
+for r in sorted(rows,key=lambda r:r['group']):
+    c=[W]+A+["scene","put","--group",r['group'],"--to","unnamed","--inventory-rev","4",
+     "--set",f"relative_status={r['relative_status']}","--set",f"intimacy={r['intimacy']}","--set",f"in_group={'true' if r['in_group'] else 'false'}",
+     "--model-family","anthropic","--generator","claude-sonnet-5-5 (Weksa Hands, scene rubric r1, docs/scene-annotation.md)"]
+    p=subprocess.run(c,cwd=R,capture_output=True,text=True)
+    print(r['group'],p.returncode,p.stdout.strip()[:80],p.stderr.strip()[:200])