diff options
Diffstat (limited to 'test/test_differential.ml')
| -rw-r--r-- | test/test_differential.ml | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/test/test_differential.ml b/test/test_differential.ml index c121d91..849bde4 100644 --- a/test/test_differential.ml +++ b/test/test_differential.ml @@ -903,6 +903,15 @@ let holy_week_slugs = this ONE of C23's six days in addition to the two citation fields. *) let good_friday_slug = "ef-passiontide-2-friday" +(* C37 (ef-oconnell-rubrics): RG 128 gives violet to "II/III-class vigils + outside Paschaltide". These two carried Red and White respectively -- + inherited from lectio, which inherited them from missalemeum, which is + generated from Divinum Officium. All three agree with each other and + disagree with the Missal, so no layer sharing that lineage could see it. + The Ascension's vigil is NOT here: it is the one II-class vigil INSIDE + Paschaltide and is correctly white already. *) +let violet_vigil_slugs = [ "vigil-of-st-lawrence"; "vigil-of-the-assumption" ] + (* C26 (task 8, fix round 2, coordinator review, Important): Passion week's own real Tuesday Mass (tools/bootstrap_lectionary.ml's own [passion_tuesday_entry] comment has the full Missal citation and both @@ -1284,6 +1293,7 @@ let layer_c_reason (l : row) (c : row) diffs = filed there. See data/ef/expected-divergences.sexp's own closure note. *) else if String.equal c.slug good_friday_slug && diffs = [ First_f; Gospel_f; Colour_f ] then Some "C36" + else if List.mem c.slug violet_vigil_slugs && diffs = [ Colour_f ] then Some "C37" else if List.mem c.slug holy_week_slugs && diffs = [ First_f; Gospel_f ] then Some "C23" else if String.equal c.slug passion_tuesday_slug && diffs = [ First_f; Gospel_f ] then Some "C26" else if String.equal c.slug advent_ember_sat_slug && diffs = [ First_f; Gospel_f ] then Some "C27" |