aboutsummaryrefslogtreecommitdiff
path: root/test/test_differential.ml
diff options
context:
space:
mode:
Diffstat (limited to 'test/test_differential.ml')
-rw-r--r--test/test_differential.ml23
1 files changed, 10 insertions, 13 deletions
diff --git a/test/test_differential.ml b/test/test_differential.ml
index aa75737..e12cd9a 100644
--- a/test/test_differential.ml
+++ b/test/test_differential.ml
@@ -450,19 +450,16 @@ let layer_c_reason (l : row) (c : row) diffs =
&& subset diffs [ Slug_f; Rank; Colour_f ]
then Some "C10"
else if String.equal c.slug "ef-passiontide-2-thursday" && diffs = [ Colour_f ] then Some "C11"
- (* RG16(a) task (register §6.0 + the sanctoral subject audit, this task's
- own report): 2 February on a Sunday. colitur now observes the Sunday
- (data/ef/adjustments.sexp retags the Purification `Bvm`, so it no
- longer bands at RG 91 entry 14 -- only a Feast of the LORD does); the
- Purification survives as its own commemoration, matching the register's
- ruling, just not as [c]'s OBSERVED slug here. lectio still tags it
- `class = lord` (unretagged upstream) and so still observes it outright.
- Matched on [l.slug] (lectio's side), the only side that can show this
- literal now -- colitur's own [c.slug] is whichever Sunday family the
- date falls in (time-after-epiphany or Septuagesima), not one fixed
- literal, unlike [c7]/[c11]'s single-slug tests above. *)
- else if String.equal l.slug "purification-of-the-blessed-virgin-mary" && subset diffs [ Slug_f; Colour_f ]
- then Some "C12"
+ (* RG16(a) task, fix round 1 (CRITICAL finding): a C12 entry briefly lived
+ here, allow-listing 2 February on a Sunday against lectio, when
+ `data/ef/adjustments.sexp` retagged the Purification `Bvm`. REVERTED --
+ the user has ruled: follow the oracle (register §6.0 has the full
+ account). The Purification is `Lord` again, colitur observes it
+ outright on those six 2-February Sundays, matching lectio's own
+ `class = lord` exactly -- no divergence to allow-list. Left
+ unimplemented here deliberately, not merely absent by oversight: this
+ comment is the record that C12 existed and was removed, should a
+ future reader wonder why the numbering skips it. *)
else None
(* ---------------------------------------------------------------------- *)